Anmelden

View Full Version : CHAIN(E)



tarkusch
30-04-13, 12:26
Hallo,
ich habe einen Sfl mit 50 Zeilen gefüllt.
Die For-Schleife läuft aber bis zum Ende (199).
Wieso fällt er bei der 51. Zeile beim Chain(e) eigentlich nicht aus der Schleife?
Wenn er chained und es ist kein Sfl geschrieben wird da nicht das %ERROR() aktiv?


// letzen Eintrag ermitteln
LeerZeile = *ZEROS;
For LeerZeile = 1 to 199;
CHAIN(E) LeerZeile FMTSFL2;
IF SFL2TXT <> *BLANKS;
LeerZeile = SFL##2;
ENDIF;
If %Error();
Leave;
EndIf;
Endfor;

Dank im Voraus

Fuerchau
30-04-13, 12:30
Ein Chain(E) liefert nicht %error() sondern %found(), das (E) kannst du auch weglassen, also :

if not %found();
leave;
endif;

tarkusch
30-04-13, 12:34
Dankeschön, das ging aber sehr schnell.

Gruß