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