Achso. Als ILE COBOL läßt es sich wandeln.

Und so klappt das auch 22stellig:

01 STRING-WRK PIC X(22).
01 ZAHL-WRK-R REDEFINES STRING-WRK.
05 ZAHL-WRK-2 PIC 9(22).