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