Interested to Buy Any Domain ? << Click Here >> for more details...
If there are two files one with 100 records and other with
101 records. we have to find out the one record that is the
odd man out . What are the steps to do it
- 7 Answers
- 13783 Views
- BirlaSoft, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / ganapathi
I thing that is not correct.SUM FILEDS = NONE will just
ignore the duplicate records.
For acheving this situation first we need to sort both the
files based on the key.Then we need to compare both the
files based on the key.If it is matches fine else write the
key in to another file.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / rajendran
Append 1 to the first file to the first position
Append 2 to the second file to the first position
Now SORT both the file records with option to sum on the
1st character.
at last the odd man record will be the one whose first
character would be "2" for all other it will be "3".
Please let me know if I went wrong somewhere.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / varatharaj
using read command fetch first record from the file1 and compare that record with all records if file2 if any match occur go to second record in file1 compare like this until end of first1 if anyone with out match we can find that is odd man out in files.....
| Is This Answer Correct ? | 3 Yes | 1 No |
Answer / prasanna kumar
We can do this by external SORT in JCL
//SORTIN DD DSN=ABC.FILE1 ( that contains of 100 records)
// DD DSN=ABC.FILE2 ( that contains of 101 records)
//SORTOUT DD DSN=ABC.NEWFILE
//SYSIN DD *
SORT FIELDS =(1,4,CH,A) (jst to retreive data in sequence)
SUM FIELDS = NONE ( That eliminates the duplicates and
retrieves the data which is odd in both the files and write
in sort out file)
/*
Any other answers !!!
| Is This Answer Correct ? | 5 Yes | 4 No |
Answer / arpan
Open File 1 in 3.4.
Give command COMP 'FILE2'. It will give you the extra
record in file2.
| Is This Answer Correct ? | 1 Yes | 0 No |
Hi Presannakumar,
We can't compare two files in dfsort.so u first u merge two files and using dfsort in dfsort some fields equal to none means its coming avoid the duplicates,so we can give extra xsum the particular extra record will store xsum dataset.
sync sort we can esily match.
in cobol program matcing logic program we can use and find.
read 2 file at end.
if eno = eno1
move eno to eno3
write rec
if eno > eno1
perform first-para read
write another file
if eno < eno
perform second-para read
write another file.
now the particular record presend in another file.
| Is This Answer Correct ? | 0 Yes | 0 No |
Define REDEFINE clause and Is it possible to have the redefine clause anywhere in the working storage section for a data name?
How many sections are there in data division in COBOL?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
what happens if we wont give timestamp in precompilation process ?
What is the difference between a subscript and an index in a table definition?
what are decleratives in cobol?
How do you set a return code to the JCL from a COBOL program?
How to resolve the soc4 and soc7 errors?
How many maximum number of procedures can we write in one COBOL program?
What is the difference between PIC 9.99 and 9v99 in COBOL?
0 Answers SwanSoft Technologies,
01 var1 pic x(10) 01 var2 redefines var1 pic 9(10). then in procedure division move 'abcde' to var1 then waht is the value of var1 and var2
I have a occurs for 100 times but it has executed 101 time what could be the reason?
COBOL 
