Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Abends with return code 0361 on some 'inauspicious ' days

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IDMS/ADSO
View previous topic :: :: View next topic  
Author Message
Pjoe

New User


Joined: 22 Jul 2005
Posts: 17

PostPosted: Fri Jul 22, 2005 2:44 pm    Post subject: Abends with return code 0361 on some 'inauspicious ' days
Reply with quote

Hi All,
I have a job which abends with return code 0361 on some 'inauspicious ' days.
The error code details is " No record can be found for a pointer db-key. This is often caused by broken chains in the db due to incorrect recovery.".

This happens in a obtain last record within set-name statement .I am handling only on db-end-of-set. I can trap this error with on any-error-status . But the customer standards do not allow using on any-error-status. Please note that the record i am accessing is updated simultaneously by other programs also. If i get am getting a dead lock abend, i could have convinced the customer . Can any body explain the broken chain concept. I feel that this due some problem in pointers(next,prev etc) in the record.It will be of great help to me , if any body can throw some light on the root cause of this issue.

With regards,
Joe
Back to top
View user's profile Send private message

Puneet

New User


Joined: 27 Jun 2005
Posts: 9
Location: Chennai

PostPosted: Mon Sep 19, 2005 9:59 am    Post subject:
Reply with quote

HI Joe,

Sorry for sending the Reply quite Late.
According my understandings :The Broken chain happens in IDMS when a key stored in some Record(This key is used to access some other record in a different Area, for example Key Stored in Record A can be used to Obtain Record B using Sort keys ) is not able able to fetch a Record using this key value as sort key. This generally happens when the database refresh does not happen
correctly in different Areas.

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

New User


Joined: 25 Aug 2006
Posts: 5

PostPosted: Fri Aug 25, 2006 11:11 pm    Post subject:
Reply with quote

0361 in online envirnment is quite strage. I suggest to put Retrival Lock on all ADS dialogs, so you would either get a deadlock or successful transaction but not a 0361.

0361 in a batch retrieval job is acceptable if other updates jobs are running. As you implicitly know that retrieval job would do "dirty read"s.
Back to top
View user's profile Send private message
visun_2010

New User


Joined: 16 Oct 2006
Posts: 1
Location: BANGALORE

PostPosted: Mon Oct 16, 2006 2:20 pm    Post subject:
Reply with quote

Hi,

It could be due to recent program has deleted the record which you are try to access, then also this problem can occur. Do you try to get the record using the db_key or walking the set? If possible send me the code list, it would be easy to fix.

Sundar
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 -> IDMS/ADSO All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts EXIT or RETURN cvnlynn CLIST & REXX 9 Wed Jul 19, 2017 2:50 am
No new posts UNIT=AFF for Easytrieve code gandikk JCL & VSAM 7 Wed Jul 12, 2017 11:42 pm
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
No new posts COBOL Code Parsers and Lineage Establ... balimanja COBOL Programming 2 Tue May 02, 2017 3:30 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us