LREAL en TIME
LREAL_TO_TIME convertit une valeur du type de données LREAL en une valeur du type de données TIME. 10ms du type de données TIME correspond à une unité LREAL de 1.0, par exemple lorsque LREAL = 1.0, TIME = 10ms ; et lorsque LREAL = 100.0, TIME = 1s. La valeur du type de données REAL est arrondie au nombre entier le plus proche pour la conversion.
Sortie
Toutes les variables d’entrée et de sortie utilisées pour programmer cette fonction ont été déclarées dans l’en-tête du POU. Le même en-tête de POU est utilisé pour tous les langages de programmation.
VAR
lrValue: LREAL:=5.983e5;
bStart: BOOL:=FALSE;
tResult: TIME:=T#0s;
END_VAR
La fonction est exécutée lorsque la variable bStart est définie sur TRUE.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 6 ;
NETWORK_BODY
B(B_CONTACT,,bStart,3,2,5,4,);
B(B_F,E_LREAL_TO_TIME!,,10,1,19,5,,?DEN?Da_LReal?AENO?C);
B(B_VARIN,,lrValue,8,3,10,5,);
B(B_VAROUT,,tResult,19,3,21,5,);
L(1,0,1,6);
L(1,3,3,3);
L(5,3,10,3);
END_NETWORK_BODY
END_NET_WORK
END_BODY
if (bStart) then
tResult:=LREAL_TO_TIME(lrValue);
end_if;