movel in ein gepacktes Feld macht negativ?

[Robi]

Moin zusammen

RPT Pgm (ähnlich RPG) KEIN ILE, V7R3


in einem Alpa Feld steht, lt Debug,


EVAL inhacd:x
00000 F0F0F0F0 F0F0F0F0 F0F0F0F3 F2F0F040 - 000000000003200
00010 F9F9F9F9 F9F9F9F9 F9F9F9F9 F9F9F940 - 999999999999999


ein
C MOVELINHACD N152 152


füllt ein Numerisches (gepacktes) Feld

Lt debug hat das nun
EVAL N152
N152 = -0000000000032.00


Wieso?

[Robi]

Oh mann, ist das krank ...

Das Feld INHACD hat 60 Stellen.
In dem Feld steht u.a. auch noch ein TEXT. Dieser Endet auf O (Stelle 60)

O = x'D6' D = negativ

Es lebe das Uralt RPG!