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