Na dann gehts (analog Pikachu) auch mit genau einer Definition:

D MYDATE 7P 0 INZ
D HEXDATE 3 overlay(MYDATE)

MYDATE = Neuesdatum * 10;
ZielDatum = HEXDATE;

bzw.

HEXDATE = QuellDatum;
MYDATE /= 10;