Détecter les données modifiées
Cette instruction FP détecte les modifications apportées à la valeur en entrée s_Current en la comparant avec la valeur précédente sauvegardée en entrée/sortie d1_Previous. Si la nouvelle valeur d’entrée s_Current est différente de la valeur précédente, la fonction affecte la nouvelle valeur à l’entrée/sortie d1_Previous. Pour indiquer la modification, la sortie système d2 est définie sur TRUE.
Entrée
Zone de détection des modifications des données
Entrée/sortie
Zone dans laquelle les données de l’exécution précédente sont sauvegardées
Sortie
TRUE lorsqu’une modification est détectée
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
bStart: BOOL:=FALSE;
(*activates the function*)
diCurrent_value: DINT:=101;
(*value whose status
should be monitored*)
diPrevious_value: DINT:=0;
(*dummy value for storing
the former present value*)
END_VAR
La fonction est exécutée lorsque la variable bStart est définie sur TRUE.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 6 ;
NETWORK_BODY
B(B_CONTACT,,bStart,6,2,8,4,);
B(B_VARIN,,diCurrent_value,10,3,12,5,);
B(B_VARIN,,diPrevious_value,10,4,12,6,);
B(B_F,FP_DETECT_CHANGE!,,12,1,24,6,,?DEN?Ds_Current?Dd1_Previous?Ad1_Previous?AENO?Cd2);
B(B_VAROUT,,bValueChanged,24,3,26,5,);
L(1,3,6,3);
L(8,3,12,3);
L(1,0,1,6);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF bStart then
FP_DETECT_CHANGE(s_Current := diCurrent_value, d_Previous := diPrevious_value);
END_IF;