Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

REINF -> Registro 1070


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

Recommended Posts

Bom dia,

Gostaria de saber se alguém conseguiu enviar o registro 1070 (Ambiente: Homologação).

Estou com duas ocorrências:

MS1196 -> Número de processo inválido.

MS1198 -> As Informações Complementares do Processo Judicial devem ser informadas para Processo Judicial.

 

Observação.

- O registro 1000 foi enviado com sucesso.

- Alguém teria um exemplo do XML de envio 1070  (Ambiente: Homologação) para q eu possa analisar os dados utilizados nos campos 'nrProc' e 'ideProcesso'

Link to comment
Share on other sites

1 hora atrás, DiegoBrasileiro disse:

Boa tarde Sergio, também estou com o mesmo problema. 

<codResp>MS1196</codResp>

<dscResp>Número de processo inválido.

Alguém conseguiu enviar um processo válido, poderiam disponibilizar um XML?

Tente esse número de processo: 06154724520098200001

existem regras para validar o numero do processo

http://wiki.tjro.jus.br/artigos/Número_Único_do_Processo_Judicial

Link to comment
Share on other sites

35 minutos atrás, Paulo Alves N Junior disse:

Tente esse número de processo: 06154724520098200001

existem regras para validar o numero do processo

http://wiki.tjro.jus.br/artigos/Número_Único_do_Processo_Judicial

Paulo, utilizei o número sugerido como número de processo '06154724520098200001' (Conforme o DV), porém retornou as mesmas ocorrências (MS1196 - Número de processo inválido. e MS1198).

O que notei no XML de envio do registro 1070 é que na tag <nrInsc> que espera um CNPJ de 14 posições está enviando somente 8 posições (houve um corte no CNPJ que estou utilizando).

Link to comment
Share on other sites

Precisei alterar o arquivo pcnReinfR1070.pas

na procedure:

procedure TevtTabProcesso.GerarIdeProcesso(pEmp: TideProcesso);
begin
  Gerador.wGrupo('ideProcesso');

  Gerador.wCampo(tcStr, '', 'tpProc',   1,  1, 1, TpProcToStr(pEmp.tpProc));
  Gerador.wCampo(tcStr, '', 'nrProc',   1, 21, 1, pEmp.nrProc);
  Gerador.wCampo(tcStr, '', 'iniValid', 7,  7, 1, pEmp.IniValid);
  Gerador.wCampo(tcStr, '', 'fimValid', 7,  7, 0, pEmp.FimValid);

  if (Self.ModoLancamento <> toExclusao) then
  begin
    Gerador.wCampo(tcStr, '', 'indAutoria', 1, 21, 1, indAutoriaToStr(pEmp.indAutoria));


    GerarinfoSusp;
    if pEmp.tpProc = tpJudicial then  //Incluído, pois só deve gerar informações complementares de processos judiciais.(processo administrativo não pode gerar pois da erro no processamento)
      GerarDadosProcJud;
  end;

  Gerador.wGrupo('/ideProcesso');
end;

 

Link to comment
Share on other sites

  • Consultores

Boa tarde Sandro,

Favor anexar a Unit alterada para que possamos analisar e realizar o merge.

Desde já muito obrigado pela colaboração.

Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

Segue para o repositório.

pcnReinfR1070.pas

 

Mensagem que originou esta alteração:

 

 Evento: 0 Id: ID1283027706
 Cd Retorno: 1
 Descrição: ERRO
----------------------------------------------------------------------
 Ocorrencia Ret: 0 Código:MS1198
 Descrição: As Informações Complementares do Processo Judicial só devem ser informadas para Processo Judicial.
 Tipo: 1
 Localização:Registro: ideProcesso - XPATH: /Reinf/evtTabProcesso/infoProcesso/inclusao/ideProcesso

Edited by Sandro Felipe Adad
  • Like 1
Link to comment
Share on other sites

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