SCL Fehlermeldung: "Baustein nicht korrekt"

[dinner4one]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo,

habe folgenden Source geschrieben und bekomme immer o.g. Meldung...

FUNCTION FIND_SETPOINT: VOID
VAR_INPUT
    ENBL_STEP : BOOL;
    SETP : REAL;
    SETP_ACT :REAL;
    STEP : REAL;
END_VAR
VAR_OUTPUT
    OUT_SETP : REAL;
    SETP_OK : BOOL;
END_VAR   
LABEL
  ENDE;
END_LABEL
BEGIN
//Init
//------------------------------------------------------------------------------
OUT_SETP := SETP;
SETP_OK := TRUE;
IF NOT ENBL_STEP THEN
    GOTO ENDE;
END_IF;
SETP_OK := FALSE;
//Programm
//------------------------------------------------------------------------------
IF SETP_ACT > SETP THEN
    OUT_SETP := SETP_ACT - STEP;
    IF OUT_SETP < SETP THEN
        OUT_SETP := SETP;
        SETP_OK := TRUE;
    END_IF;
ELSIF SETP_ACT < SETP THEN
    OUT_SETP := SETP_ACT + STEP;
    IF OUT_SETP > SETP THEN
        OUT_SETP := SETP;
        SETP_OK := TRUE;
    END_IF;
ELSIF SETP_ACT = SETP THEN
    OUT_SETP := SETP;
    SETP_OK := TRUE;
END_IF;
ENDE:
END_FUNCTION

Kommt der Compiler nicht mit dem Sprung klar??

Gruß d40

 

[Larry Laffer]

... du brauchst nur statt "Ende:" schreiben "Ende: ;" ... dann funktioniert es ...

--- im Programm - nicht in der Definition ---

 

[JesperMP]

Zuviel Werbung?
-> Hier kostenlos registrieren

Es sieht aus als es muss es eine instruktion nach der das Label.

Dies funktionirt:
ENDE: dummy_bool := TRUE ;

Was heisst "NOP 0" in SCL ?

edit: Nur ein ";" ist also wie ein NOP 0.

 

[derwestermann]

Streiche GOTO ENDE, setze RETURN.
Dann sparst Du Dir den GOTO-Befehl.

Oder noch besser so:

SETP_OK := FALSE;
//Programm
//------------------------------------------------------------------------------
IF ENBL_STEP THEN
 IF SETP_ACT > SETP THEN
    OUT_SETP := SETP_ACT - STEP;
    IF OUT_SETP < SETP THEN
        OUT_SETP := SETP;
        SETP_OK := TRUE;
    END_IF;
 ELSIF SETP_ACT < SETP THEN
    OUT_SETP := SETP_ACT + STEP;
    IF OUT_SETP > SETP THEN
        OUT_SETP := SETP;
        SETP_OK := TRUE;
    END_IF;
 ELSIF SETP_ACT = SETP THEN
    OUT_SETP := SETP;
    SETP_OK := TRUE;
 END_IF;
END_IF;

 

[dinner4one]

...danke Leute!

Larry's Vorschlag passt! (mal wieder)

Gruß d4o