Bosch rexroth IndraWorks 15VRS Anwendungsbeschreibung Seite 350

338/395
Gebäudeautomatisierung
finish: // finish
//---------------------------------------
wfinish := wfinish + 1;
(* Stopp evaluation *)
StartCallback := FALSE;
IF bAgain THEN
Test_00 := init; // Neustart
ELSE
Test_00 := end;
END_IF
end: // exit
//---------------------------------------
FB_SendCOVnotification(xExecute:=FALSE);
(* Un-registering the FB at the own BACnet server *)
FB_SendCOVnotification.UnregisterFromServer();
(* remove the callback *)
BACnetStatus := BACnet_Server.UnregisterHook(
BACnet.CmpBACnet.IEC_BACNET_CB_TYPE.CB_CONF_COV_NOTIFICATION,
FB_CB_Conf_COV_Notification );
IF BACnetStatus = BACnet.CmpBACnet.IEC_BACNET_STATUS.BACNET_STATUS_OK THEN
(* success message *)
ELSE
(* error message *)
END_IF
Test_00 := stop;
error: // error
//---------------------------------------
Test_00 := finish;
bAgain := FALSE;
stop: // exit
//---------------------------------------
END_CASE
(* ############### ENDE USER ############### *)
(* *********************************************************************** *)
IF StartCOV THEN
(* call Function Block *)
FB_SendCOVnotification(
xExecute := TRUE,
xAbort := FALSE,
dwTargetDeviceNumber := COVTargetDeviceNumber,
// DWORD : DeviceId of the addressed device in the BACnet network
//pTargetDeviceAddress := 0,
// [Optional:] POINTER TO IEC_BACNET_ADDRESS : Device address of the
// addressed device in the BACnet network.
// If an address is set here, the dwTargetDeviceNumber is ignored.
xSubscribe := COVSubscribe,
xIssueConfirmedNotifications := TRUE,
lifetime := 3600, // IEC_BACNET_UNSIGNED: Lifetime of COV notifications in seconds
//
// Object type to be observed
//monitoredObjType := BACnet.CmpBACnet.IEC_BACNET_OBJECT_TYPE.OBJ_ANALOG_INPUT,
//monitoredObjType := BACnet.CmpBACnet.IEC_BACNET_OBJECT_TYPE.OBJ_ANALOG_OUTPUT,
//monitoredObjType := BACnet.CmpBACnet.IEC_BACNET_OBJECT_TYPE.OBJ_BINARY_INPUT,
//monitoredObjType := BACnet.CmpBACnet.IEC_BACNET_OBJECT_TYPE.OBJ_BINARY_OUTPUT,
monitoredObjType := COVObjectType, // or ... 0 = AI, 1 = AO, 2 = AV, 3 = BI, 4 = BO, 5 = BV
monitoredObjInst := COVObjectInstance
// IEC_BACNET_DWORD :
(* at SendCOV Property *)
//monitoredPropID := 85,
//monitoredPropIndex := 0,
//covIncrement := 0.5
Bosch Rexroth AG R911393282_Ausgabe 05
// BOOL : Rising edge: starts the FB execution
// BOOL : TRUE: Abort of the FB-Operation
// BOOL : TRUE: registers or renews the COV subscription.
// FALSE: delete the COV Subscription.
//
(0 = infinite)
Object instance of the object to be observed
// IEC_BACNET_PROPERTY_ID : PROP_PRESENT_VALUE = 85
// IEC_BACNET_SIGNED : Property-Index, which is to be observed
// IEC_BACNET_REAL : COV increment for the COV notifications
//Exit FB cleanly
(TRUE) "confirmed" *
IndraWorks 15VRS Feldbusse
// (FALSE) "unconfirmed" COV message