Ajuste no campo tpRegJor e natAtividade

[Joceandro Perin]

Boa tarde galera

O campo natAtividade dos eventos S-2200 e S-2206 está setando o valor incorreto, verifiquei aqui que está pegando o ord da tipagem e somando mais um, se eu passar navUrbano, ele sempre seta navRural.. Acredito que esse problema começou a ocorrer depois da inclusão da opção navNaoInformar na tipagem..

Ajustei os fontes para pegar a conversão, desta forma não haverá problemas..

Como estava..

Gerador.wCampo(tcStr, '', 'natAtividade', 1,  1, 1, ord(objInfoCeletista.NatAtividade) + 1);

Ajustado para...

Gerador.wCampo(tcStr, '', 'natAtividade', 1,  1, 1, eSNatAtividadeToStr(objInfoCeletista.NatAtividade));

Ajustei tbm o campo tpRegJor para seguir o mesmo padrão..

@Italo Jurisato Junior Segue os fontes para avaliação..

 

 

pcesS2206.pas

pcesS2300.pas

pcesS2306.pas

[Italo Giurizzato Junior]

Bom dia Joceandro,

Muito obrigado pela colaboração ainda hoje estarei enviando para o repositório.

[Joceandro Perin]

Peguei mais um probleminha aqui na unit pcesS2300 mesmo caso acima no campo undSalFixo, não esta pegando o valor convertido, setando a informação incorreta..

Como estava..

Gerador.wCampo(tcStr, '', 'undSalFixo', 1,   1, 1, obj.undSalFixo);

Ajustado para..

Gerador.wCampo(tcStr, '', 'undSalFixo', 1,   1, 1, eSUndSalFixoToStr(obj.undSalFixo));

@Italo Jurisato Junior Segue unit para avaliação..

 

pcesS2300.pas

[Italo Giurizzato Junior]

Boa tarde Joceandro,

Muito obrigado pela colaboração, já enviei para o repositório.