Interested to Buy Any Domain ? << Click Here >> for more details...
I have a sequential file in which there are 50 records. Now
I want to copy all the 50 records in the reverse order into
a new file? The last record in the original file should be
the first record in the new file. How can I do it?
- 4 Answers
- 15224 Views
- IBM, TCS, I also Faced
- E-Mail Answers
Answer Posted / avinashn17
The above soultion works only if records are in the sorted
order.
The below piece of code could be used for records which are
not sorted.
******************************************************
//STEP1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=INPUT,
// DISP=SHR
//SORTOUT DD DSN=OUTPUT,
// DISP=(NEW,CATLG,DELETE),
// DCB=(DSORG=PS,RECFM=FB,LRECL=80,BLKSIZE=0),
// DATACLAS=PSFB
//SYSIN DD *
INREC OVERLAY=(81:SEQNUM,8,ZD)
SORT FIELDS=(81,8,ZD,D)
OUTREC BUILD=(1,80)
/*
*********************************************************
Record length of the above file is 80
INREC OVERLAY - places sequence number after 80.
Then it is sorted in descending order of sequence nummber.
OUTREC BUILD - removes sequence number and retains original
record.
| Is This Answer Correct ? | 13 Yes | 1 No |
Post New Answer View All Answers
What is timing concept in mainframe?
What is the job entry system used in your project? based on what criteria the sequence of jobs are picked if priority is not mentioned in the job card?
Explain the function of //cntl statement?
What do you understand by the terms: joblib and steplib?
How jcl work to handle various input output file operations?
I want my job (careerride) to be executed in 1 minute and 2 seconds. How do I do that?
List the different jcl statements that are not permitted in the procedures?
A chkpt is the parameter coded for multi-volume qsam datasets in a dd statement. When a chkpt is coded as chkpt=eov, a checkpoint is written to the dataset specified in the sysckeov statement at the end of each volume of the input/output multi-volume dataset. State whether true or false?
how do you code a null statement?
What is the purpose of dd * statement in jcl?
What do you understand by the term notcat 2 – gs?
How gdg are concatenated?
What are hierarchy levels in jcl?
Explain how can the attributes of one sms dataset be copied to another dataset?
how to run batch program without jcl?
