TK:[1,54]A68/CP/-FP,MP:[1,34]A68/-SP=CHDR,A68,EXIT,CLIB/LB:FINIT/SS,CLIB/LB
/
GBLREF=FINIT
GBLREF=.PFIO
UNITS=12
STACK=3000
LIBR=FCSRES:RO
TASK=...A68
//