could you give me an example how, where i code CHECKPOINT
and restart...I need and example....thanks..

Answer Posted / vicky

Since I cannot type in all details...just letting u know some of them----
we need to make some changes to the JCL and also the cobol pgm.
In JCL-
Firstly, we need to include a library for smart restart.
Secondly, define a DSN for the chkpoint restart file, that shall store the information about the chkpoint created and with the number of records committed till the abend occurred ,so that when Job is restarted chkpoint can be checked.
Thirdly,the SYSIN for the RAINPUT step will consist of all the other parameter.Eg- frequency, chkpoint, sql code, etc

JCL will look like-
//EXAMPLE JOB
//STEP1 EXEC PGM=EXAMPLE
//define libaries
//OUTFILE DD DSN=file PS ,DISP=OLD
//
//RAINPUT DD * <-- Optional Smart/RESTART parameter file

CKPT_PACE(50)
//

Coming to the cobol pgm-

we need to code a switch whose value can be chked in case of abend, based on negative SQLCODE returned.
the value returned can be
0 = (Intial start)
1, +2001 = (Restart)
Later Commit para can be called.
If value 1 and +2001 , the pgm can be restarted for a same sqlcode returned , that number of times defined in
parameter of RAINPUT

Hope u could be somewht clear to this,,,

Is This Answer Correct ?    1 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What are the two types of logging in the db2 database? Explain them.

568


What is cascading rollback?

617


How many databases can be created inside an instance in db2 ?

591


What is host variable?

588


What's The Error Code For Unique Index Voilation?

648






What is the use of predicate?

580


What is a db2 tablespace?

593


How to get the ddl of a table in db2?

671


Name the various locking levels available?

628


by using cursors , we can access particular records from the table based on some condition, i want to delete those selected records, how can we write a query for this in the program?

7485


How to check last update on table in db2?

624


How to find primary key of a table in db2?

600


Give the name of some fields form sqlca.

607


What is consistency token in db2?

634


What does db2 blu stand for?

656