geht doch ganz einfach:

dcl-s indate packed(6:0) inz(260514);
dcl-s outdate char(8);
outDate = %char(%date(inDate:*dmy):*jobrun);

oder:
outDate = %char(%date(inDate:*dmy));

wenn *jobrun in den H-Bestimmungen angegeben wurde.

Datumskonversion siehe auch hier: http://search400.techtarget.com/tip/...on-cheat-sheet

Ich würd's auch so machen...