Contagem do registro 1601 duplicando no Bloco 9 (EFD Fiscal)

[leomcl]

Boa tarde, senhores.

A contagem do registro 1601 no registro 9900 está duplicando, se gera-se o arquivo mais de uma vez sem destruir o objeto TACBrSPEDFiscal.

Explico:

- Colocamos o componente TACBrSPEDFiscal em um form e geramos o EFD Fiscal;

- No registro 9900 mostra, por exemplo:

|9900|1601|6|

- SEM fechar o form, clico novamente em gerar o arquivo. Aí gera:

|9900|1601|12|

e assim por diante. 

- Se eu fechar o form e abrir de novo (destruindo e criando esse form novamente), e gerando o arquivo, aí sai o correto:

|9900|1601|6|

Isso somente acontece no 1601.

Analisando o código do ACBr, vi que no TRegistro1600 tem um construtor (CreatE), que não tem no TRegistro1601. Fiz alterações, mas minha correção não funcionou.

Se puderem dar uma força, agradeço.

att,

Leandro

[Renato Rubinho]

Boa noite,

1. Com os fontes atualizados, abra o arquivo:

https://sourceforge.net/p/acbr/code/HEAD/tree/trunk2/Fontes/ACBrTXT/ACBrSPED/ACBrSPEDFiscal/ACBrEFDBloco_1_Class.pas#l254

2. No local destacado a seguir:

3. Adicione essa linha após o 1600.

Registro1601Count := 0;

Caso resolva o problema, favor disponibilizar o arquivo corrigido para o pessoal mandar para o svn.

[leomcl]

Bom dia, Renato.

Era isso mesmo, agora gerou corretamente.

Segue unit com correção.

Obrigado,

Leandro

ACBrEFDBloco_1_Class.pas

[Juliomar Marchetti]

#TK-2331

No SVN

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.