IF in COBOL funktioniert nicht immer

[Pikachu]

Sprungmarke 2x ?
=> Wird vom Compiler bereits abgelehnt

Unter V5R4 leider noch nicht.

[Fuerchau]

OK, du hast ja Recht (war ich von anderen Compilern eigentlich gewohnt).

Allerdings:
Der Compiler nimmt als Ziel
a) das erste Vorkommen innerhalb der Section
b) das erste Vorkommen in der Quelle

Das führt sicherlich zu Verwirrungen in der Ausführung, wenn man mal schnell einen Paragraph kopiert hat.

Aber nichts ist so schlimm wie:

MYLABEL.
GO TO.
:
MYLABELX.
:
MYLABELY.
:
MYLABELZ.
:
ALTER MYLABEL TO PROCEED TO MYLABELX.
:
:
ALTER MYLABEL TO PROCEED TO MYLABELY.
:
:
ALTER MYLABEL TO PROCEED TO MYLABELZ.
:
:

[BenderD]

dafür gabs früher schon die Referenzhandbücher, zum erschlagen der Programmierer, die sowas machen, (Stichwort: Das Buch als Waffe)

D*B

OK, du hast ja Recht (war ich von anderen Compilern eigentlich gewohnt).

Allerdings:
Der Compiler nimmt als Ziel
a) das erste Vorkommen innerhalb der Section
b) das erste Vorkommen in der Quelle

Das führt sicherlich zu Verwirrungen in der Ausführung, wenn man mal schnell einen Paragraph kopiert hat.

Aber nichts ist so schlimm wie:

MYLABEL.
GO TO.
:
MYLABELX.
:
MYLABELY.
:
MYLABELZ.
:
ALTER MYLABEL TO PROCEED TO MYLABELX.
:
:
ALTER MYLABEL TO PROCEED TO MYLABELY.
:
:
ALTER MYLABEL TO PROCEED TO MYLABELZ.
:
: