PIP DFILE.OBJ;*/DE
PIP DFILE.TSK;*/DE
MAC DFILE,DFILE;1/-SP=DFILE
;FOR DFILE,DFILE/-SP=DFILE
TKB @DFILE.TKB
SET /UIC=[1,1]
;PIP =[1,14]DFILE.TSK,[1,14]DFILE.STB
INS DFILE
SET /UIC=[1,14]