TAG infoRegimeTrab no S-2206

[paulosilva0306]

Boa tarde a todos!

Estava tendo um erro no envio do S-2206 referente a TAG infoRegimeTrab, conforme link e fiz o ajuste no pcesS2206.pas e no pcesConversaoeSocial.pas para que o erro fosse sanado.

Links de correções:

eSocial versão S-1.2 - Leiautes (www.gov.br)

eSocial versão S-1.2 - Leiautes (www.gov.br)

Segue arquivos com devidas alterações:

pcesConversaoeSocial.pas pcesS2206.pas

Editado 2 Maio por paulosilva0306
Enviei incompleto!

[Renato Rubinho]

Obrigado pela contribuição. 

Criada TK-5396 para análise.

[Andergoncalves]

Bom dia @paulosilva0306.

Obrigado pela contribuição. Vi que foi alterado uma validação do pcesS2206, gostaria de perguntar a você se foram feitos testes de schema e envio do xml para o eSocial?

No caso do regime existe outros que podem ser que se problema.

 

Neste caso ele somente gerava a tag InfoEstatutario se tipo de regime fosse do tipo "rpRPPS".

Obrigado

 

[Renato Rubinho]

Boa noite,

Obrigado pela contribuição.
Sua contribuição faz sentido, sendo que a regra de geração era atribuida somente ao InfoEstatutario ao invés do grupo infoRegimeTrab, conforme indica o manual.
Enviado ao SVN na Rev-33538
Por favor atualize os fontes, reinstale os componentes, verifique se o problema foi resolvido e, se possível, nos informe se foi o resultado esperado.
 

[paulosilva0306]

Top de mais! Obrigado!

[EdmarFrazao]

Tive problema com esta tag

Ela é obrigatória no meu caso com

TpRegPrev := rpRGPS; //1

TpRegTrab := trCLT;

Veja que a regra e Não para  TpRegPrev = ,1,3,4 e  tpRegTrab=2 e gerar para os outros casos

 

e não esta gerando

[EdmarFrazao]

Creio que deveria ser assim

  if (
     (objAltContratual.Vinculo.tpRegPrev = rpRGPS)   or   //1
     (objAltContratual.Vinculo.tpRegPrev = rpRPPE)   or  //3
     (objAltContratual.Vinculo.tpRegPrev = rpSPSMFA)     //4
     )
     and
     (objAltContratual.Vinculo.tpRegTrab=trEstatutario) then
     //não gera
  else
   begin
     Gerador.wGrupo('infoRegimeTrab');

     if objAltContratual.Vinculo.infoRegimeTrab.InfoCeletista.cnpjSindCategProf <> '' then
       GerarInfoCeletista(objAltContratual.Vinculo.infoRegimeTrab.InfoCeletista)
     else
       GerarInfoEstatutario(objAltContratual.Vinculo.infoRegimeTrab.InfoEstatutario);

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

 

pcesS2206.pas

[Renato Rubinho]

1 hora atrás, EdmarFrazao disse:

Creio que deveria ser assim

Obrigado pela contribuição. 

Criada TK-5396-1 para análise

[Renato Rubinho]

7 horas atrás, EdmarFrazao disse:

Ela é obrigatória no meu caso com

TpRegPrev := rpRGPS; //1

TpRegTrab := trCLT;

Veja que a regra e Não para  TpRegPrev = ,1,3,4 e  tpRegTrab=2 e gerar para os outros casos

Você tem razão, não basta considerar apenas o tpRegPrev

7 horas atrás, EdmarFrazao disse:

Creio que deveria ser assim

  if (
     (objAltContratual.Vinculo.tpRegPrev = rpRGPS)   or   //1
     (objAltContratual.Vinculo.tpRegPrev = rpRPPE)   or  //3
     (objAltContratual.Vinculo.tpRegPrev = rpSPSMFA)     //4
     )
     and
     (objAltContratual.Vinculo.tpRegTrab=trEstatutario) then
     //não gera
  else
   begin

Coloquei a regra um pouco mais enxuta, mas com o mesmo resultado, conforme abaixo:
1. Gera sempre que for rpRPPS(2) 
2. Gera sempre que for tpRegTrab <> trEstatutario(2)
Obs: Como tpRegTrab e seu grupo são obrigatórios não precisei considerar o tpNenhum 

  if ((objAltContratual.Vinculo.tpRegPrev = rpRPPS) or
      (objAltContratual.Vinculo.tpRegTrab <> trEstatutario)) then
  begin
    Gerador.wGrupo('infoRegimeTrab');

    if objAltContratual.Vinculo.infoRegimeTrab.InfoCeletista.cnpjSindCategProf <> '' then
      GerarInfoCeletista(objAltContratual.Vinculo.infoRegimeTrab.InfoCeletista)
    else
      GerarInfoEstatutario(objAltContratual.Vinculo.infoRegimeTrab.InfoEstatutario);

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

Enviado ao SVN na Rev-33544

Por favor atualize os fontes, reinstale os componentes, verifique se o problema foi resolvido e, se possível, nos informe se foi o resultado esperado.
 

[EdmarFrazao]

Alteração funcionado corretamente.

[Renato Rubinho]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.