KFK2666.pdf

Beispiel
Erläuterung
A: PROC(BASE);
END A;
4-15
DCL (BASE,X) DESCRIPTOR;
RESET X;
Der Basisdeskriptor X muß vor Verlassen von A freigegeben wer­
den, nicht jedoch BASE, da BASE von einer anderen Prozedur als
Parameter übernommen wurde. Im Gegensatz zu ICES, wO ein ver­
gessenes DESTROY in solchen Fällen katastrophale Folgen hat,
-77-
bedeutet das Weglassen von RESET lediglich eine geringe Einbuße
an Speicherplatz.
4.3.3 Deklaration von dynamischen Datenelementen
Bei Verwendung von DOS speichert der Anwender die Informationen
in dynamischen Datenelementen (ODE), die über Basisdeskriptoren
zugänglich sind. Die Zuordnung (Assoziierung) zwischen einer be­
stimmten Art von ODE und einem bestimmten Basisdeskriptor kann
bei der Deklaration des ODE geschehen.
Beispiel
Erläuterung
DCL (A,B) DESCRIPTOR;
DCL UA DYNAMIC(A);
DCL 1 PUNKT DYNAMIC;
2 FARBE BIN FIXED(15),
2 X(3);
DCL (UB, Y(10)) DYNAMIC(B);
Die ODE UA und UB sind bei jeder Verwendung (sofern sie nicht
anders qualifiziert werden) mit den Basisdeskriptoren A bzw. B
assoziiert, ebenso das Feld Y stets mit B. Dagegen sind DDEs vom
Typ PUNKT mit keinem Basisdeskriptor assoziiert. Sie müssen daher
bei jeder Verwendung explizit einem Basisdeskriptor zugeordnet
werden. Hier besteht eine Analogie zu PL/1-Based-Variablen.