Page 1 of 1

Extended restart in IMS

PostPosted: Wed May 06, 2009 5:10 pm
by bommaraju
HI,

This is subramanyam. I am trying to use a extended restart in ims-db program. When the program is running for the first time the XRST call is successful which is the first call in the program. After the program is getting abended, when i am giving the chkptid= last in the jcl as a parameter and restarting the job i am getting an abend U0102.

Here is the XRST call

CALL 'CBLTDLI' USING FUNC-XRST,
PCB0,
IOAREA-LEN,
XRST-WORKAREA,
CHKP-AREA1-LEN,
CHKP-AREA1.


Here is my check point call.

CALL 'CBLTDLI' USING FUNC-CHKP,
PCB0,
IOAREA-LEN,
CHKP-ID,
CHKP-AREA1-LEN,
CHKP-AREA1.

Please let me know on how to pass the check point while using extended restart. if you can paste any sample jcl that would be great.

Thanks in advance,
Subramanyam.

Re: Extended restart in IMS

PostPosted: Thu May 07, 2009 1:52 am
by dick scherrer
Hello and welcome to the forum,

Have you researched the U0102 abend? What does it say?

Have you spoken with your dba?