ups...leider zu spät gesehen, dass es ja schon eine 2. Seite gibt.

Ich sagte ja schon eingangs, dass man nicht über Programmierstile streiten sollte.

Ich bin allerdings voll auf Birgittas Seite. Ich darf aktuell genau einen solchen Code pflegen mit SETLL/READE.....DOW %EOF......READE ENDDO

Ggf. ist der RAEDE noch mit Abfragen verbunden etc. Bis ich dann beim DOW bin, habe ich schon fast vergessen, warum ich den überhaupt setzen wollte.
Und am Ende muss ich dann den ganzen Schmonsens nochmal einbauen....und später bei Änderungen 2mal pflegen....na danke

Und ja, zu Zeiten von RPGII und RPGIII fand ich den GOTO/TAG, sinnvoll eingesetzt, auch gar nicht so übel. Heute m free lässt sich der Code, sofern einigermaßen programmiert, eh viel besser lesen und ich benötige den auch gar nicht mehr.