MVSFORUMS.com

rajkumarfit · Beginner Joined: 19 Dec 2005 Posts: 8 Topics: 5

Hi,

i have a doubt like, i have a file opened in extended mode and i am writing some records into that file using a program. in case of an abend while the execution the file is closed automatically when the program closes, so all the newly witten records will be there in the file. but i do not want this like this.. i do not want that file to close automatically when the prog closes because of an abend,so that the changes made to that file using that prog will not reflect. is ther any way to do that.

for an example.

i have a file with 100 recs and i am opeing it in Extended mode and adding some more recodes using a prog, while execution if there is an abend in the prog all the newly added rec should go off and the file should have only those old 100 rec.

is there a way to do this. Please help me in this.

Rajkumar

shekar123 · Posted: Thu Jun 22, 2006 2:40 am Post subject:

Rajkumar,

I have tried a sample code and see if my understanding is correct.
Try this code:

rajkumarfit · Beginner Joined: 19 Dec 2005 Posts: 8 Topics: 5

hi Thanks for ur quick reply,

Actually i do not want that 4 recs to be added in the out file. i just want the old 5 recs in the out file if there is an abend. But in ur output after the Execution the 4 recs are added even after the abend.

Rajkuamr

kolusu · Posted: Thu Jun 22, 2006 7:15 am Post subject:

rajkumarfit,

Unless you use checkpoint-restart feature there is no way to do what you are asking for. Just curious why do you need to open the dataset in an extended mode?

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

shekar123 · Posted: Thu Jun 22, 2006 7:18 am Post subject:

Rajkumar,

Try this code modified by me with two test cases:
1.Case 1 with an abend condition so records will not appended to the output file and i am assuming that after reading 4 records from the input file abend would occur.
2.Case 2 without an abend condition so records will be appended to the output file and i am commenting out the condition that after reading 4 records from the input file abend would not occur.

sriramla · Beginner Joined: 22 Feb 2003 Posts: 74 Topics: 1

I understand you want to save the appended records if job goes fine. When job abends, you would like to 'rollback' the changes made to the file. In this situation, I would do this:

1. Write the output in a new file
2. If job ends normally, next step in the job will concatenate original file & new file from step 1 to the final output file.
3. If needed, rename the final output file to the orignal file (In effect, you have 'appended' the new records to the file if job runs with no abends).

Note that if job abends then you should not run the concatenate step thereby you have the old file contents as is.

calspach · Beginner Joined: 12 Jun 2006 Posts: 5 Topics: 0

^^ That's what I would do too.

Bithead · Posted: Thu Jun 22, 2006 12:22 pm Post subject:

Try writing them to a temporary dataset in your program then, at the end of the program, read them in and write them to your permenant dataset.