write a program to eliminate duplicate records in a input file
and send them to output file.
Answer Posted / ehatesham
//SORTXSUM DD DSN=datasetname,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(CYL,(1,4),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
.
.
//SYSIN DD *
SORT FIELDS=(1,3,CH,A)
SUM FIELDS=NONE,XSUM
/*
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
Why is it necessary that file needs to be opened in I-O mode for REWRITE?
What is the difference between external and global variables in COBOL?
How can we find that module can be called – whether DYNAMICALLY or STATICALLY?
What is the difference between PIC 9.99 and 9v99 in COBOL?
1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?
What the difference is between continue and next sentence?
What is the problem of ordered sequential files access?
what is the use of outrecord?
if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.
What is redefines clause in COBOL?
Mention the guidelines to write a structured cobol program?
What are the different open modes available in cobol?
What is the difference between comp and comp-3 usage?
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need