A cobol program to read a file , match it with other if.
If match occurs then write it to an output file. If no
match then no need to write it.Error log created by program
to track any error.
Answer Posted / ajay kumar ande
procedure:
1. take 4 seq. files,read two files
2.if rec1(key1)=rec2(key2)
write record3
else
write record4
or using jcl
pgm=iebcmpr
sysut1 dd dsn=dataset1
sysut2 dd dsn=dataset2
sysin dd *
compare typorg=ps/po
| Is This Answer Correct ? | 3 Yes | 4 No |
Post New Answer View All Answers
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
How do we get current date from system with century in COBOL?
What is static and dynamic call in cobol?
A table has two indexes defined. Which one will be used by the SEARCH?
What type of SDLC u followed? Why?
what is amode(24), amode(31), rmode(24) and rmode(any)?
Which is not true about evaluate statement
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
Explain about different table spaces.
How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?
what is difference between cobol and cobol/400
What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?
What are INPUT PROCEDURE and OUTPUT PROCEDURE?
In COBOL programming, what is PERFORM? What is VARYING?
I have one ps file in which there are 3 fileds emp_no,emp_name and leave_app.this ps file information give the detail of employee which is going to apply for leave.suppose emp_no=113430,emp_name=ajay,leave_app=1 that means he is going to apply for 1 day leave.and accordingling the table in db2 will be updated means if he has that no of leave in his account then he will get dat leave and updated acc. in table(leave_balance=previous leave present in table-leave_app).Now i want to check whther the updated result is correct or not by comparing the two ps file using IEBCOMPARE or icetool so what is going to be the two ps file and how its is going to be compare.