Hmm, auf unserem System geben wir fast nur Alphanumerische Werte an CLs weiter, da wir wir viele Jobs im Batch laufen lassen. Und im Batch gibt es immer Probleme (Dezimaldatenfehler!), wenn mal jemand vergisst ein numerisches Feld sauber zu initialisieren. Daher fast immer *CHAR.

Ein DCL-Statement im CL sieht dann so aus:

Code:
 DCL  VAR(&P0AYNB) TYPE(*CHAR) LEN(6)
oder dann:

Code:
 DCL VAR(&P0AYNB) TYPE(*DEC) LEN(6 0)