Ir para conteúdo
  • Cadastre-se

dev botao

Erro Na Criação Do Registro 0180


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

 

 

 

 

Editado por Jerson Seling
Link para o comentário
Compartilhar em outros 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

Editado por Jerson Seling
Link para o comentário
Compartilhar em outros sites

  • 5 meses depois ...

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

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.