Interested to Buy Any Domain ? << Click Here >> for more details...
I had Records in file Like this
Company Code
IBM 2
IBM 1
IBM 4
WIPRO 3
WIPRO 2
WIPRO 9
TCS 4
TCS 6
TCS 3
i want the record of every company with highest code How can
i do that?
- 3 Answers
- 10017 Views
- Wipro, I also Faced
- E-Mail Answers
Answer Posted / sathish
//STEP1 EXEC PGM=SORT
//SORTIN DD *
IBM 2
IBM 1
IBM 4
WIPRO 3
WIPRO 2
WIPRO 9
TCS 4
TCS 6
TCS 3
//SORTOUT DD DSN=D362967.TEST.PS1,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(1,12,CH,D)
/*
//STEP1 EXEC PGM=SORT
//SORTIN DD DSN=D362967.TEST.PS1,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(1,5,CH,A)
SUM FIELDS=NONE
/*
| Is This Answer Correct ? | 6 Yes | 2 No |
Post New Answer View All Answers
What are some jcl statements that are not allowed in procedures?
what is JCL?
Can I share my data with other jobs? How?
if the submitter of a job wants to inform another user about the job completion, how can it be done?
What do you understand by the terms: joblib and steplib?
What is the purpose of dd dummy statement?
What is the purpose of dd * statement in jcl?
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 ?
when does a dataset go uncataloged?
what is DSN in JCL and what are the parameters to declare the DSN?
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 do you overcome this limitation ?
What are the parameter we cannot use in procedure? How many instream we can write in single jcl?
Is their any limit for data sets?
what is the compile process of cobol program expalin with code
