F77 BOOEDT=BOOEDT
TKB @BOOEDT.TKB
PIP BOOEDT.TSK/PU,.OBJ