IF "Melde_DB".Meldung[0..20] = 0 THEN ...
FOR "i" := 0 TO 20 DO
"M30.0" := 0;
IF "Melde_DB".Meldung["i"] = 1 THEN
"M30.0" := 1;
ELSE
"M30.0" := 0;
EXIT;
END_IF;
END_FOR;
"M30.0" := 0;
FOR "i" := 0 TO 20 DO
IF "Melde_DB".Meldung["i"] = 1 THEN
"M30.0" := 1;
EXIT;
END_IF;
END_FOR;
So wie du die Abfrage programmiert hast, fragt du eigentlich nur den Zustand von "Melde_DB".Meldung["20"] = 1, da du bei jedem Durchlauf der Schleife den M30.0 zurücksetzt.
Gruß
Koslovski.
"M30.0" := 0;
FOR "i" := 0 TO 20 DO
IF "Melde_DB".Meldung["i"] = 1 THEN
"M30.0" := 1;
EXIT;
END_IF;
END_FOR;
FOR "i" := 0 TO 20 DO
"M30.0" := True ;
IF "Melde_DB".Meldung["i"] = 0 THEN
"M30.0" := False ;
EXIT;
END_IF;
END_FOR;
"M30.0" := True ;
FOR "i" := 0 TO 20 DO
"M30.0" := "M30.0" AND ("Melde_DB".Meldung["i"] = 0 ) ;
END_FOR;
FOR i := Alarm_begin TO Alarm_end BY 1 DO
FOR j := 0 TO 15 BY 1 DO
actual_bit := Message_DB.DX[i, j] ;
IF actual_bit THEN
Common_Alarm := true ;
END_IF ;
END_FOR ;
END_FOR ;
"M30.0" := "M30.0" AND ("Melde_DB".Meldung["i"] = 0 ) ;
M30.0 := true;
FOR i := 1 to 20 DO
if Melde_DB.Meldungen[i] <> 0 then
M30.0 := false;
EXIT;
end_if;
end_for;
Dank' euch für die Vorschläge!
@Larry: Würde dein erster Code wirklich funktionieren? Koslovski hat ja angemerkt, dass so nur der letzte Array-Wert abgefragt wird und alle anderen nicht!
Die Zeile
Code:"M30.0" := "M30.0" AND ("Melde_DB".Meldung["i"] = 0 ) ;
verstehe ich gar nicht. Was wird denn hier abgefragt; M30.0 wird doch oben schon auf 1 gesetzt?
Dank' euch für die Vorschläge!
@Larry: Würde dein erster Code wirklich funktionieren? Koslovski hat ja angemerkt, dass so nur der letzte Array-Wert abgefragt wird und alle anderen nicht!
Die Zeile
Code:"M30.0" := "M30.0" AND ("Melde_DB".Meldung["i"] = 0 ) ;
verstehe ich gar nicht. Was wird denn hier abgefragt; M30.0 wird doch oben schon auf 1 gesetzt?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?