Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Erro Na Criação Do Registro 0180


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

Recommended Posts

Bom dia,

Na criação do ECD estou tendo o erro de "Registro/Campo não informado ou inválido" no registro 0180: IDENTIFICAÇÃO DO RELACIONAMENTO COM O PARTICIPANTE

Vendo o arquivo, parece que o ACBr não está tratando o 0180 como filho do 0150.

Em vez de gerar isto por exemplo:

|0150|5-OS2328-PFJ004|PFJ 004|00105|61064911000177||00000000000|SP|535054653118||3550308|1122|SUFRAMA|
|0180|04|15022004||
|0150|5-OS2328-PFJ005|PFJ 005|00105|||00000000000|SP|||3550308|1122|000000000|
|0180|09|15022004||

Ele está gerando isto:

|0150|5-OS2328-PFJ004|PFJ 004|00105|61064911000177||00000000000|SP|535054653118||3550308|1122|SUFRAMA|
|0150|5-OS2328-PFJ005|PFJ 005|00105|||00000000000|SP|||3550308|1122|000000000|
|0180|04|15022004||
|0180|09|15022004||

Esses exemplos fiz com o demo que vem na ACBr para SPED Contábil.

Alterando na geração do bloco 0 do exemplo para que ele crie mais um participante, assim:

    with Registro0150.New do
    begin
      COD_PART := '5-OS2328-PFJ004';
      NOME := 'PFJ 004';
      COD_PAIS := '00105';
      CNPJ := '61064911000177';
      UF := 'SP';
      IE := '535054653118';
      COD_MUN := 3550308;
      IM := '1122';
      SUFRAMA := 'SUFRAMA';
      with Registro0180.New do
      begin
        COD_REL := '04';
        DT_INI_REL := StrToDate('15/02/2004');
      end;
    end;

    with Registro0150.New do
    begin
      COD_PART := '5-OS2328-PFJ005';
      NOME := 'PFJ 005';
      COD_PAIS := '00105';
      CNPJ := '';
      UF := 'SP';
      IE := '';
      COD_MUN := 3550308;
      IM := '1122';
      SUFRAMA := '';
      with Registro0180.New do
      begin
        COD_REL := '09';
        DT_INI_REL := StrToDate('15/02/2004');
      end;
    end;

 

O que é mais estranho ainda, é que o validador não acusa erro na estrutura do arquivo! Ele simplesmente ignora esses 0180 que ficaram soltos!

Qualquer ajuda, agradeço.

 

 

 

 

Edited by Jerson Seling
Link to comment
Share on other sites

Oi boa tarde,

Eu alterei os fontes da ACBr para resolver esse problema.

Alterei os arquivos ACBrECDBloco_0, ACBrECDBloco_0_Class e ACBrSpedContabil.

Me baseei no código do I050 para fazer essa alteração: passar o registro 0180 que estava

como "irmão" do 0150, para "filho". Os registros do bloco 9 (contadores) estão OK.

 

Em anexo estão esses arquivos com as alterações. Passei o arquivo texto no validador e esse problema não ocorre mais.

Alterados.rar

Edited by Jerson Seling
Link to comment
Share on other sites

  • Consultores

Bom dia!

tu aplicou algum formatador no código e modificou muita coisa !

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

  • Consultores

Backup dos seus arquivos, revert neles , aplica suas correções testa e depois anexa novamente aqui !

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

  • 5 months later...

Passei um tempo sem mexer no SPED ECD, e os fontes que eu tinha do ACBr eram esses que eu tinha alterado e usado o formatador, por isso não tinha feito até hoje as alterações sem usar o formatador. Porém hoje atualizei o ACBr para o trunk 2 e meu projeto ficou sem esses fontes alterados. Ai alterei eles de novo só que desta vez sem o formatador. Seguem em anexo eles.

Também atualizei o Exemplo Delphi do ACBrSPEDContabil, ele não estava compilando por algumas chamadas de funções estarem desatualizadas (o método de salvar o arquivo e o preenchimento do reg I051). Adicionei também mais um registro 0150 e 0180 para visualizar melhor o problema que estava acontecendo neles e que com as alterações que fiz não ocorrem mais. Também ativei os ScrollBars dos memos do projeto para visualizar melhor os textos.

Abraços e feliz ano novo!

ACBrSPEDContabil.rar

  • Like 1
Link to comment
Share on other sites

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