Create an dummy dataset and insert one dummy record in it ..in ur procedure division read this record and using start key place the point there and move the record to working storage and insert it into table...
Add one counter variable for every 1000 records give one commit before commit please write that last record in that dummy dataset....if u got any error read the last record in that dummy dataset and place that point in that dataset with start key...
please try it if any feedback pls inform me...
When reading a VSAM file and updating database with information read from file in between if Job Abends how to Restart the Job
I Guess developer would place some logic in Program to handle such scienarios ...need inputs on this.
i think this is the way .. my friend is working and told they r having one utility namely RESTART in that they register their program it atomatically restart the program where it got abends... i dont know exactly but he told me like this...pls enquire and give feedback