FUNCTION_BLOCK FB_SoEReadCommandState_ByDriveRef
Mit dem Funktionsbaustein FB_SoEReadCommandState_ByDriveRef kann die Kommandoausführung überprüft werden.
VAR_INPUT
VAR_INPUT
stDriveRef : ST_DriveRef;
Idn : WORD;
bExecute : BOOL;
tTimeout : TIME := DEFAULT_ADS_TIMEOUT;
END_VAR
stDriveRef: Die Referenz auf den Antrieb kann im System Manager direkt in die SPS gelinkt werden. Hierzu muss eine Instanz der ST_PlcDriveRef verwendet werden und die NetID vom Bytearray in einen String konvertiert werden. Siehe ST_DriveRef.
Idn: Parameternummer, auf das sich das FB_SoEReadCommandState_ByDriveRef bezieht, z.B. "P_0_IDN + 160" für P-0-0160
bExecute: Über eine positive Flanke an diesem Eingang wird der Baustein aktiviert.
tTimeout: Maximale Zeit, die bei der Ausführung des Funktionsbausteins nicht überschritten werden darf.
VAR_OUTPUT
VAR_OUTPUT
bBusy : BOOL;
bError : BOOL;
eCmdState : E_SoE_CmdState;
iAdsErrId : UINT;
iSercosErrId : UINT;
END_VAR
bBusy: Dieser Ausgang wird bei der Aktivierung des Funktionsbausteins gesetzt und bleibt gesetzt, bis eine Rückmeldung erfolgt.
bError: Dieser Ausgang wird, nachdem der bBusy-Ausgang zurückgesetzt wurde, gesetzt, sollte ein Fehler bei der Übertragung des Kommandos erfolgen.
iAdsErrId: Liefert bei gesetztem bError-Ausgang den ADS-Fehlercode des zuletzt ausgeführten Befehles
iSercosErrId: Liefert bei gesetztem bError-Ausgang den Sercos-Fehler des zuletzt ausgeführten Befehles
dwAttribute: Liefert das Attribut des Sercos-Parameters.
eCmdState: Liefert den Kommandostatus
eSoE_CmdState_NotSet =
0
- kein Kommando aktiv
eSoE_CmdState_Set =
1
- Kommando gesetzt (vorbereitet) aber (noch) nicht ausgeführt
eSoE_CmdState_Executed =
2
- Kommando wurde ausgeführt
eSoE_CmdState_SetEnabledExecuted =
3 - Kommando gesetzt (vorbereitet) und
ausgeführt
eSoE_CmdState_SetAndInterrupted =
5 - Kommando wurde gesetzt aber
unterbrochen
eSoE_CmdState_SetEnabledNotExecuted = 7 -
Kommandoausführung ist noch aktiv
eSoE_CmdState_Error =
15
- Fehler bei der Kommandoausführung, es wurde in den Fehlerstate
gewechselt
Beispiel
fbReadCommandState : FB_SoEReadCommandState_ByDriveRef;
bReadCommandState : BOOL;
nIdn : WORD;
eCmdState : E_SoE_CmdState;
stPlcDriveRef AT %I* : ST_PlcDriveRef;
stDriveRef : ST_DriveRef;
IF bInit THEN
stDriveRef.sNetId := F_CreateAmsNetId(stPlcDriveRef.aNetId);
stDriveRef.nSlaveAddr := stPlcDriveRef.nSlaveAddr;
stDriveRef.nDriveNo := stPlcDriveRef.nDriveNo;
stDriveRef.nDriveType := stPlcDriveRef.nDriveType;
IF (stDriveRef.sNetId <> '') AND (stDriveRef.nSlaveAddr <> 0) THEN
bInit := FALSE;
END_IF
END_IF
IF bReadCommandState AND NOT bInit THEN
nIdn := P_0_IDN + 160;
fbReadCommandState(
stDriveRef := stDriveRef,
bExecute := TRUE,
tTimeout := DEFAULT_ADS_TIMEOUT,
nIdn := nIdn,
eCmdState => eCmdState
);
IF NOT fbReadCommandState.bBusy THEN
fbReadCommandState(stDriveRef := stDriveRef, bExecute := FALSE);
bReadCommandState := FALSE;
END_IF
END_IF