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.
- 1 Answers
- 6983 Views
- I also Faced
- E-Mail Answers
Answer / 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 |
study the following 01 A PIC 99V0 VALUE 5 01 B PIC 9V9 VALUE 6 01 C PIC 99V9 VALUE 2.5 01 D PIC 99 VALUE 3 COMPUTE A ROUNDED B C = A+B*C/D ON SIZE ERROR PERFORM PRINT-ERROR the comments of A.B.C after execution of the above statement are a.A=10 B=0 C=10 b.A=10 B=9.9 C=9.9 c.A=10 B=0 C=9.9 d.A=10 B=6 C=10
i want all ERRORS codes in COBOL ,JCL,VSAM ,DB2,CICS
What is the linkage section?
State the various causes of s0c1, s0c5 and s0c7.
consider the following progrm statements MOVE 0 TO SW.NO.OF.REC PERFORM PRI-OUT UNTIL SW=1 DISPALY NO.OF.REC STOP RUN PRE-OUT READ IN-FILE AT END MOVE 1 TO SW WRITE OUO-REC FROM IN-REC ADD 1 TO NO.OF REC if the IN-FILE contains 1000 records what value will be displayedafter the PERFORM is over?assume that N0.OF.REC has PIC 9(4) a.1000 b.1001 c.1 d.none of the above since there is a syntex error
WHY LRECL NEEDS TO BE 4 EXTRA THEN THE COBOL FILE LENGTH & WHAT IT CONTAIN IN THAT LENGTH
What is 88 level used for ?
Have you used comp and comp-3 in your project? And how?
How can you add a particular field in copybook?
how will u find out 3rd week's 2nd day using occurs ?
if we have a 10 steps how to override the 4th step in jcl?
What are the different rules for performing sort operation?
COBOL 
