View previous topic :: View next topic
|
Author |
Message |
narasimha.g
New User
Joined: 10 Sep 2009 Posts: 68 Location: Liverpool
|
|
|
|
Hi All,
When im Trying to inserts segments into the database using a Cobol IMS program, the job is getting abended with following error message....
Can this be resolved by checkpoint logic??? If yes could you please let me know how to incorporate checkpoint restart logic in a cobol IMS program....
Code: |
DFS0781I ABEND 0775 IN DFSECP20+S203+SP53+910+05/08/05PQ98461 A IMSL
PIG J5092 DFS0781I ABEND 0775 IN DFSECP20+S203+SP53+910+05/08/05PQ98461 A
IEA995I SYMPTOM DUMP OUTPUT 130
USER COMPLETION CODE=0775
TIME=12.42.26 SEQ=09735 CPU=0000 ASID=0060
PSW AT TIME OF ERROR 078D1000 8F002E42 ILC 2 INTC 0D
ACTIVE LOAD MODULE ADDRESS=0F002990 OFFSET=000004B2
NAME=DFSECP20
DATA AT PSW 0F002E3C - 00181610 0A0D0A0D 00000000
GR 0: 80000000 1: 80000307
2: 00007650 3: 00C00060
4: 0C8DA060 5: 0002D9D8
6: 002A298C 7: 002A2954
8: 0029EC80 9: 80006178
A: 0029EC80 B: 0029EC9C
C: 8F002990 D: 0029EE90
E: 8F0029F0 F: 8F002990
END OF SYMPTOM DUMP |
|
|
Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
U0775
BMP program abended due to exceeding IMS calls between checkpoints.
Program has made too many calls without taking a checkpoint.
Could previous statements be the reason? |
|
Back to top |
|
|
narasimha.g
New User
Joined: 10 Sep 2009 Posts: 68 Location: Liverpool
|
|
|
|
PeterHolland wrote: |
U0775
BMP program abended due to exceeding IMS calls between checkpoints.
Program has made too many calls without taking a checkpoint.
Could previous statements be the reason? |
Thanks for the reply....yaa i guess soo....
If u could give me a sample logic of how to incorporate checkpoint logic in program that would be very helpful.... |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 Location: italy
|
|
|
|
U775 - UNABLE TO AQUIRE A BLOCK OF STORAGE FOR QUEING CONTROL BLOCKS
since we do not know anything about Your system setup, we cannot tell
it might even be a gross mistake in defining the QCB pool characteristics
the best thing would be to ask You support and work with them for a solution
maybe just enlarging/adjusting the IRLM parameters could be enough |
|
Back to top |
|
|
narasimha.g
New User
Joined: 10 Sep 2009 Posts: 68 Location: Liverpool
|
|
|
|
enrico-sorichetti wrote: |
U775 - UNABLE TO AQUIRE A BLOCK OF STORAGE FOR QUEING CONTROL BLOCKS
since we do not know anything about Your system setup, we cannot tell
it might even be a gross mistake in defining the QCB pool characteristics
the best thing would be to ask You support and work with them for a solution
maybe just enlarging/adjusting the IRLM parameters could be enough |
Thanks Enrico.... Will do that... |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 Location: italy
|
|
|
|
Quote: |
...could you please let me know how to incorporate checkpoint restart logic in a cobol IMS program.... |
You cannot expect a forum to provide/teach what could be the object of an hefty consulting contract...
too many things to take into account, the programming part is just a low level technicality |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
If u could give me a sample logic of how to incorporate checkpoint logic in program |
The "logic" is quite simple - just issue the checkpoint. . .
Having said that, the challange arises deciding when/where to issue the checkpoints. Checkpoints ar mostly to mark the end of a logical unit of work and ensure they are committed to the database (ie - a subsequent data error or program abend will not "undo" them). If you choose to checkpoint within a process, you also need to know how to restart/rerun the prcess. Which should be decided by your organization, not implemented for a single program. |
|
Back to top |
|
|
Ed Goodman
Active Member
Joined: 08 Jun 2011 Posts: 556 Location: USA
|
|
|
|
Also, performing the CHKP call will make you lose position in all of your databases. So if you are walking a database and using it as your driver, you have to save that key, take the checkpoint, then do a GU call to get back to that key in the DB.
To see how your shop handles this, I'd suggest you do a scan on the source library for "CHKP". Then study that program a little bit to see how your shop's standards are implemented. |
|
Back to top |
|
|
|