Atualização Layout eSocial S1010 campo CodIncFGTS

[ledware]

Bom dia Pessoal.
Aos moderadores do grupo, peço a gentileza que atualizem a unit pcesConcersaoeSocial:

linha 271
tpCodIncFGTS            = (cdfNaoeBasedeCalculo, cdfBasedeCalculoFGTS, cdfBasedeCalculoFGTS13Sal, cdfBasedeCalculoFGTSRescisorio, cdfIncidenciadecisaoJudicialFGTSMensal, cdfIncidenciadecisaoJudicialFGTS13Sal, cdfIncidenciadecisaoJudicial);

a partir da linha 1934

function eSCodIncFGTSToStr(const t:tpCodIncFGTS ): string;
begin
  result := EnumeradoToStr2(t,[ '00', '11', '12', '21', '91', '92', '93' ] );  //--adicionado índice 92 e 93
end;

function eSStrToCodIncFGTS(var ok: boolean; const s: string): tpCodIncFGTS;
begin
  result := tpCodIncFGTS( StrToEnumerado2(ok , s,[ '00', '11', '12', '21', '91', '92', '93' ] )); //--adicionado índice 92 e 93
end;

Obs: Layout em anexo, pagina 14.

Obrigado.

 

03 - Leiautes do eSocial v. S-1.0 (cons. até NT 03.2021).pdf

[Juliana Tamizou]

Boa tarde,

Poderia por favor anexar o pas alterado.

At.

[ledware]

Boa tarde.
Sim.

pcesConversaoeSocial.pas

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

TK-2178

[EMBarbosa]

Em 10/12/2021 at 15:26, ledware disse:

Boa tarde.
Sim.

pcesConversaoeSocial.pas 121 kB · 2 downloads

Muito obrigado pela contribuição.
Fiz a implementação baseada nela.
Subi as alterações para o SVN na Revisão  24040.
Pelo que vi está tudo certo.
Queira por favor atualizar, testar e reportar qualquer problema.

Mais uma vez obrigado.

[ledware]

Bom dia.
Tudo certinho.

Muito obrigado.

[Juliomar Marchetti]

Obrigado por reportar.

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