KFK2666.pdf

-486-
Beispiel
Erläuterung
11-44
MACROTIME DATASTRUCTURE 'MD1',
DCL 1 A,
2 L BIN FIXED(15) INIT(O),
2 P PTR INIT(NULL()),
2 C CHAR(B) INIT('SUB1'),
END MACROTIME DATASTRUCTURE,
MACRO DATA 'MD2',
END MACRO DATA,
MAC DAT 'MD3',
END MAC,
END MAC DAT,
Die letzte END-Anweisung ist fehlerhaft, da sie nicht am Ende einer
Makrozeit-Datenstruktur-Definition steht. Die Anweisung wird von
PLS als PL/1-END-Anweisung interpretiert und von PL/1 als fehler­
haft beanstandet.