Arquivo Txt - Incorreto

[Bruno Leandro]

Ao gerar o arquivo txt na versão 3.10 o arquivo esta gerando de forma incorreta, ao debugar verifiquei que no arquivo

 

Fontes\PCN2\pcnLayoutTXT.pas a linha "A" esta com a TAG "A|versao¨|^id^", e no layout da versão 1.1 e 2.0 a versão esta informada fixa no layout, "A|2.00|^id^" e "A|1.10|^id^".

 

Como o campo "versao¨" não é trocado, ao executar a função "gtAjustarRegistros" no arquivo Fontes\PCN2\pcnGerador.pas a linha "A" é removida.

 

sugestões de solução.

1- no arquivo Fontes\PCN2\pcnLayoutTXT.pas substituir "A|versao¨|^id^" por "A|3.10|^id^"

 

ou

 

2- no arquivo Fontes\PCN2\pcnNFeW.pas, na função "GerarIde" adicionar a troca da TAG "versao¨"

[daniel.breda]

Atualizei o meu acbr ontem e ao gerar o arquivo txt para a versão 2.00 está gerando com 2 cabeçalhos

 

NOTA FISCAL|1

NOTA FISCAL|1

 

Favor verificar.

[daniel.breda]

Estou trabalhando com a 3.10 agora, além de precisar fazer o ajuste citado pelo Bruno Leandro, também precisei fazer um ajuste no arquivo pcnNFeRTXT.pas na função

 

 

procedure TNFeRTXT.LerRegistro(const Registro: String);
var
  i, j, k: Integer;
  ok: Boolean;
begin


  FRegistro := Registro;
  FID := UpperCase(copy(Registro, 2, pos('|', FRegistro) - 2));
  if FID = '' then
    exit;
  if ID = 'A' then
  begin
     NFe.infNFe.Versao := 3.10;//LerCampo(tcDe2, 'versao'); <-- Ele retorna automaticamente 2 ao invés de 3.10
  end;
...

[sfwinfo]

Qual versão vocês estão do ACBR. Aqui esta funcionando perfeitamente.. Segue anexo ...

000054.TXT

[daniel.breda]

Estou usando a versão do dia da postagem.

[Bruno Leandro]

eu também estava utilizando a versão atualizada do dia.

[Bruno Leandro]

Segue arquivo gerado

NFe__00002_000002534_1.txt

[Bruno Leandro]

atualizei os fontes hoje 11/02/2015, compilei as blp's e ainda esta gerando o TXT sem a linha "A" do arquivo.

 

alguma novidade sobre esse erro ?