.ENABLE SUBSTITUTION
PIP POOL.TSK;*, POOL.OBJ;*/DE
MAC POOL, POOL/-SP = LB:[1,1]EXEMC/ML, [11,10]RSXMC/PA:1, SY:'<UIC>'POOL
.OPEN POOLBLD.CMD
.DATA POOL/PR:5/-CP/-FP/MM, POOL/-SP/MA = POOL, LB:[1,54]RSX11M.STB/SS
.DATA /
.DATA TASK=POOLMN
.DATA PRI=100
.DATA UNITS=2
.DATA ACTFIL=1
.DATA PAR=GEN
.DATA //
.CLOSE
TKB @POOLBLD
PIP POOL.LST;*, POOL.MAP;*/PU
PIP POOLBLD.CMD;*/DE