Erro retorno S-3000 no evento S-5003 quando excluído evento S-1200

[Hudson G Leite]

Olá, boa tarde.

Quando solicitado a exclusão de evento S-1200 por meio do registro S-3000 existe os retornos S5001, S5003.

o erro relacionado está na tag <tpLotacao> na checagem "(StrToInt(InfoFGTS.IdeEstab.Items[i].IdeLotacao.Items[j].tpLotacao) in [2, 3, 4, 5, 6, 7, 8, 9])"

conforme o layout (Versão S-1.1 (consolidada até NT nº 01/2023) - implantação 16/01/2023 a tag <tpLotacao> será retornada se origem seja S-1200, S-2299, S-2399

adicionado um novo tratamento antes da checagem do tipoLotacao. Segue unit alterada para avaliação. Obrigado!

pcesS5003.pas

[Hudson G Leite]

Adicionando os arquivos relativos aos eventos S-5001 e S-5003

 

ID1017573510000002023071416190837676-S5003.xml ID1017573510000002023071416190837676-S5001.xml

[Alexandre de Paula]

Bom dia,

Criada a TK-4208 para avaliação da contribuição.

Obrigado

[Alexandre de Paula]

Boa tarde.

SVN atualizado na Rev. 30227. Por favor, atualize seus fontes, reinstale os compontentes e faça novos testes.

Obrigado!