Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Correção e Alteração no Bloco C


ubaltino
  • Este tópico foi criado há 4028 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Olá,

Tive de Fazer algumas alterações no ACBrEPCBloco_C_Class.pas, para conseguir validar o Registro C170 sem erro.

Na procedure WriteRegistroC170, tive de fazer:

- em var incluir

Nulo : Boolean;

- stpisQtdeAliquotaUnidade : strCST_PIS := '03';

- alterado para:

stpisQtdeAliquotaUnidade : begin

strCST_PIS := '03';

Nulo := True;

end;

- stcofinsQtdeAliquotaUnidade : strCST_COFINS := '03';

- alterado para:

stcofinsQtdeAliquotaUnidade : begin

strCST_COFINS := '03';

Nulo := True;

end;

- De {26} LFill( VL_BC_PIS,0,2 ) +

- Para {26} LFill( VL_BC_PIS,0,2,Nulo) +

- De {27} LFill( ALIQ_PIS_PERC,0,2 ) +

- Para {27} LFill( ALIQ_PIS_PERC,0,2,Nulo) +

- De {32} LFill( VL_BC_COFINS,0,2) +

- Para {32} LFill( VL_BC_COFINS,0,2,Nulo) +

- De {33} LFill( ALIQ_COFINS_PERC,0,2 ) +

- Para {33} LFill( ALIQ_COFINS_PERC,0,2,Nulo) +

Ubaltino Faleiro

Link to comment
Share on other sites

  • Este tópico foi criado há 4028 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.