Alterar S-3000 Campo opcional

[EdmarFrazao]

Quando vai excluir um Evento so pode passar CPF ou Período não os dois ao mesmo tempo.

Alguns eventos tem que passar o ideTrabalhador: CPF, NIS

Os outros Eventos o Período.

 

Linha 220

De:

      GerarIdeTrabalhador2(self.InfoExclusao.IdeTrabalhador, True)
      GerarIdeFolhaPagto(self.InfoExclusao.IdeFolhaPagto);

para:

    if self.InfoExclusao.IdeFolhaPagto.perApur=''  then
      GerarIdeTrabalhador2(self.InfoExclusao.IdeTrabalhador, True)
    else
     GerarIdeFolhaPagto(self.InfoExclusao.IdeFolhaPagto);

 

pcesS3000.pas

[Italo Giurizzato Junior]

Bom dia Edmar,

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