Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

Alteração Em Registros 1210 E 1610


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

Recommended Posts

CST PIS/COFINS Sendo gerado de Forma incorreta

|1210|00000000000000|31121899|0|11112011|0,00|0,00|0,00|0,00|00.00.00.0000.0000|0|

|1210|00000000000000|01|0|11112011|0,00|0,00|0,00|0,00|00.00.00.0000.0000|0|

 

ACBrEPCBloco_1_Class LINHA 575

 

DE
with Reg1200.Registro1210.Items[intFor] do
        begin
          Add( LFill('1210') +
               LFill( CNPJ ) +
               LFill( CST_PIS ) +
               LFill( COD_PART ) +
               LFill( DT_OPER ) +
               LFill( VL_OPER,0,2 ) +
               LFill( VL_BC_PIS,0,2 ) +
               LFill( ALIQ_PIS,0,2 ) +
               LFill( VL_PIS,0,2 ) +
               LFill( COD_CTA ) +
               LFill( DESC_COMPL ) ) ;
        end;

 

PARA
with Reg1200.Registro1210.Items[intFor] do
        begin
          Add( LFill('1210') +
               LFill( CNPJ ) +
               LFill( CST_PIS, 2 ) +
               LFill( COD_PART ) +
               LFill( DT_OPER ) +
               LFill( VL_OPER,0,2 ) +
               LFill( VL_BC_PIS,0,2 ) +
               LFill( ALIQ_PIS,0,2 ) +
               LFill( VL_PIS,0,2 ) +
               LFill( COD_CTA ) +
               LFill( DESC_COMPL ) ) ;
        end;

 

ACBrEPCBloco_1_Class LINHA 789

 

DE

with Reg1600.Registro1610.Items[intFor] do
        begin
          Add( LFill('1610') +
               LFill( CNPJ ) +
               LFill( CST_COFINS ) +
               LFill( COD_PART ) +
               LFill( DT_OPER ) +
               LFill( VL_OPER,0,2 ) +
               DFill( VL_BC_COFINS, 3 ) +
               DFill( ALIQ_COFINS, 4 ) +
               LFill( VL_COFINS,0,2 ) +
               LFill( COD_CTA ) +
               LFill( DESC_COMPL ) ) ;
        end;

 

PARA

with Reg1600.Registro1610.Items[intFor] do
        begin
          Add( LFill('1610') +
               LFill( CNPJ ) +
               LFill( CST_COFINS, 2 ) +
               LFill( COD_PART ) +
               LFill( DT_OPER ) +
               LFill( VL_OPER,0,2 ) +
               DFill( VL_BC_COFINS, 3 ) +
               DFill( ALIQ_COFINS, 4 ) +
               LFill( VL_COFINS,0,2 ) +
               LFill( COD_CTA ) +
               LFill( DESC_COMPL ) ) ;
        end;

 

 

 

 

ACBrEPCBloco_1_Class.pas

Jefferson Lupinacci
Analista Desenvolvedor Java Sr. em Zara.com - Inditex - Departamento de Logística e Transporte Global - A Coruña / Espanha

[email protected] / [email protected]
Linkedin; https://www.linkedin.com/in/jeffersonlupinacci/

 

Link to comment
Share on other sites

  • Consultores

Olá,

 

 Você viu se esse problema se repete nos registros 1101 e 1501 na sua máquina também?

[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link to comment
Share on other sites

Esses campos estão como Integer, mas eles deveriam ser tipados, farei a alteração assim que puder.

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Link to comment
Share on other sites

Olá,

 

 Você viu se esse problema se repete nos registros 1101 e 1501 na sua máquina também?

Ainda não fiz a integração do registro 1501 e 1101 as gerando informo aqui, pois estou executando uma integração completa do sped com a minha aplicação desktop

Jefferson Lupinacci
Analista Desenvolvedor Java Sr. em Zara.com - Inditex - Departamento de Logística e Transporte Global - A Coruña / Espanha

[email protected] / [email protected]
Linkedin; https://www.linkedin.com/in/jeffersonlupinacci/

 

Link to comment
Share on other sites

Gentileza testar as implementações se segue em anexo, e depois me dê um retorno se possível para que eu possa subir para o repositório.

ACBrEPCBloco_1_Class.zip

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Link to comment
Share on other sites

  • Este tópico foi criado há 3122 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.