jonathanrangel

Acabei achando o erro e com ele a resolução. Add( {01} LFill('C170') + {02} LFill( NUM_ITEM ) + {03} LFill( COD_ITEM ) + {04} LFill( DESCR_COMPL ) + {05} LFill( QTD, 5 ) + {06} LFill( UNID ) + {07} LFill( VL_ITEM,0,2 ) + {08} LFill( VL_DESC,0,2 ) + {09} LFill( intIND_MOV ) + {10} LFill( strCST_ICMS) + {11} LFill( CFOP,4 ) + {12} LFill( COD_NAT ) + {13} LFill( VL_BC_ICMS,0,2 ) + {14} LFill( ALIQ_ICMS,0,2 ) + {15} LFill( VL_ICMS,0,2 ) + {16} LFill( VL_BC_ICMS_ST,0,2 ) + {17} LFill( ALIQ_ST,0,2 ) + {18} LFill( VL_ICMS_ST,0,2 ) + {19} LFill( IntToStr(intIND_APUR) ) + //Deve se converter as variáveis inteiros para String; {20} LFill( strCST_IPI ) + {21} LFill( COD_ENQ ) + {22} LFill( VL_BC_IPI,0,2 ) + {23} LFill( ALIQ_IPI,0,2 ) + {24} LFill( VL_IPI,0,2 ) + {25} LFill( strCST_PIS ) + {26} LFill( VL_BC_PIS,0,2 ) + {27} LFill( ALIQ_PIS_PERC,0,2 ) + {28} LFill( QUANT_BC_PIS,3 ) + {29} LFill( ALIQ_PIS_R,4 ) + {30} LFill( VL_PIS,0,2 ) + {31} LFill( strCST_COFINS ) + {32} LFill( VL_BC_COFINS,0,2 ) + {33} DFill( ALIQ_COFINS_PERC,0 ) + {34} LFill( QUANT_BC_COFINS,3 ) + {35} LFill( ALIQ_COFINS_R,4 ) + {36} LFill( VL_COFINS,0,2 ) + {37} LFill( COD_CTA ) ) ;

Olá a todos. Estou com um problema na validação dos registros C170. No campo 19 - IND_APUR , não está indo com o valor indicado, ou o componente está comendo campos ou acrescentando. Obrigado.

Obrigado.

Se não conseguir, me passa seu email que te envio. Tenho ele já atualizado versão 1.01.

Bom dia a todos, Comecei a trabalhar com o Componente ACBR Sped Pis/Cofins, contudo registrei um erro na estrutra do Bloco 0. Não está sendo informado a variável Nome na formação do Registro 0000. Código Atual Add( LFill( '0000' ) + LFill( strCOD_VER ) + LFill( strTIPO_ESCRIT ) + LFill( strIND_SIT_ESP ) + LFill( NUM_REC_ANTERIOR, 41 ) + LFill( DT_INI ) + LFill( DT_FIN ) + LFill( CNPJ ) + LFill( UF ) + LFill( COD_MUN, 7 ) + LFill( SUFRAMA, 9 ) + LFill( strIND_NAT_PJ ) + LFill( strIND_ATIV ) ); Como deveria ficar Add( LFill( '0000' ) + LFill( strCOD_VER ) + LFill( strTIPO_ESCRIT ) + LFill( strIND_SIT_ESP ) + LFill( NUM_REC_ANTERIOR, 41 ) + LFill( DT_INI ) + LFill( DT_FIN ) + LFill( NOME ) + --Campo Adicionado LFill( CNPJ ) + LFill( UF ) + LFill( COD_MUN, 7 ) + LFill( SUFRAMA, 9 ) + LFill( strIND_NAT_PJ ) + LFill( strIND_ATIV ) ); Obrigado.