IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

same checkpoint id is taken everytime .
IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
ektaag

New User


Joined: 21 Mar 2007
Posts: 14
Location: bangalore
PostPosted: Mon Oct 05, 2009 1:09 pm
 Reply with quote
Hi,

i am getting same CKPTID in my checkpoint call after restart while i am moving a new order no before taking checkpoint .
Code:

3200-TAKE-CHECKPOINTS.                                       
* DMISEDA                                                   
    DISPLAY ' 3200-TAKE-CHECKPOINTS'.                       
    DISPLAY ' WS-PBCC-ORDER ' WS-PBCC-ORDER.                 
* DMISEDA                                                   
                                                             
    INITIALIZE WS-CHKP-COUNT.                               
    MOVE WS-PBCC-ORDER                TO WS-CHKP-ORDER-NUM. 
    ADD  WSN-1                        TO WS-CHKP-COUNT.     
    MOVE SYSTEM-TIME                  TO WS-CHKP-TIME.       
                                                             
* DMISEDA                                                   
    DISPLAY ' WS-CHKP-ORDER-NUM ' WS-CHKP-ORDER-NUM.         
* DMISEDA                                                   
    CALL 'CBLTDLI' USING CHKP                               
                         IO-PCB                             
                         WS-CHKP-IO-LEN                     
                         WS-CHKP-IO-AREA-ID                 
                         WS-CHKP-AREA-LEN                   
                         WS-CHKP-XRST-AREA.                 




Code:
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093752208179-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093752435837-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093752660605-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093752815523-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093752962074-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093753144438-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093753280964-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093753431788-0400 IMSP                 
*EXTENDED CHECKPOINT* PROGRAM=IGUU0069,CKPTID=05374200,REGID=002A,DAY=277,
*EXTENDED CHECKPOINT* DAY=277,TIME=093753546453-0400 IMSP               



Please help me out in solving the problem.
This has become a very critical issue in my project.

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

New User


Joined: 01 Sep 2007
Posts: 5
Location: singapore
PostPosted: Mon Oct 05, 2009 4:43 pm
 Reply with quote
hi

pls check following type of code correct in your prg.
check CHECK-FOR-RESTART in initialization paragraph
issue restart call
W001-XRST-ID-CNTR value will be generated by your restart call

IF W001-XRST-ID = SPACE
PERFORM NORMAL-START-PROGRAM
ELSE
PERFORM RESTART-PROGRAM
END-IF


MOVE W001-XRST-ID-CNTR TO W001-CHKP-NUM
ADD WSL300-1 TO W001-CHKP-NUM
MOVE W001-CHKP-NUM TO W001-CHKP-ID-CNTR
issue checkpoint call

with regards
sivakumar.v
Back to top
View user's profile Send private message
ektaag

New User


Joined: 21 Mar 2007
Posts: 14
Location: bangalore
PostPosted: Tue Oct 06, 2009 11:15 am
 Reply with quote
Thanks for your help Siva.

I was incrementing thw wrong variable and took checkpoint counter length as 9(7) instead of 2 so it was giving 00 always same.

Thanks,
Ekta
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IMS DB/DC

 

Similar Topics
Topic Forum Replies
No new posts IMS BMP Checkpoint Overhead IMS DB/DC 6
No new posts Need points to tune IMS Checkpoint Pr... IMS DB/DC 2
No new posts Query about IMS extended checkpoint u... IMS DB/DC 5
No new posts A checkpoint counter sets at 100,need... IMS DB/DC 13
No new posts Doubt on checkpoint restart logic IMS DB/DC 10
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us