$SET dEF 1003
$ASSIGN GFEMq1003.POS FOR001
$ASSIGN GFEMq1003.POSAGAFGF FOR015
$RUN cray:GFAGAFGF
$!sort/key=(pos:13,size:12,desc) GFEMQ1003.POSAGAFGF GFEMQ1003.POSAGAFGF
$ASSIGN GFEMq1003.ALL FOR001
$ASSIGN GFEMq1003.ALLAGAFGF FOR015
$RUN cray:GFAGAFGF
$!sort/key=(pos:13,size:12,desc) GFEMQ1003.ALLAGAFGF GFEMQ1003.ALLAGAFGF