KFK2666.pdf

-90- 4-28
Beispiel
Erläuterung
Anstelle von
DCL ACN,M,K);
kann geschrieben werden
DCL A BASE DESCRIPTOR;
DCL A DYNAMIC(A BASE);
DEFINE A_BASE,(N,M,K) AS(A) STEP(100);
Die DOS A hat gegenüber dem PL/1-Feld A die Vorteile, daß nur
die aktuell benötigten Daten den Arbeitsspeicher belegen und daß
das "Feld" sich automatisch bei Bedarf vergrößert. In der Anwen­
dung wird in beiden Fällen geschrieben
A CI,J,L)
Es ist daher einfach, in PL/1-Programmen bei einzelnen Datenfel­
dern, die auf DOS umgestellt werden sollen, lediglich durch Ände­
rung der Deklaration die Umstellung zu bewerkstelligen.
überhaupt ist die Verwendung von ODE besonders einfach, wenn in
der Deklaration des ODE in der DYNAMIC-Option ein Basisdeskriptor
angegeben ist ("assoziierter Basisdeskriptor"l. Dann gelten fol­
gende Regeln für das Auffinden des ODE:
- Als Basisdeskriptor gilt der assoziierte Basisdeskriptor
- Die erste in dem ODE-Ausdruck auftretende Indexliste gibt
Beispiel
an, der wievielte Deskriptor aus den hierarchisch angeord­
neten Deskriptorvektoren Cbzw. beim letzten Index: DDE­
Vektor) benutzt werden soll, um das ODE aufzufinden.
DCL 1 FELD(10) DYNAMIC (BASE),
2 WERTE(50),
2 DATEN(3),
3 CX,Y,Zl;