Hallo ich schon wieder .
Ich soll ein altes RPG-Programm umstellen
Problemstellung:

IKundumsa KF 1 CK 2 CU
I 3 4 0JAHR
I p 12 76 UFG

UFG is hier somitn 65 stellen lang. Also zu lang. Im alten RPG wurde diese Zeile hinzugefügt und der Compiler ist zufrieden:

E UFG 13 9 0

gelöst.

Aber in RPGLE gibt es keine E-Zeilen zum definieren von interenen Tabellen und der der Compiler meckert weil das Feld UFG zu lang ist. Im alten RPG nicht. Warum??



Klar ich könnte das Feld unterteilen aber gibt es ne andere Lösung?? Evtl uber DS oder was kann man tun ??


UFG S 5P 0 Dim(13)
geht nicht

DUFG DS
Du1 1 5P 0
Du2 6 10P 0
Du3 11 15P 0
Du4 16 20P 0
Du5 21 25P 0
Du6 26 30P 0
Du7 31 35P 0
Du8 36 40P 0
Du9 41 45P 0
Du10 46 50P 0
Du11 51 55P 0
Du12 56 60P 0
Du13 61 65P 0

geht nicht


DUFG DS
Du1 1 9 0
Du2 10 18 0
Du3 19 27 0
Du4 28 36 0
Du5 37 45 0
Du6 46 54 0
Du7 55 63 0
Du8 64 72 0
Du9 73 81 0
Du10 82 90 0
Du11 91 99 0
Du12 100 108 0
Du13 111 117 0

geht nicht