FLE NEWFIL,LP:=DP2:NEWFIL
FOR NEWFIL=NEWFIL/NOEX
TKB @DP2:NEWFIL
PIP DP2:NEWFIL.*;*/PR/OW:RWED
PIP DP2:NEWFIL.*/PU
PIP DP2:NEWFIL.*;1/RE=DP2:NEWFIL.*;*
PIP DP2:NEWFIL.*;1/PR/OW:RWE/SY:RWE/GR:RWE/WO:
PIP NEWFIL.OBJ;*/DE
PIP NEWFIL.FTN;*/DE
PIP [31,1]NEWFIL.TSK;*/PR/OW:RWED
PIP [31,1]NEWFIL.TSK/PU
PIP [31,1]NEWFIL.TSK;1/RE=[31,1]NEWFIL.TSK
PIP [31,1]NEWFIL.TSK;1/PR/SY:RWE/OW:RWE/GR:RWE/WO: