Bom dia pessoal.
Estava com um erro no envio do evento S-2206 do eSocial, aonde esse erro impedia de levar o seguinte valor: *pInfoEstatutario.indAbonoPerm* na *unit pcesS2206*.
Após realizar uma alteração, o envio se deu correto. Irei compartilhar aqui a unit com as correções:
procedure TEvtAltContratual.GerarAltContratual(objAltContratual: TAltContratual);
begin
Gerador.wGrupo('altContratual');
Gerador.wCampo(tcDat, '', 'dtAlteracao', 10, 10, 1, objAltContratual.dtALteracao);
Gerador.wCampo(tcDat, '', 'dtEf', 10, 10, 0, objAltContratual.dtEf);
Gerador.wCampo(tcStr, '', 'dscAlt', 1, 150, 0, objAltContratual.dscAlt);
if VersaoDF <= ve02_05_00 then
GerarVinculo(objAltContratual.Vinculo, 3)
else
begin
Gerador.wGrupo('vinculo');
Gerador.wCampo(tcStr, '', 'tpRegPrev', 1, 1, 1, eSTpRegPrevToStr(objAltContratual.vinculo.tpRegPrev));
end;
Gerador.wGrupo('infoRegimeTrab');
if objAltContratual.infoRegimeTrab.InfoCeletista.cnpjSindCategProf <> '' then
//GerarInfoCeletista(objAltContratual.infoRegimeTrab.InfoCeletista) //#Paulo Silva - alteração
GerarInfoCeletista(objAltContratual.Vinculo.infoRegimeTrab.InfoCeletista) //#Paulo Silva - alteração
else
if(objAltContratual.FVinculo.tpRegPrev = rpRPPS)then
//GerarInfoEstatutario(objAltContratual.infoRegimeTrab.InfoEstatutario); //#Paulo Silva - alteração
GerarInfoEstatutario(objAltContratual.Vinculo.infoRegimeTrab.InfoEstatutario); //#Paulo Silva - alteração
Gerador.wGrupo('/infoRegimeTrab');
GerarInfoContrato(objAltContratual.InfoContrato, 3, objAltContratual.infoRegimeTrab.InfoCeletista);
if VersaoDF > ve02_05_00 then
Gerador.wGrupo('/vinculo');
Gerador.wGrupo('/altContratual');
end;
pcesS2206.pas