!JOB
!LIMIT (TIME,6),(CORE,40),(ACCOUNT)
!.         !BATCH EVAL_BA3.:CONVERT
!.
!.  This job sorts EVAL_WF3 using disk for SORT scratch files.
!.
!.
!.  If disk space is not available for the sort, use the tape
!.  sort EVAL_BA3T.
!.
!.   THIS JOB STEP UTILIZES A SEQUENTIAL DISK SORT THROUGH THE
!.   FOLLOWING DCBS.
!.
!.   THE FILE THAT IS TO BE SORTED IS CREATED BY EVAL_BA2
!.  SORT DCBS:
!.  F:SCRF1
!.  F:SCRF2
!.  F:SCRF3
!.  F:SCRF4
!.  F:SCRF5
!.  F:SCRF6
!.
!.  This job may require a large amount of cpu time depending
!.  upon the size of EVAL_WF3 which is being sorted here.
!.  If EVAL_WF3 was put on tape in EVAL_BA2 make sure the
!.  tape assignments are carried through here.
!.  The scratch files for the SORT can be assigned to a private
!.  if public disk space is not sufficient.
!.
!SET F:SORTIN DP/EVAL_WF3;REL
!SET F:SORTOUT DP/EVAL_WF3;SAVE
!SORT
.REC(20)
.BLOCK(500)
.KEYS(13,4,BN),(9,4,BN)
.LIMIT (DCBS,6)
!EOD
