ACBrNFe.NotasFiscais.SaveToTXT não cria a linha ZA referente a Exportação

[Tiago Ciceri]

Usando a função:
ACBrNFe.NotasFiscais.SaveToTXT(sArquivoCaminhoTxt);
é gerado o arquivo texto para layout de integração da NFe.
Tudo ocorre perfeitamente ao menos se vor NFe de venda para estrangeiro,
que temos que informar:

•    Grupo do Endereço do Destinatário (enderdest):

Código do Município (cMun) = 9999999
Nome do Município (xMun) = EXTERIOR
Sigla da UF (UF) = EX
Código do País (cPais) = Utilizar a Tabela do BACEN (ex.: 0639)
Nome do País (xPais) = Utilizar a Tabela do BACEN (ex.: ARGENTINA)

Também os campos que definem : 

 exporta.UFembarq      := 'PR';
 exporta.UFSaidaPais   := 'PR';
 exporta.xLocEmbarq    := 'xxxxxxxxxxxx';
 exporta.xLocExporta   := 'xxxxxxxxxxxx';
 exporta.xLocDespacho  := 'xxxxxxxxxxxx';

- O Problema que não essas informações na função 
  ACBrNFe.NotasFiscais.SaveToTXT();

Assim analesei a função e verifiquei que na unit TNFeW
função TNFeW.GerarExporta;
  if nfe.infNFe.Versao >= 3.10 then
  begin
    if trim(nfe.exporta.UFSaidaPais) + trim(nfe.exporta.xLocExporta) <> '' then
    begin

     { Gerador.wGrupo('exporta', 'ZA01'); } <-- INCORRETO

      Gerador.wGrupo('exporta', 'ZA');// <--CORRETO... alterei e fiz os teste, deu certo.

      Gerador.wCampo(tcStr, 'ZA02', 'UFSaidaPais', 02, 02, 1, nfe.exporta.UFSaidaPais, DSC_UFEMBARQ);
      if not ValidarUF(nfe.exporta.UFSaidaPais) then
        Gerador.wAlerta('ZA02', 'UFSaidaPais', DSC_UFEMBARQ, ERR_MSG_INVALIDO);
      Gerador.wCampo(tcStr, 'ZA03', 'xLocExporta ', 01, 60, 1, nfe.exporta.xLocExporta, DSC_XLOCEMBARQ);
      Gerador.wCampo(tcStr, 'ZA04', 'xLocDespacho', 01, 60, 0, nfe.exporta.xLocDespacho, DSC_XLOCDESP);
      Gerador.wGrupo('/exporta');
    end;
  end

Pois na unit pcnLayoutTXT o layout de integração TXT esta da seguinte forma:

function CarregarLayoutTXT(const versao: string): AnsiString;
begin
  .
  .
  .
  Versão = 3.10
     
    LoadLayout('<ZA>     ZA|UFSaidaPais¨|XLocExporta¨|XLocDespacho¨');  // <-------- Busca por "ZA"
    
    LoadLayout('<ZB>     ZB|XNEmp¨|XPed¨|XCont¨');
    LoadLayout('<ZC>     ZB|Safra¨|Ref¨|QTotMes¨|QTotAnt¨|QTotGer¨|VFor¨|VTotDed¨|VLiqFor¨');
    LoadLayout('<ZC04> ZC04|Dia¨|Qtde¨');
    LoadLayout('<ZC10> ZC10|XDed¨|VDed¨');
  end;
end;

Se minha analise estiver correta, favor corrigir para ser atualizado no projeto ACBr.
Grato.

[Juliomar Marchetti]

Anexe sua unit para ser feito o merge e também análise de implementação!

lembre-se isso segue o manual que existe então abre ele e confere antes

[Fábio Henrique Beverari]

Olá boa tarde, o mesmo problema citado pelo Tiago ainda esta ocorrendo no Trunk 2 mesmo realizando as alterações a linha ZA não é gerada no arquivo TXT, estou usando uma maquina recem formatada e acabei de baixar a ultima versão do ACBR então acredito que não seja a versão alguem sabe como resolver esse problema?

Muito Obrigado