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

Link para o comentário

Compartilhar em outros sites

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Crie uma conta ou entre para comentar

Criar uma conta

Entrar

Sobre nós...

Informação Importante