If a field is declared as a comp-3 field and if we want to
sort a dataset based on this field, then how will the sort
card be???
e.g- if we want to sort by a field which is defined as a
PIC X(5) then we will mention - sort fields=(1,5,ch,a).
Likewise if a field is defined as PIC S9(10)COMP-3 then in
this case how will the sort field be defined (because in
this case a sign is also involved)???
Answer Posted / bramar
Hi Albert,
I have a small doubt in your answer
for S9(10)COMP-3 the size will be 6 bytes
So I think it may be
sort fields=(1,6,PD,A)
Confirme weather my answer is right or wrong
Thanks in advance
| Is This Answer Correct ? | 14 Yes | 2 No |
Post New Answer View All Answers
which utility is used to sort a file in jcl?
can any one plzzzzzz tell the jcl code for creating ps using idcams
what is the use of JCL?
//S10 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //CON DD DSN=VAR.INPUT1,DISP=SHR // DD DSN=VAR.INPUT2,DISP=SHR //OUT DD DSN=VAR.OUTPUT,DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(5,5)),UNIT=SYSDA //TOOLIN DD * * Splice the needed data from the two VB files together SPLICE FROM(CON) TO(OUT) ON(5,5,CH) WITHALL - WITH(12,5) WITH(22,20) VLENMAX /*
Is automatic restart possible in jcl?
what happens when COND is coded in JOB statement and when COND is coded inside EXEC statement?
What do you understand by jcl?
which parameter is used to check the syntax of a jcl without executing it?
What are the 4 fields in dd statement?
Explain how can the disposition of sysout datasets be set for an entire jobstream?
what is the compile process of cobol program expalin with code
The disp in the JCL is MOD and the program opens the file in OUTPUT mode. What happens ? The disp in the JCL is SHR and the pgm opens the file in EXTEND mode. What happens ?
What is the significance of addrspc parameter in the exec statement?
is there any way to execute more than one proc in the same exec statement at the same time..?
WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99 VALUE 123.45. PROCEDURE DIVISION. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. compiler : IGYGR1080-S A "VALUE" clause literal was not compatible with the data category o subject data item. The "VALUE" clause was discarded. WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99. PROCEDURE DIVISION. MOVE 123.45 TO W-B. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. 2375