S-2299 Desligamentos Trabalho Intermitente ( qtdDiasInterm )

[Iuri]

Bom Dia

Nas rescisões de trabalhadores intermitentes ( categoria 111 ), é obrigatória a tag "qtdDiasInterm", mesmo que o seu valor seja zero.
Hoje o componente esta incluindo o campo "qtdDiasInterm" somente quando possui valor maior que zero.
Como o campo categoria do empregado não esta presente na classe TInfoDeslig, não posso mover o campo sempre que a categoria for 111, mesmo que esteja zerado.
Para resolver esta situação, fiz a alteração abaixo, em que se o campo "QtdDiasInterm" for -1, será informado zerado.

Arquivo pcesS2299.pas

Anterior :

  If (obj.QtdDiasInterm > 0) And (VersaoDF <> ve02_04_01) Then
     Gerador.wCampo(tcInt, '', 'qtdDiasInterm', 1,   2, 0, obj.QtdDiasInterm);

Alteração :

if (obj.QtdDiasInterm <> 0) and (VersaoDF <> ve02_04_01) then
begin
    if obj.QtdDiasInterm = -1 then   // Informar -1 na quantidade para que o campo seja informado zerado
      obj.QtdDiasInterm := 0;
    Gerador.wCampo(tcInt, '', 'qtdDiasInterm', 1,   2, 1, obj.QtdDiasInterm)
 end;

Em anexo pcesS2299.pas
Atenciosamente

pcesS2299.pas

[Alisson Souza Pereira]

.

 

Editado 1 Junho, 2018 por Alisson Souza Pereira
Erro de interpretação

[Iuri]

Boa Tarde

Se você enviar um desligamento de um funcionário com categoria 111 ( trabalho intermitente ) e este funcionário não trabalhou no mês da rescisão, e não constar a tag qtdDiasInterm = 0, ocorrerá um erro de validação pelo webservice do eSocial, pois mesmo não havendo horas trabalhadas no mês, tem que ser informada a tag qtdDiasInterm = 0.