.;.SETS TINO <FILSPC>[5:6]
PIP TK:[1,54]PPP.TSK/PU,MP:[1,34]PPP.MAP
QUE PP:/UNSPOOL
REM PPP0
INS TK:[1,54]PPP/TASK=PPP0
.TESTFILE TI:
.;REA PPP0 2 '<FILSPC>'
.;REA PPP0 3 '<FILSPC>'
.;REA PPP0 4 '<FILSPC>'
.;REA PPP0 5 '<FILSPC>'
QUEUE PP:/SPOOL/FLAG:1
.;.XQT RUN PPP0
.PAUSE