ACBrSPEDPisCofins

Isaque Pinheiro · 15 Abril, 2011

Boa noite!
Peço desculpas a todos pela demora em retornar ao forum.

Aquiniti,

Utilizando as ultimas alterações disponibilizadas fiz algumas modificações.

O código revisado contido em anexo esta compilando sem erros. São eles:

01 – ACBrEPCBlocos.pas

02 - ACBrEPCBloco_0.pas (não alterado)

03 - ACBrEPCBloco_0_Class.pas

04 - ACBrEPCBloco_A.pas (não alterado)

05 - ACBrEPCBloco_A_Class.pas (não alterado)

06 - ACBrEPCBloco_C.pas (não alterado)

07 - ACBrEPCBloco_C_Class.pas (não alterado)

08 - ACBrEPCBloco_D.pas

09 - ACBrEPCBloco_D_Class.pas

10 - ACBrEPCBloco_F.pas

11 - ACBrEPCBloco_F_Class.pas

12 - ACBrEPCBloco_M.pas

13 - ACBrEPCBloco_M_Class.pas

Peço que seja avaliado e ajustado.

Desde já agradeço.

Olá Carlos, peço que baixe a versão Beta lançada no repositório, e check com suas implementações, se houver alguma mudança, implemente na versão Beta que baixar, e anexe as mudanças aqui que pego, olho e subo.

Obrigado por sua colaboração

Carlos Rosset · 15 Abril, 2011

Boa tarde!

Isaque,

Estou fazendo uso do SVN na pasta: "ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins".

Objetivando um melhor entendimento das alterações realizadas e os procedimentos adotados segue:

1)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEFDBloco_0_Class.pas (Ainda não foi excluído do SVN)

2)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_D.pas

---------------------

Registro : REGISTRO D100: AQUISIÇÃO DE SERVIÇOS DE TRANSPORTE

Campos

09 - NUM_DOC - Número do documento fiscal - Numero {Estava como String alterado para Integer}

10 - CHV_CTE - Chave do Conhecimento de Transporte Eletrônico - Numero {Estava como String alterado para Integer}

13 - TP_CT-e - Tipo de Conhecimento de Transporte Eletrônico conforme definido no Manual de Integração do CT-e - Numero{Estava como String alterado para Integer}

14 - CHV_CTE_REF - Chave do CT-e de referência cujos valores foram complementados (opção “1” do campo anterior) ou cujo débito foi anulado (opção “2” do campo anterior). - Numero {Estava como String alterado para Integer}

---------------------

Registro : REGISTRO D600: CONSOLIDAÇÃO DA PRESTAÇÃO DE SERVIÇOS

Campos

06 - IND_REC - Indicador do tipo de receita - N { Criado o tipo TACBrIndRec }

3)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_D_Class.pas

Realizado alterações para manter as definições do arquivo ACBrEPCBloco_D.pas

4)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_F.pas

---------------------

Registro : REGISTRO F600: CONTRIBUIÇÃO RETIDA NA FONTE

Campos

07 - IND_NAT_REC - Indicador da Natureza da Receita - N { Criado o tipo TACBrIndNatRec }

---------------------

Registro : REGISTRO F800: CRÉDITOS DECORRENTES DE EVENTOS DE INCORPORAÇÃO, FUSÃO E CISÃO

Campos

06 - COD_CRED - Código do crédito transferido, conforme Tabela 4.3.6 - N { Criado o tipo TACBrCodCred }

5)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_F_Class.pas

Realizado alterações para manter as definições do arquivo ACBrEPCBloco_F.pas

6)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_M.pas

---------------------

Registro : REGISTRO M100: ABERTURA DO BLOCO M

Campos

03 - IND_CRED_ORI - Indicador de Crédito Oriundo de - N { Criado o tipo TACBrIndCredOri}

13 - IND_DESC_CRED - Indicador de opção de utilização do crédito disponível no período - C { Criado o tipo TACBrIndDescCred

---------------------

Registro : REGISTRO M105: DETALHAMENTO DA BASE DE CALCULO DO CRÉDITO APURADO NO PERÍODO - PIS/PASEP

Campos

02 - NAT_BC_CRED - Código da Base de Cálculo do Crédito apurado no período, conforme a Tabela 4.3.7. - C { Criado o tipo TACBrBaseCalculoCredito }

03 - CST_PIS - Código da Situação Tributária referente ao crédito de PIS/Pasep (Tabela 4.3.3) - N { Criado o tipo TACBrSituacaoTribPIS }

---------------------

Registro : REGISTRO M110: AJUSTES DO CRÉDITO DE PIS/PASEP APURADO

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M210: DETALHAMENTO DA CONTRIBUIÇÃO PARA O PIS/PASEP DO PERÍODO

Campos

02 - COD_CONT - Código da contribuição social apurada no período, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

---------------------

Registro : REGISTRO M211: SOCIEDADES COOPERATIVAS - COMPOSIÇÃO DA BASE DE CALCULO - PIS/PASEP

Campos

02 - IND_TIP_COOP - Indicador do Tipo de Sociedade Cooperativa - N { Criado o tipo TACBrIndTipCoop }

---------------------

Registro : REGISTRO M220: AJUSTES DA CONTRIBUIÇÃO PARA O PIS/PASEP APURADA

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M300: CONTRIBUIÇÃO DE PIS/PASEP DIFERIDA EM PERÍODOS ANTERIORES

Campos

02 - COD_CONT - Código da contribuição social diferida em períodos anteriores, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

03 - VL_CONT_APUR_DIFER - Valor da Contribuição Apurada, diferida em períodos anteriores - N { Criado }

04 - NAT_CRED_DESC - Natureza do Crédito Diferido, vinculado à receita tributada no mercado interno, a descontar - C { Criado o tipo TACBrNatCredDesc}

05 - VL_CRED_DESC_DIFER - Valor do Crédito a Descontar vinculado à contribuição diferida - N { Criado }

06 - VL_CONT_DIFER_ANT - Valor da Contribuição a Recolher, diferida em períodos anteriores (Campo 03 – Campo 05) - N { Criado }

---------------------

Registro : REGISTRO M400: RECEITAS ISENTAS, NÃO ALCANÇADAS PELA INCIDÊNCIA DA CONTRIBUIÇÃO, SUJEITAS A ALÍQUOTA ZERO OU DE VENDAS COM SUSPENSÃO - PIS/PASEP

Campos

02 CST_PIS - Código da Situação Tributária referente ao crédito de PIS/Pasep (Tabela 4.3.3) - N { Criado o tipo TACBrSituacaoTribPIS }

---------------------

Registro : REGISTRO M500: CRÉDITO DE COFINS RELATIVO AO PERÍODO

Campos

02 - COD_CRED - Código do crédito transferido, conforme Tabela 4.3.6 - N { Criado o tipo TACBrCodCred }

03 - IND_CRED_ORI - Indicador de Crédito Oriundo de - N { Criado o tipo TACBrIndCredOri}

---------------------

Registro : REGISTRO M505: DETALHAMENTO DA BASE DE CALCULO DO CRÉDITO APURADO NO PERÍODO - COFINS

Campos

02 - NAT_BC_CRED - Código da Base de Cálculo do Crédito apurado no período, conforme a Tabela 4.3.7. - C { Criado o tipo TACBrBaseCalculoCredito }

03 - CST_COFINS - Código da Situação Tributária referente ao crédito de COFINS (Tabela 4.3.4) vinculado ao tipo de crédito escriturado em M500 - N { Criado o tipo TACBrSituacaoTribCOFINS }

---------------------

Registro : REGISTRO M510: AJUSTES DO CRÉDITO DE COFINS APURADO

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M610: DETALHAMENTO DA CONTRIBUIÇÃO PARA A SEGURIDADE SOCIAL - COFINS DO PERÍODO

Campos

02 - COD_CONT - Código da contribuição social apurada no período, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

---------------------

Registro : REGISTRO M611: SOCIEDADES COOPERATIVAS - COMPOSIÇÃO DA BASE DE CALCULO - COFINS

Campos

02 - IND_TIP_COOP - Indicador do Tipo de Sociedade Cooperativa - N { Criado o tipo TACBrIndTipCoop }

---------------------

Registro : REGISTRO M620: AJUSTES DA COFINS APURADA

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M700: COFINS DIFERIDA EM PERÍODOS ANTERIORES - VALORES A PAGAR NO PERÍODO

Campos

02 - COD_CONT - Código da contribuição social diferida em períodos anteriores, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

03 - VL_CONT_APUR_DIFER - Valor da Contribuição Apurada, diferida em períodos anteriores - N { Criado }

04 - NAT_CRED_DESC - Natureza do Crédito Diferido, vinculado à receita tributada no mercado interno, a descontar - C { Criado o tipo TACBrNatCredDesc}

05 - VL_CRED_DESC_DIFER - Valor do Crédito a Descontar vinculado à contribuição diferida - N { Criado }

06 - VL_CONT_DIFER_ANT - Valor da Contribuição a Recolher, diferida em períodos anteriores (Campo 03 – Campo 05) - N { Criado }

---------------------

Registro : REGISTRO M800: RECEITAS ISENTAS, NÃO ALCANÇADAS PELA INCIDÊNCIA DA CONTRIBUIÇÃO, SUJEITAS A ALÍQUOTA ZERO OU DE VENDAS COM SUSPENSÃO - COFINS

Campos

02 - CST_COFINS - Código da Situação Tributária referente ao crédito de COFINS (Tabela 4.3.4) vinculado ao tipo de crédito escriturado em M500 - N { Criado o tipo TACBrSituacaoTribCOFINS }

7)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_M_Class.pas

Realizado alterações para manter as definições do arquivo ACBrEPCBloco_M.pas

8)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBlocos.pas

Realizado implementação dos tipos nescessarios pelos blocos D, F, M.

*) Todos os arquivos postados são reformatados para melhor legibilidade.

==============================================

=> Segue desta forma por sugestão apenas o que sofreu alteração baseado no SVN da pasta "ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins".

Obrigado por seu comentário , sinta-se livre para mais só assim podemos melhorar.

15_04_2011_EPC_D_F_M_Blocos - Parcial.zip.zip

Isaque Pinheiro · 15 Abril, 2011

Boa tarde!
Isaque,

Estou fazendo uso do SVN na pasta: "ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins".

Objetivando um melhor entendimento das alterações realizadas e os procedimentos adotados segue:

1)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEFDBloco_0_Class.pas (Ainda não foi excluído do SVN)

2)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_D.pas

---------------------

Registro : REGISTRO D100: AQUISIÇÃO DE SERVIÇOS DE TRANSPORTE

Campos

09 - NUM_DOC - Número do documento fiscal - Numero {Estava como String alterado para Integer}

10 - CHV_CTE - Chave do Conhecimento de Transporte Eletrônico - Numero {Estava como String alterado para Integer}

13 - TP_CT-e - Tipo de Conhecimento de Transporte Eletrônico conforme definido no Manual de Integração do CT-e - Numero{Estava como String alterado para Integer}

14 - CHV_CTE_REF - Chave do CT-e de referência cujos valores foram complementados (opção “1” do campo anterior) ou cujo débito foi anulado (opção “2” do campo anterior). - Numero {Estava como String alterado para Integer}

---------------------

Registro : REGISTRO D600: CONSOLIDAÇÃO DA PRESTAÇÃO DE SERVIÇOS

Campos

06 - IND_REC - Indicador do tipo de receita - N { Criado o tipo TACBrIndRec }

3)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_D_Class.pas

Realizado alterações para manter as definições do arquivo ACBrEPCBloco_D.pas

4)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_F.pas

---------------------

Registro : REGISTRO F600: CONTRIBUIÇÃO RETIDA NA FONTE

Campos

07 - IND_NAT_REC - Indicador da Natureza da Receita - N { Criado o tipo TACBrIndNatRec }

---------------------

Registro : REGISTRO F800: CRÉDITOS DECORRENTES DE EVENTOS DE INCORPORAÇÃO, FUSÃO E CISÃO

Campos

06 - COD_CRED - Código do crédito transferido, conforme Tabela 4.3.6 - N { Criado o tipo TACBrCodCred }

5)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_F_Class.pas

Realizado alterações para manter as definições do arquivo ACBrEPCBloco_F.pas

6)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_M.pas

---------------------

Registro : REGISTRO M100: ABERTURA DO BLOCO M

Campos

03 - IND_CRED_ORI - Indicador de Crédito Oriundo de - N { Criado o tipo TACBrIndCredOri}

13 - IND_DESC_CRED - Indicador de opção de utilização do crédito disponível no período - C { Criado o tipo TACBrIndDescCred

---------------------

Registro : REGISTRO M105: DETALHAMENTO DA BASE DE CALCULO DO CRÉDITO APURADO NO PERÍODO - PIS/PASEP

Campos

02 - NAT_BC_CRED - Código da Base de Cálculo do Crédito apurado no período, conforme a Tabela 4.3.7. - C { Criado o tipo TACBrBaseCalculoCredito }

03 - CST_PIS - Código da Situação Tributária referente ao crédito de PIS/Pasep (Tabela 4.3.3) - N { Criado o tipo TACBrSituacaoTribPIS }

---------------------

Registro : REGISTRO M110: AJUSTES DO CRÉDITO DE PIS/PASEP APURADO

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M210: DETALHAMENTO DA CONTRIBUIÇÃO PARA O PIS/PASEP DO PERÍODO

Campos

02 - COD_CONT - Código da contribuição social apurada no período, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

---------------------

Registro : REGISTRO M211: SOCIEDADES COOPERATIVAS - COMPOSIÇÃO DA BASE DE CALCULO - PIS/PASEP

Campos

02 - IND_TIP_COOP - Indicador do Tipo de Sociedade Cooperativa - N { Criado o tipo TACBrIndTipCoop }

---------------------

Registro : REGISTRO M220: AJUSTES DA CONTRIBUIÇÃO PARA O PIS/PASEP APURADA

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M300: CONTRIBUIÇÃO DE PIS/PASEP DIFERIDA EM PERÍODOS ANTERIORES

Campos

02 - COD_CONT - Código da contribuição social diferida em períodos anteriores, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

03 - VL_CONT_APUR_DIFER - Valor da Contribuição Apurada, diferida em períodos anteriores - N { Criado }

04 - NAT_CRED_DESC - Natureza do Crédito Diferido, vinculado à receita tributada no mercado interno, a descontar - C { Criado o tipo TACBrNatCredDesc}

05 - VL_CRED_DESC_DIFER - Valor do Crédito a Descontar vinculado à contribuição diferida - N { Criado }

06 - VL_CONT_DIFER_ANT - Valor da Contribuição a Recolher, diferida em períodos anteriores (Campo 03 – Campo 05) - N { Criado }

---------------------

Registro : REGISTRO M400: RECEITAS ISENTAS, NÃO ALCANÇADAS PELA INCIDÊNCIA DA CONTRIBUIÇÃO, SUJEITAS A ALÍQUOTA ZERO OU DE VENDAS COM SUSPENSÃO - PIS/PASEP

Campos

02 CST_PIS - Código da Situação Tributária referente ao crédito de PIS/Pasep (Tabela 4.3.3) - N { Criado o tipo TACBrSituacaoTribPIS }

---------------------

Registro : REGISTRO M500: CRÉDITO DE COFINS RELATIVO AO PERÍODO

Campos

02 - COD_CRED - Código do crédito transferido, conforme Tabela 4.3.6 - N { Criado o tipo TACBrCodCred }

03 - IND_CRED_ORI - Indicador de Crédito Oriundo de - N { Criado o tipo TACBrIndCredOri}

---------------------

Registro : REGISTRO M505: DETALHAMENTO DA BASE DE CALCULO DO CRÉDITO APURADO NO PERÍODO - COFINS

Campos

02 - NAT_BC_CRED - Código da Base de Cálculo do Crédito apurado no período, conforme a Tabela 4.3.7. - C { Criado o tipo TACBrBaseCalculoCredito }

03 - CST_COFINS - Código da Situação Tributária referente ao crédito de COFINS (Tabela 4.3.4) vinculado ao tipo de crédito escriturado em M500 - N { Criado o tipo TACBrSituacaoTribCOFINS }

---------------------

Registro : REGISTRO M510: AJUSTES DO CRÉDITO DE COFINS APURADO

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M610: DETALHAMENTO DA CONTRIBUIÇÃO PARA A SEGURIDADE SOCIAL - COFINS DO PERÍODO

Campos

02 - COD_CONT - Código da contribuição social apurada no período, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

---------------------

Registro : REGISTRO M611: SOCIEDADES COOPERATIVAS - COMPOSIÇÃO DA BASE DE CALCULO - COFINS

Campos

02 - IND_TIP_COOP - Indicador do Tipo de Sociedade Cooperativa - N { Criado o tipo TACBrIndTipCoop }

---------------------

Registro : REGISTRO M620: AJUSTES DA COFINS APURADA

Campos

02 - IND_AJ - Indicador do tipo de ajuste - C { Criado o tipo TACBrIndAJ }

04 - COD_AJ - Código do ajuste, conforme a Tabela indicada no item 4.3.8. - C { Criado o tipo TACBrCodAj }

---------------------

Registro : REGISTRO M700: COFINS DIFERIDA EM PERÍODOS ANTERIORES - VALORES A PAGAR NO PERÍODO

Campos

02 - COD_CONT - Código da contribuição social diferida em períodos anteriores, conforme a Tabela 4.3.5 - C { Criado o tipo TACBrCodCont }

03 - VL_CONT_APUR_DIFER - Valor da Contribuição Apurada, diferida em períodos anteriores - N { Criado }

04 - NAT_CRED_DESC - Natureza do Crédito Diferido, vinculado à receita tributada no mercado interno, a descontar - C { Criado o tipo TACBrNatCredDesc}

05 - VL_CRED_DESC_DIFER - Valor do Crédito a Descontar vinculado à contribuição diferida - N { Criado }

06 - VL_CONT_DIFER_ANT - Valor da Contribuição a Recolher, diferida em períodos anteriores (Campo 03 – Campo 05) - N { Criado }

---------------------

Registro : REGISTRO M800: RECEITAS ISENTAS, NÃO ALCANÇADAS PELA INCIDÊNCIA DA CONTRIBUIÇÃO, SUJEITAS A ALÍQUOTA ZERO OU DE VENDAS COM SUSPENSÃO - COFINS

Campos

02 - CST_COFINS - Código da Situação Tributária referente ao crédito de COFINS (Tabela 4.3.4) vinculado ao tipo de crédito escriturado em M500 - N { Criado o tipo TACBrSituacaoTribCOFINS }

7)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBloco_M_Class.pas

Realizado alterações para manter as definições do arquivo ACBrEPCBloco_M.pas

8)

Pasta : ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins

Arquivo : ACBrEPCBlocos.pas

Realizado implementação dos tipos nescessarios pelos blocos D, F, M.

*) Todos os arquivos postados são reformatados para melhor legibilidade.

==============================================

=> Segue desta forma por sugestão apenas o que sofreu alteração baseado no SVN da pasta "ACBR\Fontes\ACBrSPED\ACBrSPEDPisCofins".

Obrigado por seu comentário , sinta-se livre para mais só assim podemos melhorar.

Ok, estou baixando para analise e para subi-lo para o repositório.

A respeito dos Demos não ter sido escluido do SVN, foi sim vc, que tem que excluir da sua pasta principal, e ficar só com as sub-pastas.

Abraço e obrigado pela coolaboração.

Ismael.Pastori · 19 Abril, 2011

Bom dia a Todos.

Baixei as últimas correções do Componente SPED Pis/Cofins.

Criei a constante em Blocos e o Tratamento para o campo:

IND_NAT_RET

Foi setado um tipo no Blocos com as seguintes opções:

Indicador de Natureza da Retenção na Fonte:

01 - Retenção por Órgãos, Autarquias e Fundações Federais

02 - Retenção por outras Entidades da Administração Pública Federal

03 - Retenção por Pessoas Jurídicas de Direito Privado

04 - Recolhimento por Sociedade Cooperativa

05 - Retenção por Fabricante de Máquinas e Veículos

99 - Outras Retenções

Segue em anexo a correção.

Abraço

ACBrCorrecao.rar

Ismael.Pastori · 19 Abril, 2011

Bom dia, novamente...

Percebi que o post anterior eu deixei meio incompleto.

Estou mexendo no Bloco F:

No registro F600 Criei a constante para o campo: IND_NAT_RET;

No registro F700 Criei duas constantes para os campos: IND_ORI_DED, IND_NAT_DED;

Bom agora está correto.

Desconsiderar o anexo acima, está as duas alterações nesse arquivo.

Valeu

ACBr_BlocoF_F600_F700_Alteracao.rar

Isaque Pinheiro · 19 Abril, 2011

Bom dia, novamente...

Percebi que o post anterior eu deixei meio incompleto.

Estou mexendo no Bloco F:

No registro F600 Criei a constante para o campo: IND_NAT_RET;

No registro F700 Criei duas constantes para os campos: IND_ORI_DED, IND_NAT_DED;

Bom agora está correto.

Desconsiderar o anexo acima, está as duas alterações nesse arquivo.

Valeu

OK, obrigado e atualizado.

wrgoncalves2008 · 5 Maio, 2011

Olá pessoal, estive dando uma olhada no post e pelo que vi voces trabalharam bastante!!

Gostaria de saber qual a situacao atual do componente, ele ja está ok? ou necessita de alguns ajustes?

Talvez eu posso ajudar com alguma coisa...

Obrigado.

francinaldoac · 13 Maio, 2011

Olá,

Estou com dois problemas no componente do SPED PIS/COFINS:

1 - O registro 0111 está retornando o velho erro de acesso a memória quando usado, verifiquei que o objeto não está sendo criado, fiz a correção temporária, implementando o create do registro pai o 0110.

constructor TRegistro0110.Create;

begin

  FRegistro0111 := TRegistro0111.Create;

end;


destructor TRegistro0110.Destroy;

begin

  FRegistro0111.Free;

  inherited;

end;

2 - o campo SUFRAMA do registro 0140 está gravando "000000000" mesmo quando informado em branco, verifiquei que o problema está na procedure TBloco_0.WriteRegistro0140, substitui o código LFill( SUFRAMA, 9 ) por LFill( SUFRAMA ) para resolver.

Mais uma vez parabenizo todos do ACBr por esse novo componente.

Isaque Pinheiro · 15 Maio, 2011

Olá pessoal, estive dando uma olhada no post e pelo que vi voces trabalharam bastante!!

Gostaria de saber qual a situacao atual do componente, ele ja está ok? ou necessita de alguns ajustes?

Talvez eu posso ajudar com alguma coisa...

Obrigado.

Ola, no momento precisamos de testes.

Abs

Isaque Pinheiro · 15 Maio, 2011

Olá,

Estou com dois problemas no componente do SPED PIS/COFINS:

1 - O registro 0111 está retornando o velho erro de acesso a memória quando usado, verifiquei que o objeto não está sendo criado, fiz a correção temporária, implementando o create do registro pai o 0110.
constructor TRegistro0110.Create;

begin

  FRegistro0111 := TRegistro0111.Create;

end;


destructor TRegistro0110.Destroy;

begin

  FRegistro0111.Free;

  inherited;

end;[/code]


2 - o campo SUFRAMA do registro 0140 está gravando "000000000" mesmo quando informado em branco, verifiquei que o problema está na procedure TBloco_0.WriteRegistro0140, substitui o código LFill( SUFRAMA, 9 ) por LFill( SUFRAMA ) para resolver.


Mais uma vez parabenizo todos do ACBr por esse novo componente.

Ola, corrigido e já disponivel.

le_machado · 16 Maio, 2011

Bom dia,

estou desenvolvendo Sped Pis/Cofins e encontrei alguns erros e corrigi-os, seguem:

ACBrEPCBlocos.pas

-> Incluido Classe TACBrTpOperacaoReceita (Referente ao registro F100 -> IND_OPER)

ACBrEPCBlocos_F_Class.pas

-> Alterado procedure TBloco_F.WriteRegistroF100 (Linhas 414, 415, 416)

ACBrEPCBlocos_F.pas

-> Alterado Linhas 118, 142 (Onde estava TACBrTipoOperacao para a nova class TACBrTpOperacaoReceita)

ACBrEPCBlocos_D.pas

-> Incluído linhas 1217 (FRegistroF501 := TRegistroD501List.Create) e 1224 (FRegistroF501.Free)

ACBrEPC.Alteracao.rar

Isaque Pinheiro · 16 Maio, 2011

Bom dia,
estou desenvolvendo Sped Pis/Cofins e encontrei alguns erros e corrigi-os, seguem:

ACBrEPCBlocos.pas

-> Incluido Classe TACBrTpOperacaoReceita (Referente ao registro F100 -> IND_OPER)

ACBrEPCBlocos_F_Class.pas

-> Alterado procedure TBloco_F.WriteRegistroF100 (Linhas 414, 415, 416)

ACBrEPCBlocos_F.pas

-> Alterado Linhas 118, 142 (Onde estava TACBrTipoOperacao para a nova class TACBrTpOperacaoReceita)

ACBrEPCBlocos_D.pas

-> Incluído linhas 1217 (FRegistroF501 := TRegistroD501List.Create) e 1224 (FRegistroF501.Free)

Muito obrigado por sua colaboração, subo ainda hoje para o SVN.

Abs

Mark Apollo · 16 Maio, 2011

Olá,

Isaque,

No outro post sobre o PisCofins tem algumas alterações feitas por mim, poderia aproveitar e subi-las também.

francinaldoac · 17 Maio, 2011

Olá,

Encontrei um erro no registro A170, o campo NUM_ITEM estava gravando valor diferente do informado, o problema estava na procedure TBloco_A.WriteRegistroA170 da unit ACBrEPCBloco_A_Class:

No código estava

LFill(NUM_ITEM)

e a função estava considerando o campo como datetime. Alterei para

LFill(NUM_ITEM, 0)

agora está OK.

Segue unit em anexo.

[]´s

Francinaldo

ACBrEPCBloco_A_Class.pas

Isaque Pinheiro · 17 Maio, 2011

Olá,

Encontrei um erro no registro A170, o campo NUM_ITEM estava gravando valor diferente do informado, o problema estava na procedure TBloco_A.WriteRegistroA170 da unit ACBrEPCBloco_A_Class:

No código estava
LFill(NUM_ITEM)
e a função estava considerando o campo como datetime. Alterei para
LFill(NUM_ITEM, 0)
agora está OK.

Segue unit em anexo.

[]´s

Francinaldo

Implementações colocadas aqui, já estão no SVN, obrigado a todos por suas colaborações.

Abraço

le_machado · 17 Maio, 2011

Alteração referente ao registro0111 que seguindo o guia pratico e o PVA do PIS e COFINS somente deve ser gerado se a tag no reigstro0110.IND_APRO_CRED = 2;

Feito a seguinte verificação: if IND_APRO_CRED = indMetodoDeRateioProporcional then (Linha 467);

ACBrEPCBloco_0_Class.pas

Isaque Pinheiro · 17 Maio, 2011

Alteração referente ao registro0111 que seguindo o guia pratico e o PVA do PIS e COFINS somente deve ser gerado se a tag no reigstro0110.IND_APRO_CRED = 2;

Feito a seguinte verificação: if IND_APRO_CRED = indMetodoDeRateioProporcional then (Linha 467);

Opa, que bom bastante testes, já ta la.

Abs

Mark Apollo · 19 Maio, 2011

Olá, Isaque, verifique na outra thread sobre o PisCofins o arquivo que eu enviei sobre o Bloco C, baixei as atualizações hoje e não encontrei o mesmo lá!

Abraços.

Isaque Pinheiro · 20 Maio, 2011

Olá, Isaque, verifique na outra thread sobre o PisCofins o arquivo que eu enviei sobre o Bloco C, baixei as atualizações hoje e não encontrei o mesmo lá!

Abraços.

me mostre os links de onde estão, que olho e atualizo.

Mark Apollo · 20 Maio, 2011

Isaque, segue o código que alterei, bem como o arquivo.

Quando envio uma nota cancelada o validador diz que eu não posso preencher o valor da mercadoria, logo alterei a linha 803 de

LFill( VL_MERC,0,2 )                        +

para

LFill( VL_MERC,0,2, booNFCancelada )        +

alterei também a procedure de escrita do registro C170, pois aqui o validador diz que, ou eu informo o valor de base e aliquota, ou informo o valor em quantidade, logo deixei a procedure WriteRegistroC170(linha 1102) desta forma:

{28} DFill( QUANT_BC_PIS,3,true )  +

{29} DFill( ALIQ_PIS_R,4,true )    +

{30} LFill( VL_PIS,0,2 )           +

{31} LFill( strCST_COFINS )        +

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

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

{34} DFill( QUANT_BC_COFINS,3,true )+

{35} DFill( ALIQ_COFINS_R,4,true ) +

se tiver que postar em outro lugar, ou caso tenham outra solução estou a disposição, no mais, o que eu puder ajudar, estarei por aqui.

Isaque Pinheiro · 21 Maio, 2011

Isaque, segue o código que alterei, bem como o arquivo.

Quando envio uma nota cancelada o validador diz que eu não posso preencher o valor da mercadoria, logo alterei a linha 803 de
LFill( VL_MERC,0,2 )                        +
para
LFill( VL_MERC,0,2, booNFCancelada )        +
alterei também a procedure de escrita do registro C170, pois aqui o validador diz que, ou eu informo o valor de base e aliquota, ou informo o valor em quantidade, logo deixei a procedure WriteRegistroC170(linha 1102) desta forma:
{28} DFill( QUANT_BC_PIS,3,true )  +

{29} DFill( ALIQ_PIS_R,4,true )    +

{30} LFill( VL_PIS,0,2 )           +

{31} LFill( strCST_COFINS )        +

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

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

{34} DFill( QUANT_BC_COFINS,3,true )+

{35} DFill( ALIQ_COFINS_R,4,true ) +

[/code]

se tiver que postar em outro lugar, ou caso tenham outra solução estou a disposição, no mais, o que eu puder ajudar, estarei por aqui.

Bom dia,


Só uma pergunta, após as alterações o validador aceitou ir sem valor? Porque o param TRUE, faz com que o campo fique vazio.


Subi, se tiver alguma observação, só me enviar, obrigado por sua contribuição.


Abs

Mark Apollo · 31 Maio, 2011

Galera, realizei uma alteração no arquivo Bloco_0_Class, pois no momento de gerar o registro 0500 não estava sendo gerado os campos COD_CTA_REF e CNPJ_EST;

segue o arquivo com a alteração.

francinaldoac · 31 Maio, 2011

Oi pessoal,

Os campos ALIQ_PIS e ALIQ_COFINS do registro C170 segundo o manual possuem tamanho 8 com 4 decimais, esse campos estavam declarados como currency, alterei para Double, conseqüentemente tive que alterar a função de formatação na procedure WriteRegistroC170, trocando o LFill por DFill.

Na unit ACBrEPCBloco_C ficou :

    

    fALIQ_PIS_PERC            : Double;                  /// Alíquota do PIS (em percentual)

    fALIQ_COFINS_PERC         : Double;                  /// Alíquota do COFINS (em percentual)


    property ALIQ_PIS_PERC    : Double                    read FALIQ_PIS_PERC    write FALIQ_PIS_PERC;

    property ALIQ_COFINS_PERC : Double                    read FALIQ_COFINS_PERC write FALIQ_COFINS_PERC;

Na unit ACBrEPCBloco_C_Class, procedure WriteRegistroC170 ficou :

              {27} DFill( ALIQ_PIS_PERC,4,true )    +

              {33} DFill( ALIQ_COFINS_PERC,4,true ) +

Grato.

ACBrSPEDPisCofins.zip

Isaque Pinheiro · 31 Maio, 2011

Galera, realizei uma alteração no arquivo Bloco_0_Class, pois no momento de gerar o registro 0500 não estava sendo gerado os campos COD_CTA_REF e CNPJ_EST;

segue o arquivo com a alteração.

Valeu, já no SVN

Abs

Isaque Pinheiro · 31 Maio, 2011

Oi pessoal,

Os campos ALIQ_PIS e ALIQ_COFINS do registro C170 segundo o manual possuem tamanho 8 com 4 decimais, esse campos estavam declarados como currency, alterei para Double, conseqüentemente tive que alterar a função de formatação na procedure WriteRegistroC170, trocando o LFill por DFill.

Na unit ACBrEPCBloco_C ficou :
    

    fALIQ_PIS_PERC            : Double;                  /// Alíquota do PIS (em percentual)

    fALIQ_COFINS_PERC         : Double;                  /// Alíquota do COFINS (em percentual)


    property ALIQ_PIS_PERC    : Double                    read FALIQ_PIS_PERC    write FALIQ_PIS_PERC;

    property ALIQ_COFINS_PERC : Double                    read FALIQ_COFINS_PERC write FALIQ_COFINS_PERC;[/code]




Na unit ACBrEPCBloco_C_Class, procedure WriteRegistroC170 ficou :



[code]              {27} DFill( ALIQ_PIS_PERC,4,true )    +

              {33} DFill( ALIQ_COFINS_PERC,4,true ) +
Grato.

Quando for expecificado tamanho e decimais, não pode ser Double, porque a função que recebe tipo Double, tem tamanho infinito, só podemos parametrizar decimais.

Para corrigir tem que ser o Tipo Currency e parametrizar corretamente:

LFill( ALIQ_PIS_PERC,8,4 )

LFill( ALIQ_COFINS_PERC,8,4)

Faz um teste ai

Vou ajustar e subir

Entrar

Sobre nós...

ACBrSPEDPisCofins

Recommended Posts

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Crie uma conta ou entre para comentar

Criar uma conta

Entrar

Sobre nós...

Informação Importante