TCLRNO,TCLRNO/SH/-SP=TCLRNO,[70,2]PASLIB / LIBR=SYSRES:RO EXTSCT=......:4000 GBLDEF=HPSIZE:4000 EXTSCT=PAS$$:30000 STACK=32 /