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)

Answer Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How can you quickly find out the # of rows updated after an update statement?

629


What are types of indexes?

589


What is catalog database in db2?

640


What is a system catalog table in db2?

582


Name the various locking levels available?

631






is it compulsory commitment control in journal?

2007


Which command is used to remove all rows from a table?

551


What parameters are used to control the free space in DB2?

641


what is the sqlcode -501

11286


How can deadlocks be resolved?

538


What is dbrm? What it contains?

678


Is it possible to alter a table – for example adding a column, when another user is accessing or updating some columns?

624


How to access db2 tables in mainframe?

611


What is the reason behind not using select * in embedded sql programs?

601


What does sqlcabc has?

627