first you need to create a source member to store the sort soecs.
We use QFMTSRC
here is the contents of a member ACHSRC and the FMTDTA command from the CL program.
HSORTR 29A X
FNC 95 113
FNC 124 133
FDC 1 133
FMTDTA INFILE((*LIBL/ACHNEW)) OUTFILE(*LIBL/ACHNEW) +
SRCMBR(ACHSRC) OPTION(*NOPRT *NOSECLVL)</pre>