Beispiel FB_BACnetRM_WritePropertyEx

VAR
    fbClient : FB_BACnet_Client := (nDeviceInstance := 42,tReadCycleTime:=T#10S,nMaxParallelRequests:=255);
    fbDevice : FB_BACnetRM_Device := (Client:=fbClient);

    fbWriteEx : FB_BACnetRM_WritePropertyEx := (Client := fbClient);
    bWriteOoSEx : BOOL;
    bOutofServiceEx : BOOL; 
END_VAR
------------------------------------------------------------------
fbClient();
fbDevice();

// Write OutOfService using FB_BACnetRM_WritePropertyEx
fbWriteEx.bExecute := bWriteOoSEx;
IF fbWriteEx.bExecute THEN
    bWriteOoSEx := FALSE;
    fbWriteEx.pData:= ADR( bOutOfServiceEx ); 
    fbWriteEx.nData:= SIZEOF( bOutOfServiceEx );
    fbWriteEx.ePropID:= E_BACnet_PropertyIdentifier.PropOutOfService; 
    fbWriteEx.nObjInst:= 1;
    fbWriteEx.eObjType:= E_BACnet_ObjectType.ObjBinaryOutput;
END_IF
fbWriteEx();