$SET DEF 0500
$ASSIGN 0500:GFEMq050010.POS FOR001
$ASSIGN 0500:GFEMq050010.POSAGAFGF FOR015
$RUN CRAY:GFAGAFGF
$sort/key=(pos:13,size:12,desc) GFEMQ050010.POSAGAFGF GFEMQ050010.POSAGAFGF
$ASSIGN 0500:GFEMq050010.ALL FOR001
$ASSIGN 0500:GFEMq050010.ALLAGAFGF FOR015
$RUN CRAY:GFAGAFGF
$sort/key=(pos:13,size:12,desc) GFEMQ050010.ALLAGAFGF GFEMQ050010.ALLAGAFGF