Hallo

vielleicht hilft eine Datenstruktur z.B.
d NUMDS ds
d NUM 1 10
d DEC 11 13


Dann einfach die DS mit Move füllen
Gruss
Michael