Correção Método
Prezados Alunos
Boa tarde! Espero que estejam bem
Estou enviando o modelo com o método corrigido.
is
linha:integer;
do
linha:=Prod.YDim+1;
Prod[1,linha]:=@.name;
Prod[2,linha]:=linha;
Prod[3,linha]:=(eventController.SimTime);
Prod[5,linha]:=round(Prod[2,linha]/Itens_Embalagem,3);
if linha > 1 then
Prod[4,linha]:=Prod[3,linha]-Prod[3,linha-1];
end;
if Prod[5,linha] = round(Prod[5,linha],0) then
Prod[6,linha]:=Prod[5,linha];
else
Prod[6,linha]:=VOID;
end;
Prod[6,1]:=Prod.max({6,1}..{6,*});
end;
Anexo o arquivo do modelo, na sequência envio o vídeo com a correção
Peço desculpas pelo contratempo. É a idade
Abraços e ótimo final de semana
Clique no link Modelo_Corrigido.spp para ver o arquivo.