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