$FOR/LI:SORTUPF SORTUPF
$LINK/OPT SORTUPF
UIC=[1,1]
LIBR=SYSRES:RO
/