2.4.3 ALTER
|  | |  | | |
Format:
ALTER Cobolname1 TO Cobolname2.
| |
|  | |  |
Cobolname1 und Cobolname2 müssen Programmadressen (Marken) sein. Durch diese Anweisung wird die Programmadresse1 in Programm- adresse2 geändert.
Programme, in denen mit ALTER gearbeitet wird, sind nur sehr schwer nachvollziehbar, deshalb sollte diese Anweisung nicht verwendet werden!
Beispiel:
....
A1.
....
A2.
...
GO TO A1. (1.)
A3.
ALTER A1 TO A2.
GO TO A1. (2.)
Nach der 1. GO TO-Anweisung wird das Programm bei der Marke A1 fortgesetzt.
Nach der 2. GO TO-Anweisung wird das Programm bei der Marke A2 fortgesetzt.
Der folgende GO TO-Befehl (1.) setzt das Programm wieder bei der Marke A2 fort.
Zurück zu Acc-Cobol Add Statement
Hoch zu Procedure Divison in COBOL
Weiter zu CALL
|