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