Kontrollierter Abbruch in Cobol-Programm

[wolfinho]

Hallo,

ich bin gerade dabei ein Cobol-Programm kontrolliert abbrechen zu lassen, leider klappt es nicht so wie gedacht:


DISPLAY 'Hello World'
MOVE 12 TO RETURN-CODE.

Meldungen:
LBL1326: 'RETURN-CODE' nicht als Name definiert. Standarddatenelement angenommen.
LBL0526: 'RETURN-CODE' wurde als nicht reserviertes Wort akzeptiert.

Ich bin mir ziemlich sicher, daß ich solche Spielchen auf dem Großrechner schon getrieben habe, aber warum zickt die i5 bei sowas rum ?

Falls dies nicht funktionieren sollte, gibt es einen andere Möglichkeit ein Cobol-Programm kontrolliert abbrechen zu lassen ?

Vorab vielen Dank für eure Hilfe

[wwg]

Hallo,

ich weiß jetzt nicht so recht, was mit dem "kontrollierten Abbruch" gemeint ist.

Das Register "RETURN-CODE" gibt es erst im ILE-Cobol, im OPM-Cobol nicht. Damit kann man einen Integer-Wert ans das aufrufende Programm übergeben, das Programm wird aber nicht abgebrochen.

Wenn es um die Ausgabe eines Variablen-Dumps geht, so ist unter OPM-Cobol der Aufruf:
call "QLREXHAN"
angesagt; in Batch-Programmen mit einem 12-Byte-Parameter:
1. "D"
2. frei
3-12 Programmname.

Das Programm wird dadurch nicht abgebrochen; es läuft normal weiter.

Grüße,
Werner.