Restart the file from abended records not from the begening

Tunaj · New User Joined: 23 Oct 2009 Posts: 4 Location: Hyderabad

Suppose one of my program is reading a file which contains 10,000 records and writing to another output file,it got abend after processing 500 records.I need to restart the program so that it will start processing of records from 501 records not from the begening.So what would be my code insite the program so that it will process the record from 501 record.

Thanks
Pratap

expat · Posted: Mon Mar 28, 2011 3:10 pm

The restartability of any program depends entirely on what it is doing, what it has done up to and including the point of abend.

So without a heck of a lot more details from you the question is impossible to answer.

Robert Sample · Posted: Mon Mar 28, 2011 3:15 pm

Unless your program was written from scratch to handle this type of restart scenario, you most likely cannot do so now. The program has to have a way to identify which record to restart from, read and ignore that many input records, and so forth. The logic is not complicated but unless the program was written this way it is usually not worth the effort to go back and add the logic.

Furthermore, most sites have decided the cost of rerunning the entire job (especially for such a small record count) doesn't justify adding restart logic into the code these days.

Tunaj · New User Joined: 23 Oct 2009 Posts: 4 Location: Hyderabad

How I will write the logic(Code in cobol) in the program so that it will read and bypass the 500 record and start processing from 501 record.I am not geting any idea how to code.if someone will help me in code it will be great.

Kjeld · Posted: Mon Mar 28, 2011 3:46 pm

You should definitely not write your own logic for rolling back changes since last commit point, and positioning into datasets at restart.

If your site has IMS, you could use IMS checkpoint/restart to handle this.

enrico-sorichetti · Posted: Mon Mar 28, 2011 3:52 pm

if You cannot by Yourself discover/imagine that You need to initialize a counter, read one record, increment the counter, keep reading until the counter is equal to the <restart> record (*)
You do not have a place in IT!

(*) a PERFORM might be another approach... but I do not speak COBOLESE, and I might be wrong

vadim vashchenko · New User Joined: 21 Mar 2011 Posts: 13 Location: usa

Kjeld · Posted: Mon Mar 28, 2011 6:16 pm

Checkpoint/restart is not a simple task. You have to control writing to sequential output files so that you are able to roll back changes done since last checkpoint if an abend occurs. Likewise, database updates should be syncronised, committed in checkpoints.

Positioning your input dataset is just one of these challenges. Usually, relative block address (RBA) is used to track position in a sequential dataset.

PeterHolland · Posted: Mon Mar 28, 2011 10:21 pm

If its just a situation like this :

old master + updates = new master (old master in the following run) :

then make a copy with for example of your update file skipping the first 500 records, and do a rerun with your new update file.

And yes this kind of nonsense worked around 40 years ago when nobody had heard about any kind of totals to check if the update process was valid.

And kjeld ims has nothing to do with this, i didnt see anything related to ims. Restart logic for normal batch update programs is quite another story.

Kjeld · Posted: Tue Mar 29, 2011 4:11 am

PeterHolland · Posted: Tue Mar 29, 2011 1:44 pm

This link could help :

publib.boulder.ibm.com/infocenter/ratdevz/v7r6/index.jsp?topic=/com.ibm.ent.cbl.zos.doc/topics/PGandLR/concepts/cpchk02.htm

Peter Nancollis · New User Joined: 15 Mar 2011 Posts: 47 Location: UK

Guys the question asked was
"I need to restart the program so that it will start processing of records from 501 records not from the begening"

enrico hit the mark ....

Outputs havent even been considered
Too simplistic for words

dbzTHEdinosauer · Posted: Wed Mar 30, 2011 10:27 am

do a right click and save this pdf and then read it:
pdf with restart logic