Interested to Buy Any Domain ? << Click Here >> for more details...
Hi,
I have a requirement
File A : I have 6 records out of which 4 are same.
File B: I have 8 records out of 6 records are same.
The 4 records in FILEA and 6 records in FILE B are same. If
we substract we will get two records, I need these two
records in output file
This is because to remove the duplicates from the database.
Through easytrieve we can compare but for that there should
not duplicates, but in my file I have duplicates.
Thanks in advance!!
- 2 Answers
- 10860 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / vijay
It is simple, you no need to code ezt pgm for eliminating
the duplicate records. Try these 2 steps to eliminate the
duplicates.
Step-1: Use sort on file 1 and use sumfields=none on the
key field, then you can get only 2 records in the output
file.
Step-1: Follow the above procedure for the file 2.
| Is This Answer Correct ? | 8 Yes | 1 No |
Answer / sreejith
read file-1
1-a
2-b
3-c
4-d
5-e
6-f
also move record in to table1 that is decalred in ws with
legth 14 until read all the record from file-1
then
read file-2
move each record into table1 and variables g,h....up to for
8 records
now the table contain 16 item
then use legth variable l
then compare each variable from table for each matching
incriment the variabe length. after searching all item from
table
compare the legth with 1
if it is greater than one eliminate
other wise write it to the output file-3
ok
| Is This Answer Correct ? | 0 Yes | 0 No |
How do you pass parameters to the program as the job is being executed ?
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?
What will happen when we try to pass data from JCL to COBOL using PARM parameter without declaring the length field in Linkage Section?
What is COND=ONLY ?
While using SORT FILES =NONE,XSUM I am getting error "ICE172A E XSUM IS NOT SUPPORTED - USE ICETOOL SELECT IF APPROPRIATE"..I want to write duplicate records a a serparte file..how i can do tht?
which utility is used a dummy utility?
Name what parameter directs the output of the job log dataset?
How do you submit JCL via a Cobol program?
How can we increment subscript and index?
What it does If we specify TYPRUN=P & it is not substituted by SCAN 0r HOLD in VALUE SET.
Is it possible to left uncode disp? If yes, how?
What is Automatic Restart ? EXEC PGM = PROG1, RD = R (Is it the Restart of a JOBSTEP or Restarting the execution of the program?) Do we Restart it or it automatically Restarts executing again and again ? Then when it will finish executing ? or After Abending, when we submit it again, then it is Restarted from the Last successful Checkpoint ? If some JOBSTEP is abending, what is the benifit to Restart it, WILL IT NOT ABEND AGAIN if you don't change the LOGIC ?
COBOL 
