Pesquisar na Comunidade
Showing results for tags 'arquivo estoque'.
Encontrado 2 registros
-
Boa tarde, para auxílio, estou compartilhando a documentação atual do layout dos arquivos do bloco x, estou seguindo ela e consigo gerar e enviar meus arquivos perfeitamente... https://docs.google.com/document/d/1yez14gry9Mi4rTpwDRDf--bR-SLzijD81OPeJzh9FqE/edit# Espero que os ajude em suas dúvidas... As funções de envio eram separadas por estoque e redução z, agora não é mais. Segue o link do web service: http://webservices.sathomologa.sef.sc.gov.br/wsDfeSiv/Recepcao.asmx percebam no web service que ouve alterações no envio: Antes: FPSoapAction := 'http://tempuri.org/EnviarReducaoZ'; FPSoapAction := 'http://tempuri.org/EnviarEstoque'; Agora: FPSoapAction := 'http://tempuri.org/Enviar'; Espero que essas informações ajude. ACBrBlocoX_WebServices.pas
- 1 reply
-
- 1
-
- blocox
- arquivo estoque
- (e 1 mais)
-
Boa Tarde Pessoal, Sou novo no fórum e recente utilizador do ACBr, e gostaria de ajuda de vocês. Quando vou gerar o arquivo "Registros do PAF-ECF" Estoque pelo componente ACBr, tenho o erro "File Not Open" Mas já tentei criar o arquivo txt na mão, deixar a função criar o arquivo txt e o erro não muda, segue abaixo trecho do meu código: Dim PAF_ECF As New ACBrPAF Dim pEstoque As New List(Of ACBrPAFRegistroE2) '//////***Bloco E01*** PAF_ECF.PAF_E.RegistroE1.CNPJ = ecf.CNPJ PAF_ECF.PAF_E.RegistroE1.IE = ecf.IE PAF_ECF.PAF_E.RegistroE1.IM = ecf.IM PAF_ECF.PAF_E.RegistroE1.RazaoSocial = ecf.Cliche PAF_ECF.PAF_E.RegistroE1.NUM_FAB = ecf.NumSerie PAF_ECF.PAF_E.RegistroE1.MF_ADICIONAL = ecf.MFAdicional PAF_ECF.PAF_E.RegistroE1.TIPO_ECF = ecf.SubModeloECF PAF_ECF.PAF_E.RegistroE1.MARCA_ECF = ecf.ModeloStr PAF_ECF.PAF_E.RegistroE1.MODELO_ECF = ecf.SubModeloECF PAF_ECF.PAF_E.RegistroE1.DT_EST = ecf.DataMovimento PAF_ECF.PAF_E.RegistroE1.UF = "SP" PAF_ECF.PAF_E.RegistroE1.RegistroValido = True Dim qtd_registros As Integer = 0 '//***BLOCO E02 *** Dim pRegPAF As New ACBrPAFRegistroE2 pRegPAF.COD_MERC = "345678" pRegPAF.DESC_MERC = "descricao " pRegPAF.UN_MED = "UND" pRegPAF.QTDE_EST = Convert.ToDecimal(8) pRegPAF.RegistroValido = True PAF_ECF.PAF_E.RegistroE2.Add(pRegPAF) '//***SALVA ARQUIVO TXT PAF_ECF.SaveFileTXT_E(Caminho_Relatorios + "Estoque.txt") Utilizo VS 2010. Alguem tem alguma dica? Obrigado.