Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Confusing problem in checkpoint restart program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
itssreehere
Warnings : 1

New User


Joined: 10 Jan 2006
Posts: 65
Location: chennai

PostPosted: Fri Mar 17, 2006 6:30 pm    Post subject: Confusing problem in checkpoint restart program
Reply with quote

Hi all,

I've a checkpoint restart program.Flow of the program is like this,

GN call to DB1.
increase counter by 1
processing
GHU call to DB1.
REPL call to DB1.

if counter > 5
CHKP-call-DB1-para.
end-if

again GN call to DB1.
----------------------------------------


It is working fine till counter reache 5.ie. am geeting the problem after checkpointing.Following is the logic in CHKP-call-DB1-para.

issue a check point call to DB1. Now it lost all the pointers to DB1.So we need to reset the ponter at the current record.For doing that am issuing a GU call with the saved key. This should position the pointer at the check pointed record and then again GN calls will be issued as usual.


But this GU call is returning 'GE', eventhough the record exists in DB1.
Also the GN and GHU for the same key eas successful. But for the same key GU is returning GE.

We are sure that it is not the problem with the program. This code is working fine in production. We are testing it in BTSB. Either it will be DBD/PSB/BTSB environment proble. Did anybody faced a similar case ever? We checked the PSB and DBD many times and foun that it is okay

Thanks,
Sreejith
Back to top
View user's profile Send private message

martin9

Active User


Joined: 01 Mar 2006
Posts: 290
Location: Basel, Switzerland

PostPosted: Fri Mar 17, 2006 7:33 pm    Post subject:
Reply with quote

hy itssreehere,

you have to make a qualifiesdssa call to dl1.
because your first call must be a GU, because
after checkpoint the position is lost and you
have to reposition. this also beacause with
checkpointing, your program is enabled for
restart after any abend. therefore on the checkpoint
write out in the restart-area your last key accessed,
and then a GU with GT on this key.

martin9
Back to top
View user's profile Send private message
itssreehere
Warnings : 1

New User


Joined: 10 Jan 2006
Posts: 65
Location: chennai

PostPosted: Sat Mar 18, 2006 8:38 pm    Post subject: Re: really confusing problem..
Reply with quote

Ya Martin.We are doing the same. We are reading the saved key and reposition the pointer with a qualified GU call. This code is working in production.But in BTSB environment this GU call returns 'GE' eventhough it is present in data base. Also the previous GN and GHU calls were successfull for the same key.

Sreejith
Back to top
View user's profile Send private message
itssreehere
Warnings : 1

New User


Joined: 10 Jan 2006
Posts: 65
Location: chennai

PostPosted: Mon May 07, 2007 5:23 pm    Post subject:
Reply with quote

FYI.. The issue was with the BTSB ID we used. The DBD lib used for loading data in to BTSB and DBD lib used for running the program were different.I re-organized the BTSB ID with same DBD lib.Now it's working with same program

Sreejith
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts The same REXX program doesnt work for... jackzhang75 CLIST & REXX 5 Wed Dec 06, 2017 2:51 am
No new posts Control-M restart instruction sonaliingle CA Products 2 Tue Nov 28, 2017 5:05 pm
No new posts Calling IKJEFT01 program from Rexx upendrasri CLIST & REXX 8 Wed Nov 15, 2017 4:27 pm
No new posts Having a problem FTP'ng to the MF pahiker All Other Mainframe Topics 2 Fri Nov 10, 2017 8:20 pm
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us