Ir para conteúdo
  • Cadastre-se

dev botao

Recommended Posts

  • Consultores
Postado

Olá pessoal,

Foi enviado ao SVN na Rev-36697 a alteração da classe TinfoIRComplem do S-5002, que passou a ser uma TCollection devido a mudança do leiaute 1.3.
Até a versão anterior, o número máximo de ocorrências era 1 e passou a ser 13, conforme destacado abaixo.

image.png

Segue exemplo de mudança de tratamento a ser feita, caso sua aplicação esteja considerando o retorno desta classe:

De:

var
  dtLaudo: TDateTime;
begin  
  dtLaudo := IdeTrabalhador.infoIRComplem.dtLaudo;
.
.
.

Para:

var
  i: Integer;
  dtLaudo: TDateTime;
begin  
  for i:=0 to IdeTrabalhador.infoIRComplem.Count - 1 do
  begin 
    dtLaudo := IdeTrabalhador.infoIRComplem.Items[i].dtLaudo;
    .
    .
    .
  end;  
.
.
.

Até mais!!!

image.png.c66a8e350a15080739793c08a9f4af

  • Curtir 3
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...