1) SORT FIELDS=(20,4,CH,D,10,3,CH,D)
OUTREC FIELDS=(7:20,4,C' FUTURE ',20,2,10,3,1Z,1,9,13,7,
24,57,TRAN=LTOU,6X'FF')
This example illustrates how a fixed-length input data set
can be sorted and reformatted for output. The SORTIN LRECL
is 80 bytes.
The reformatted output records are fixed length with a
record size of 103 bytes. SOLRF (the IBM-supplied default)
is in effect, so unless the SORTOUT LRECL is specified or
available, it will automatically be set to the reformatted
record length of 103.
in the above example i have some doubts that
a) sort fields=(20,4,CH,D,10,3,CH,D) -what exactly it does
and this fields related to output record fields or input
record fields
b)outrec used to refprmat the records after sorting that
means
could please reply me as soon as possible
Thanks.
Venkat
Answer Posted / kiran
As per the sort card,
1. Sort statements get executed on input file - System
sorts all the records on 20,4 in decending order and then
10,3 in decending order.
2. Sorted records write to the o/p based on the out rec
formatting.
3. As mentioned in the question, the LRECL mentioned in the
sortout will not efect the output file record length.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
what is SOC4 error?
Can we call instream to catalog and catalog to instream?
What parameter directs the output of the job log dataset?
How gdg are concatenated?
What is timing concept in mainframe?
I have a job called careerride and some steps in it as step1,step2. But I want to execute step2 before step1 ? How do I do that?
I want to join to input files and write the matching fields on to an output file but i dont want the output file a sorted one
What is the function of dd disp parameter?
What does a disposition of (MOD,DELETE,DELETE) mean ?
List the various advantages of using jcl language?
We can use PASS with permanent datasets also. THEN Which is the condition in which we may use PASS (instead of KEEP) with permanent data sets, while there is no need to specify UNIT and VOL for them like temporary data sets (in cas we use KEEP for permanent data sets) ?
what is the use of IEBGENER utility?
WORKING-STORAGE SECTION. 01 GROSS-PAY. 05 BASIC-PAY PIC 9(5). 05 ALLOWENCES PIC 9(3). PROCEDURE DIVISION. MOVE 1000 TO BASIC-PAY. MOVE 250 TO ALLOWENCES. DISPLAY GROSS-PAY. STOP RUN. 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move
How to run cobol program using jcl?
I have 60 steps in the JCL and want to Execute Only First from PROC by overriding in JCL ?