FB_SoEReadDiagNumberList

VAR_INPUT

VAR_INPUT
    sNetId        : T_AmsNetId := '';
    bExecute      : BOOL;
    tTimeout      : TIME := DEFAULT_ADS_TIMEOUT;
    piDiagNumber  : POINTER TO ST_SoE_DiagNumList;
    iSize         : UDINT;
END_VAR

sNetId: Ist ein String, der die AMS-Netzwerkkennung des PCs enthält.

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.

piDiagNumber: Zeiger auf Liste der letzten max. 30 Fehlernummern. Die Liste besteht aus aktueller und maximaler Anzahl von Bytes in der Liste, sowie den 30 Listeneinträgen

iSize: Größe der Liste in Bytes (als Sizeof())

VAR_IN_OUT

VAR_IN_OUT
    Axis : NCTOPLC_AXLESTRUCT;(* reference to NC axis *)
END_VAR

Axis: Achsstruktur

VAR_OUTPUT

VAR_OUTPUT
    bBusy         : BOOL;
    bError        : BOOL;
    iAdsErrId     : UINT;
    iSercosErrId  : UINT;
    dwAttribute   : DWORD;
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 einem gesetzten bError-Ausgang den ADS-Fehlercode des zuletzt ausgeführten Befehles

iSercosErrId: Liefert bei einem gesetzten bError-Ausgang den Sercos-Fehler des zuletzt ausgeführten Befehles

dwAttribute: Liefert das Attribut des Sercos-Parameters.

Beispiel

fbDiagNumberList     : FB_SoEReadDiagNumberList;
bDiagNumberList      : BOOL;
stDiagNumberList     :ST_SoE_DiagNumList;

(* NcAxis *)
stNcToPlc AT %I* : NCTOPLC_AXLESTRUCT;
IF bDiagNumberList  THEN
    fbDiagNumberList(
        Axis     := stNcToPlc,
        bExecute := TRUE,
        tTimeout := DEFAULT_ADS_TIMEOUT,
        piDiagNumber:= ADR(stDiagNumberList),
        iSize := SIZEOF(stDiagNumberList),
    );
    IF NOT fbDiagNumberList.bBusy THEN
        fbDiagNumberList(Axis := stNcToPlc, bExecute := FALSE);
        bDiagNumberList := FALSE;
    END_IF
END_IF