Erro ACBRSTDA

[Leonardo Fabro da Rocha]

Bom dia,

Estava testando o componente ACBrSTDA e verifiquei que o componente está com um bug para escrever o registro 0030. Ao invés de colocar 0030 no arquivo txt, ele está colocando 0005, conforme o código abaixo, extraído da procedure WriteRegistro0030, da unit ACBRDESTDABLOCO_0_CLASS:

      Add( LFill('0005') +
           LFill(strIND_ED) +
           LFill(strIND_ARQ) +
           LFill(strPRF_ISS) +
           LFill(strPRF_ICMS) +
           LFill(strPRF_RIDF) +
           LFill(strPRF_RUDF) +
           LFill(strPRF_LMC) +
           LFill(strPRF_RV) +
           LFill(strPRF_RI) +
           LFill(strIND_EC) +
           LFill(strIND_ISS) +
           LFill(strIND_RT) +
           LFill(strIND_ICMS) +
           LFill(strIND_ST) +
           LFill(strIND_AT) +
           LFill(strIND_IPI) +
           LFill(strIND_RI) ) ;

Já alterei em meu projeto para que gerasse corretamente.. Vou disponibilizar aqui a Unit corrigida para que seja atualizado no trunk2.

Obrigado,

ACBrDeSTDABloco_0_Class.rar

Editado 12 Fevereiro, 2016 por Leonardo Fabro da Rocha

[Juliomar Marchetti]

Obrigado pela correção !

está no svn!