In a Cobol-DB2 program, I am fetching rows from 4 tables
using cursor and then based on the a field present in that
table, It processes the information accordingly..for
example stat-c is one digit field..if stat-c is 'D' then
the a row is deleted from table and written those details
in to a file. If the stat-c is 'U' then a row is updated
(hardcoded what to update)in a table and written those
details in to a file. If the stat-c is 'I' then a row is
inserted in a table and written those details in to two
files. The issue is i have to include the intermediate
commits. When an abend occurs, due to commit statement db2
tables will be saved, But there will be lose of file
contents. When we resubmitting the job associated with this
program there will be insert ,update and delete anomolies
to avoid that what measures could be taken?.
The intermediate commit is nothing but issuing
commit after massive inserts, updates and deletes(sum of
500actions)
- 2 Answers
- 7552 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / just helpin
This is a JCL question, not a DB2 one.
You have to make two steps in your JCL. In the first step
preallocate the output file. In the second step run your
program and have DISP=(MOD,KEEP,KEEP) on the output file.
When you rerun after an abend restart the from the second
step.
| Is This Answer Correct ? | 0 Yes | 1 No |
When is the skeleton cursor table created?
can i code union in cobol-db2 pgm ?
What is clone table?
What is bind plan?
What is an instance database?
OUTER JOINS USED TO GET MATCHING AND NONMATCHING ROWS FORM 2 OR MORE TABLES BASED ON COLUMNS. SIMPLE JOINS ALSO DO THE SAME THEN WHAT IS THE USE OF OUTER JOINS.
Explain the EXPLAIN statement?
What are the isolation levels possible ?
What are union and union all?
What is the difference between group by and order by?
how to resolve -811
Under what circumstances will DB2 allow an SQL statement to update more than one primary key value at a time?
COBOL 
