// JOB VSB010
// OPR '*****VSB010**-S O R T    BAL-SAM FILE'
// DVC 50 // VOL SDIVSB  // LBL BALSAM    // LFD SORTIN1
// DVC 50  // VOL SDIVSB  // LBL VSBWORK1  // LFD DM01,,INIT
// DVC 50  // VOL SDIVSB  // LBL VSBWORK2  // LFD DM02,,INIT
// DVC 50  // VOL SDIVSB  // LBL BALSAMSORT    // LFD SORTOUT,,INIT
// EXEC SORT
/$
 SORT FIELDS=(77,3,,D),WORK=2,SIZE=2000,FILE=1
 RECORD TYPE=F,RCSZ=96
 INPFIL BLKSIZE=192,VOLUME=1
 OUTFIL BLKSIZE=192
 END
/*
/&
