MVSFORUMS.com

[bidpar]

Hi
1) Let's assume I define a cursor with hold option and the program abends.If I do a restart can I be a able to fetch the next row ?
I was thinking at abend time all the cursors are automatically closed by DB2 as the thread ends. The bookmgr tells 'If the program abends, the cursor position is lost; to prepare for restart, your program must reposition the cursor' . Does this mean we need not open the cursor again just need to reposition by fetching multiple times?

2) Does DB2 automatically rollsback data in case of an abend ?

Thanks

[kolusu]

bidpar,

To answer you first question better, let us assume that you have defined the cursor as follows.

[bidpar]

Kolusu
That's how we code our program to make it restartable in case of an abend. But somebody told me the cursor remain open even if it abends if it is defined with hold for option. So I was little confused. That's why I asked the question. From your answer it looks like the cursor will close anyway.

Thanks for your answer.

[vspangtey]

Hi Bidpar,

We generally use HOLD option for COMMIT statement. Coz if u use COMMIT without HOLD option it will automatically close the CURSOR. In case of abend u will lost the cursor details but the data will be commmited in case of using COMMIT statement otherwise it will ROLLBACK automatically. CURSOR won't remain open in case of abend even if u are using HOLD option.
You can handle the repositioning of CURSOR in your cobol program. To serve the purpose, u should DECLARE cursor with ORDERBY option. There must be a driver or unique key on which u will be retrieving the data, say account no(uniue for the table). U can include the condition of ORDERBY account no. in the declare statement which will select the rows with increasing/decreasing account number.
And then everytime u use COMMIT u can store that particular account number to a another table or to a file. Generally for a particular system people define a separate table for storing the driving/unique variable. what they do is set an indicator for succesful completion of the program. In our program u can check this particular indicator to check whether the previous run was succesful or an abend occcured.
And as KOLUSU has written u also have to use WHERE KEY > :W-HOST-KEY where W-HOST-KEY will have the value of the particular Account number for which the last COMMIT has occured just before the Abend. It will reposition ur cursor as it will only fetch the uncommited data.
I hope now all ur doubts are clear. Please let me know if u still need some more information.

Regards,
Vineet.