Erro Evento S-2299

[Paulo Aguiar Junior]

Boa tarde, está ocorrendo um erro na geração desse evento no momento de percorrer o zCount: "List index out of bounds".

Embora a ocorrência na versão 2.4.1 seja obrigatória, quando não está atribuído ocorre esse erro e não chega nem na validação do Schema...

Alterado de:

zCount := StrToInt(IfThen((VersaoDF = ve02_04_01), '1', IntToStr(obj.Count)));

Para: 

zCount := StrToInt(IfThen((VersaoDF = ve02_04_01) and (obj.Count > 0), '1', IntToStr(obj.Count)));

 

 

pcesS2299.pas

[Italo Giurizzato Junior]

Bom dia Paulo,

Refiz a geração do grupo <consigFGTS> acredito que da forma que esta agora ficou melhor.

Ainda hoje vou enviar para o repositório.