Leandro Caires

Utilize ACBrNFe.NotasFiscais.Items[0].SaveToFile(PathParaSalvarTXT,True); se utilizar a outra, se não me engano, gera o xml. Att

Tragam um Oscar para esse homem! Baixei os seus arquivos e esta funcionando tudo certinho agora! Testei umas 14 notas e gerou um txt valido em todas. Realmente as alterações que você fez são bem menos invasivas que as minhas. Obrigado Gabriel!

oribeiro Tem uns arquivos com correções neste tópico Não fiz testes com o Monitor, mas se você puder testar essas modificações com ele e nos avisar, ficaria grato Att

Gabriel Eu testei as alterações que fiz e esta gerando o xml normalmente. Nos arquivos que anexei no post eu corrigi a tag GA e inverti o município com o estado no cadastro do transportador. Ainda não corrigi o BA nem o refCTe, mas vou dar uma olhada neles. Eu fiz que nem você, tentei ser o menos invasivo possível nas alterações, assim que puder de uma olhadinha . Guilherme Já implementou alguma alteração? Deu certo? Att.

Bom dia Guilherme Então cara estou dando uma olhada aqui, pois bastou inverter os campos no arquivo pcnLayoutTXT.pas que resolver o problema no TXT, LoadLayout('<X03> X03|XNome¨|IE¨|XEnder¨|UF¨|XMun¨'); porém estou verificando o arquivo pcnNfeW para ver se essas alterações podem causar problemas ao gerar o Xml. Não tenho muito conhecimento de como funciona o componente internamente, pois precisei até hoje apenas do TXT (por motivos internos na empresa ¬¬). Se achar mais alguma coisa posto aqui. Abraços

Oi Fiz algumas correções no campo da autorização de download. Eu coloquei alguns comentários para identificar mais facilmente as alterações que fiz e segui a nota técnica NT2013.005_v1.21 (pág 20). Att pcnLayoutTXT.pas pcnNFeW.pas

Concordo com você, mesmo que temporário, essas modificações facilitariam a vida do pessoal que está baixando do svn, pois quem esta atualizando ou baixando do svn, vai ter que fazer essas modificações se quiser exportar para o emissor do governo. Ai quando sair o manual basta adequar a ele.

Obrigado Gabriel. Vou dar uma olhada e modificar o fonte Att

Eu estava com o mesmo problema que você Gabriel, efetuei essa correção e funcionou. Obrigado. Arquivo: pcnNfeW procedure TNFeW.GerarDetImpostoIPI(const i: Integer); var CST00495099: Boolean; begin // variavel CST00495099 usada para Ignorar Tag <IPI> // se GerarTagIPIparaNaoTributado = False e CST00495099 = False CST00495099 := (nfe.Det[i].Imposto.IPI.CST in [ipi00, ipi49, ipi50, ipi99]); if (not FOpcoes.FGerarTagIPIparaNaoTributado) and (not CST00495099) then exit; //se valores padrão de quando não foi preenchido a TAG IPI if ((nfe.Det[i].Imposto.IPI.cEnq = '') and (nfe.Det[i].Imposto.IPI.CST = ipi00) and (nfe.Det[i].Imposto.IPI.vBC = 0) and (nfe.Det[i].Imposto.IPI.qUnid = 0) and (nfe.Det[i].Imposto.IPI.vUnid = 0) and (nfe.Det[i].Imposto.IPI.pIPI = 0) and (nfe.Det[i].Imposto.IPI.vIPI = 0)) then EXIT; //não deve preencher a TAG Gerador.wGrupo('IPI', 'O01'); Gerador.wCampo(tcStr, 'O02', 'clEnq ', 01, 05, 0, nfe.Det[i].Imposto.IPI.clEnq, DSC_CLENQ); Gerador.wCampo(tcStr, 'O03', 'CNPJProd', 14, 14, 0, nfe.Det[i].Imposto.IPI.CNPJProd, DSC_CNPJPROD); Gerador.wCampo(tcStr, 'O04', 'cSelo ', 01, 60, 0, nfe.Det[i].Imposto.IPI.cSelo, DSC_CSELO); Gerador.wCampo(tcInt, 'O05', 'qSelo ', 01, 12, 0, nfe.Det[i].Imposto.IPI.qSelo, DSC_QSELO); if nfe.Det[i].Imposto.IPI.cEnq = '' then nfe.Det[i].Imposto.IPI.cEnq := '999'; Gerador.wCampo(tcStr, 'O06', 'cEnq ', 03, 03, 1, nfe.Det[i].Imposto.IPI.cEnq, DSC_CENQ); if CST00495099 then begin if (nfe.Det[i].Imposto.IPI.vBC + nfe.Det[i].Imposto.IPI.pIPI > 0) and (nfe.Det[i].Imposto.IPI.qUnid + nfe.Det[i].Imposto.IPI.vUnid > 0) then Gerador.wAlerta('O07', 'IPITrib', DSC_IPITrib, 'As TAG <vBC> e <pIPI> não podem ser informadas em conjunto com as TAG <qUnid> e <vUnid>'); (* Leandro de Paula Caires - 10/03/2015 As linhas "Gerador.wGrupo('IPITrib', 'O07');" do if foram alteradas, pois os itens O10 e O11 são excludentes. *) if (nfe.Det[i].Imposto.IPI.qUnid + nfe.Det[i].Imposto.IPI.vUnid > 0) then begin Gerador.wGrupo('IPITrib', 'O11'); //Leandro - alterado de O07 para O11 Gerador.wCampo(tcStr, 'O09', 'CST ', 02, 02, 1, CSTIPITOStr(nfe.Det[i].Imposto.IPI.CST), DSC_CST); Gerador.wCampo(tcDe4, 'O11', 'qUnid ', 01, 16, 1, nfe.Det[i].Imposto.IPI.qUnid, DSC_QUNID); Gerador.wCampo(tcDe4, 'O12', 'vUnid ', 01, 15, 1, nfe.Det[i].Imposto.IPI.vUnid, DSC_VUNID); Gerador.wCampo(tcDe2, 'O14', 'vIPI ', 01, 15, 1, nfe.Det[i].Imposto.IPI.vIPI, DSC_VIPI); Gerador.wGrupo('/IPITrib'); end else begin Gerador.wGrupo('IPITrib', 'O10'); //Leandro - alterado de O07 para O10 Gerador.wCampo(tcStr, 'O09', 'CST ', 02, 02, 1, CSTIPITOStr(nfe.Det[i].Imposto.IPI.CST), DSC_CST); Gerador.wCampo(tcDe2, 'O10', 'vBC ', 01, 15, 1, nfe.Det[i].Imposto.IPI.vBC, DSC_VBC); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'O13', 'pIPI ', 01, IIf(Usar_tcDe4,06,05), 1, nfe.Det[i].Imposto.IPI.pIPI, DSC_PIPI); Gerador.wCampo(tcDe2, 'O14', 'vIPI ', 01, 15, 1, nfe.Det[i].Imposto.IPI.vIPI, DSC_VIPI); Gerador.wGrupo('/IPITrib'); end; end else (* Quando CST/IPI for 01,02,03,04,51,52,53,54 ou 55 *) begin Gerador.wGrupo('IPINT', 'O08'); Gerador.wCampo(tcStr, 'O09', 'CST ', 02, 02, 1, CSTIPITOStr(nfe.Det[i].Imposto.IPI.CST), DSC_CST); Gerador.wGrupo('/IPINT'); end; Gerador.wGrupo('/IPI'); end; Arquivo: pcnLayoutTXT Troquei LoadLayout('<O07> O07|CST¨|VIPI¨'); LoadLayout('<O07> O10|VBC¨|PIPI¨|VIPI¨'); LoadLayout('<O07> O11|QUnid¨|VUnid¨|VIPI¨'); por LoadLayout('<O10> O07|CST¨|VIPI¨'); LoadLayout('<O10> O10|VBC¨|PIPI¨|VIPI¨'); LoadLayout('<O11> O07|CST¨|VIPI¨'); LoadLayout('<O11> O11|QUnid¨|VUnid¨|VIPI¨'); Há um outro problema também, porém este erro esta presente no manual de layout txt 3.10. No manual e no ACBr, especificamente no campo x03 (Dados do Transportador) está assim: X03|xNome|IE|xEnder|xMun|UF| Porém o emissor do governo recusa e aceita somente se invertermos os campos xMun e UF assim: X03|xNome|IE|xEnder|UF|xMun| Vou fazer mais alguns testes aqui e posto se achar mais alguma coisa At+