Bosch rexroth IndraWorks 15VRS Anwendungsbeschreibung Seite 351

IndraWorks 15VRS Feldbusse
);
(* Evaluation done *)
IF (TRUE = FB_SendCOVnotification.xDone) THEN
(* End execution of the FB *)
FB_SendCOVnotification(xExecute := FALSE);
(* message "success" *)
(* finish *)
// ? COVState := 0;
StartCOV := FALSE;
Run_case := Run_case + 1;
END_IF
(* Evaluation busy *)
IF (TRUE = FB_SendCOVnotification.xBusy) THEN
CASE FB_SendCOVnotification.iState OF
0: // no evaluation, Reset-state
COVState := COVState + 1;
1: // Searching for the addressed device
COVState := COVState + 10;
2: // Sending the BACnet request
COVState := COVState + 100;
3: // Waiting for response to the request
COVState := COVState + 1000;
4: // Processing the response and setting the outputs
COVState := COVState + 10000;
END_CASE
END_IF
(* evaluation error *)
IF (TRUE = FB_SendCOVnotification.xError) THEN
(* End execution of the FB *)
FB_SendCOVnotification(xExecute:= FALSE);
(* error message *)
(* Error evaluation *)
// ? COVState := 0;
StartCOV := FALSE;
Test_00 := error;
END_IF
END_IF // StartCOV
(* **************************************************************************************** *)
(* for the Callback *)
(* real evaluation ... *)
IF StartCallback THEN
// either the value changes ... CovValue = old value
// or the EventCount increases ... EventCount = old value
(* get value from object *)
CovValue := FB_CB_Conf_COV_Notification.LastRealValue; // PresentValue Analog Objects
//CovValue := FB_CB_Conf_COV_Notification.LastBinaryValue; // PresentValue Binary Objects
//CovValue := FB_CB_Conf_COV_Notification.LastPropertyValue.value; // Object-Property
(* CovValue change *)
IF FB_CB_Conf_COV_Notification.LastRealValue <> CovValue THEN
(* save CovValue
CovValue := FB_CB_Conf_COV_Notification.LastRealValue;
(* stopp timer *)
Timeout(IN:=FALSE);
(* next step *)
END_IF
(* Event Count increase *)
IF FB_CB_Conf_COV_Notification.EvtCnt > EventCount THEN
(* save EventCount *)
EventCount := FB_CB_Conf_COV_Notification.EvtCnt;
(* stopp Timer *)
Timeout(IN:=FALSE);
(* next step *)
END_IF
(* Verification Timeout *)
// reset busy State ?
// finish ?
// busy State reset ?
// finish execution ?
*)
Gebäudeautomatisierung
R911393282_Ausgabe 05 Bosch Rexroth AG
339/395