Baldur,

Ist ja nur ein Beispiel - ich hätte ja auch ein zweites SFL hinschreiben können. Allerdings ist das wirklich ein Mist (hmmm, ob ich Dieter doch Recht geben sollte) .


Hingegen in einer DCL-S geht's:

siehe hier:

DCL-S salary
/IF DEFINED(large_vals)
PACKED(13:3)
/ELSE
PACKED(7:3)
/ENDIF
;
Nachtrag: Sorry, ist kein Copy.

Mal gucken was Barbara zum Copy meint ;-)