Beispiel

POE-Kopf

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
		bStart: BOOL:=FALSE;
			(*activates the function*)
		dwIncrement_value: DWORD:=16#87654320;
			(*result after a 0->1 leding
edge from start:
16#87654321*)
	END_VAR

KOP-Rumpf

Wenn die Variable bStart von FALSE auf TRUE gesetzt wird, wird die Funktion ausgeführt.

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,FP_INC_BCD!,,16,1,23,5,,?DEN?Dd?Ad?AENO);
B(B_CONTACT,,bStart,8,2,10,4,R);
B(B_VARIN,,dwIncrement_value,14,3,16,5,);
L(10,3,16,3);
L(1,3,8,3);
L(1,0,1,5);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY

ST-Rumpf

IF DF(start) then
    FP_INC_BCD(dwIncrement_value);
END_IF;