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