$SET DEF KU6E:[KURUCZ.4400] $ASSIGN GF4400.POS FOR001 $ASSIGN GF4400.POSAGAFGF FOR015 $RUN CRAY:GFAGAFGF $SORT/KEY=(POS:13,SIZE:12,DESC) GF4400.POSAGAFGF GF4400.POSAGAFGF $ASSIGN GF4400.ALL FOR001 $ASSIGN GF4400.ALLAGAFGF FOR015 $RUN CRAY:GFAGAFGF $SORT/KEY=(POS:13,SIZE:12,DESC) GF4400.ALLAGAFGF GF4400.ALLAGAFGF