FB_SoEReadDcBusCurrent

FB_SoEReadDcBusCurrent 1:

Mit dem Funktionsbaustein FB_SoEAX5000ReadDcBusCurrent kann der DC-Bus-Strom
(S-0-0381) eingelesen werden.

FB_SoEReadDcBusCurrent 2: Eingänge

VAR_INPUT
    sNetId   : T_AmsNetId := '';
    bExecute : BOOL;
    tTimeout : TIME := DEFAULT_ADS_TIMEOUT;
END_VAR

Name

Typ

Beschreibung

sNetId

T_AmsNetId

String, der die AMS-Netzwerkkennung des PCs enthält (Typ: T_AmsNetId).

bExecute

BOOL

Der Baustein wird über eine positive Flanke an diesem Eingang aktiviert.

tTimeout

TIME

Maximale Zeit, die bei der Ausführung des Funktionsbausteins nicht überschritten werden darf.

FB_SoEReadDcBusCurrent 3: Ein-/Ausgänge

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

Name

Typ

Beschreibung

Axis

NCTOPLC_AXIS_REF

Achsdatenstruktur vom Typ NCTOPLC_AXIS_REF

FB_SoEReadDcBusCurrent 4: Ausgänge

VAR_OUTPUT
    bBusy         : BOOL;
    bError        : BOOL;
    iAdsErrId     : UINT;
    iSercosErrId  : UINT;
    fDcBusCurrent : REAL;
    dwAttribute   : DWORD;
END_VAR

Name

Typ

Beschreibung

bBusy

BOOL

Dieser Ausgang wird bei der Aktivierung des Funktionsbausteins gesetzt und bleibt gesetzt, bis eine Rückmeldung erfolgt.

bError

BOOL

Dieser Ausgang wird gesetzt, nachdem der bBusy-Ausgang zurückgesetzt wurde, wenn ein Fehler bei der Übertragung des Kommandos auftritt.

iAdsErrId

UINT

Liefert bei gesetztem bError-Ausgang den ADS-Fehlercode des zuletzt ausgeführten Befehls.

iSercosErrId

UINT

Liefert bei gesetztem bError-Ausgang den Sercos-Fehler des zuletzt ausgeführten Befehls.

fDcBusCurrent

REAL

Liefert das Attribut des Sercos-Parameters.

dwAttribute

DWORD

Liefert den DC-Bus-Strom (z. B. 2.040 entspricht 2.040 A).

Beispiel

fbReadDcBusCurrent : FB_SoEReadDcBusCurrent_ByDriveRef;
bReadDcBusCurrent : BOOL;
fDcBusCurrent : REAL;
(* NcAxis *)
NcToPlc AT %I* : NCTOPLC_AXIS_REF; 

IF bReadDcBusCurrent THEN
 fbReadDcBusCurrent(
    Axis := NcToPlc,
    bExecute := TRUE,
    tTimeout := DEFAULT_ADS_TIMEOUT,
    fDcBusCurrent=>fDcBusCurrent
 );
 IF NOT fbReadDcBusCurrent.bBusy THEN
    fbReadDcBusCurrent(Axis := NcToPlc, bExecute := FALSE);
    bReadDcBusCurrent := FALSE;
 END_IF
END_IF