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

Abends with return code 0361 on some 'inauspicious ' days


IBM Mainframe Forums -> IDMS/ADSO
Post new topic   Reply to topic
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
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
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
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IDMS/ADSO

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
No new posts VSAM return code 23 - for a Random read COBOL Programming 4
Search our Forums:

Back to Top