Wochentag liefern
DAY_OF_WEEK0 liefert den Wochentag für ein beliebiges Datum als INT-Wert. Die Zahl 0 entspricht Sonntag, 6 entspricht Samstag.
Eingang
Datum
Ausgang
0 (Sonntag) – 6 (Samstag)
Im POE-Kopf werden alle Ein- und Ausgangsvariablen deklariert, die für die Programmierung dieser Funktion verwendet werden. Für alle Programmiersprachen wird der gleiche POE-Kopf verwendet.
VAR
DATE_value: DATE:=D#2014-04-20;
iDAY_OF_WEEK_value: INT:=0;
END_VAR
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 5 ;
NETWORK_BODY
B(B_F,DAY_OF_WEEK0!,,9,2,18,4,,?D?C);
B(B_VARIN,,DATE_value,7,2,9,4,);
B(B_VAROUT,,iDAY_OF_WEEK_value,18,2,20,4,);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
Der Wert iDAY_OF_WEEK_value = 0 entspricht Sonntag.
Wenn Sie einen Offset von fünf Tagen benötigen, z.B. 5 entspricht Sonntag:
iDAY_OF_WEEK_value := DAY_OF_WEEK0(DATE_value);
(* if you want a time offset of 5 days, e.g. Sunday corresponds to 5 *)
iDAY_OF_WEEK_value := DAY_OF_WEEK0(DATE_value )+ 5 MOD 7;