PIP *.OBJ;*/DE
FOR @TEKFOR
PIP ALL.TMP=*.OBJ
PIP ALL.OBJ=ALL.TMP/RE
TKB @TEKTKB
PIP *.OBJ;*/DE