Interested to Buy Any Domain ? << Click Here >> for more details...
I have files that contains both duplicates files(occur more
than twice) and non-duplicate files.The file is already
sorted by a key.I want to determine those records that are
duplicate and will be move to a duplicate file and non-
duplicate files to be move to a valid file.thank you.help
please
- 2 Answers
- 6596 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / tamilselvan
Instead of cobol, try this with SORT in JCl.it will be
easier.
SORT FIELDS=copy
SUM FIELDS=NONE,XSUM
define a file with DD card SORTXSUM after SORTWK file in
the proc step.
You can capture the duplicate rows in the sortxsum file and
non dupliucates in the SORTOUT file.
| Is This Answer Correct ? | 7 Yes | 1 No |
Answer / sowjanya
using jcl,
//ddname1 <- input file
//ddname2 <- outfile1(no duplicates)
//xsum <- outfile2 (duplicate)
//sysin dd *
sort fields=copy
sumfields =none,xsum
/*
| Is This Answer Correct ? | 4 Yes | 1 No |
What is binary search?
What is the difference between comp and comp-3 usage? Explain other COBOL usage?s.
What do you understand by psb and acb?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
How to execute a set of JCL statements from a COBOL program?
What will happen if we try to create GDG (+2) generaton instead of (+1) generation?
u have passed sme charecters thru parm parameter in jcl. how do u code in cobol to recieve the values u gave in parm ?
What is the Purpose of POINTER Phrase in STRING command
how we sort two input files based on a common column and giving one o/p file please send me the coding logic?
Define REDEFINE clause and Is it possible to have the redefine clause anywhere in the working storage section for a data name?
hi is there any means of deletin a record from a ps usin cobol not using jcl?eg if i am reading a record and if some condition is matched tat particular record must be deletd fom the ps
soc-7 is a bad data,invalid data. when ever we are moving the alphabets in the position of numeric then we got this abend. so my question is if o1 ws-data pic 9(1) value passing the alphabet some x. then we got soc-7 or not? i want clarification ?
COBOL 
