Hi All,
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)
- 1 Answers
- 4687 Views
- I also Faced
- E-Mail Answers
Answer / hitendra
Track the count of records processed and modify your cobol program so to take the input of no of already processed records. When you restart the job make sure that you pass the count and cobol program will start processing from the next record of the file.
| Is This Answer Correct ? | 0 Yes | 0 No |
This was related to -811 sqlcode, In a COBOL DB2 program which accesses employee table and selects rows for employee 'A', it should perform a paragraph s001-x if employee 'A' is present. In this case it gets -811 sqlcode, but still it process the paragraph s001-x. What could be wrong in my code.
I HAVE 2 TABLES ONE IS EMP_TABLE AND ANOTHER DEPT_TABLE.EMP_TABLE CONTAINS NAME,DEPTNO,DEPTNAME,LOCATION AND DEPT_TABLE CONTAINS DEPTNO,DOJ(DATE OF JOINING).I WANT TO DISPLAY NAME,DEPTNAME,DOJ AND WHO ARE JOINED BETWEN 01- JAN-2007 TO 01-JAN-2008?
What is DB2 (IBM Database 2)?
What is the purpose of using commit?
Normalization in DB2 – first normal form, second normal form
What is dbrm?
db2 restart logic ?
What is meant by isolation level?
how to resolve -818 error. how to see timestamp token in load module and plan
PLAN IS EXECUTABLE AND PACKAGE IS NOT EXECUTABLE . THEN WHAT IS THE USE OF PACKAGE?
2 Answers Tech Mahindra, Wipro,
What is the default page size of buffer pools?
how can u retrieve the data from null values using applicaion program.
COBOL 
