Hallo, folgendes Problem

habe zwei Datenstrukturen erstellt
D KEYGRP S LIKE(KEY)

D KEY DS
D FIRMA 1 2P 0
D ARTIKEL 10
D NUM1 11 17 0
D NUM2 18 25 0
D NUM3 26 33 0

die Felder FIRMA, ARTIKEL, NUM1, NUM2 und NUM3
kommen aus einer Datei, um Änderungen zu bemerken schiebe ich die Daten in die KEYGRP
es wird aber ein call gemacht bei dem NUM3 als Parameter übergeben wird, dann wird habe ich einen Dezimaldatenfehler im aufgerufenen PGM

hilfe - hab keine Ahnung
danke für die Hilfe