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
 

 

IMS abend 0849

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

New User


Joined: 13 Apr 2007
Posts: 59
Location: Bangalore

PostPosted: Mon Feb 27, 2012 6:08 pm    Post subject: IMS abend 0849
Reply with quote

Hi,

When I searched for the reason for IMS abend 0849, it's found that an illegal datashare of a database can cause this abend. Can someone throw some light on this?

The databases which face this issue are part of an application which has a control database. So if there is any illegal access in this particular database, will that cause abend in all the related database?

Thanks for your help,

Reni.
Back to top
View user's profile Send private message

Ed Goodman

Active Member


Joined: 08 Jun 2011
Posts: 556
Location: USA

PostPosted: Mon Feb 27, 2012 8:36 pm    Post subject:
Reply with quote

My manual says this is a pseudoabend... did you look up the original abend code?
Back to top
View user's profile Send private message
guruji
Warnings : 1

New User


Joined: 13 Apr 2007
Posts: 59
Location: Bangalore

PostPosted: Mon Feb 27, 2012 8:58 pm    Post subject:
Reply with quote

Hi,

I've read the manual and saw that it's a pseudo abend. But we are getting this when we try to acces the databases through IMS Filemanager. Though checked in IMS Logs, original abend could not be found.

Anyone has faced any such issues before?

Thanks,
Reni.
Back to top
View user's profile Send private message
Ed Goodman

Active Member


Joined: 08 Jun 2011
Posts: 556
Location: USA

PostPosted: Tue Feb 28, 2012 4:13 am    Post subject: Reply to: IMS abend 0849
Reply with quote

From the IBM manual about processing options ( the PROCOPT in the PSB)
O
If the O option is used for a PCB, IMS does not check the ownership of the segments returned. Therefore, the read without integrity program might get a segment that has been updated by another program. If the updating program abends and backs out, the read without integrity program will have a segment that does not exist in the database and never did. If a segment has been deleted and another segment of the same type has been inserted in the same location, the segment data, and all subsequent data returned to the application, can be from a different database record. Therefore, if you use the O option, do not update based on data read with that option. O must be specified as GO, GON, GONP, GOT, GOTP, or GOP only.

IMS recognizes some of these error types and converts them to abend U0849. However, other conditions that occur under PROCOPT GOx are not detected as having been caused by the read-without-integrity. It is possible to get loops, hangs, and system abends. When using this PROCOPT, carefully consider system design to determine if concurrent update activity is likely to cause higher risk of these kinds of conditions.
Back to top
View user's profile Send private message
Ed Goodman

Active Member


Joined: 08 Jun 2011
Posts: 556
Location: USA

PostPosted: Tue Feb 28, 2012 4:15 am    Post subject:
Reply with quote

If you look at the description of U0849, it tells you how to find the original abend, and it's NOT in the logs.
Back to top
View user's profile Send private message
guruji
Warnings : 1

New User


Joined: 13 Apr 2007
Posts: 59
Location: Bangalore

PostPosted: Tue Feb 28, 2012 3:44 pm    Post subject:
Reply with quote

Hi,

I've changed my PCB such that the PROCOPT is NOT 'GO' now and tried to access the DB. But whichever procopt I give (e.g., A, G, GR, GIRD, GPR), the Filemanager is issuing the error ' IMS call to free current database record lock failed RC 0 status code AD' .

As AD points to incorrect function code, it sounds like non other than GOx suits here. Anyone has any idea?

Thanks,
Reni.
Back to top
View user's profile Send private message
Ed Goodman

Active Member


Joined: 08 Jun 2011
Posts: 556
Location: USA

PostPosted: Tue Feb 28, 2012 10:13 pm    Post subject:
Reply with quote

Hmmm... Are you using an existing PSB? Are you sure you are selecting the correct PCB within it?

Also, you seem to have divined an odd explanation again from the error message. AD does not point to an incorrect function code. It's saying that the function code is inappropriate for the PCB being used. That's a world of difference.

I would try letting FileManager build the PSB dynamically and see if that helps.

I am suspicious that you are working with a different PCB than you think you are. You know that if you include a "COMPAT=YES" in a PSB that it adds an extra PCB up front? If you use a DB call against that PCB, you would get an AD error.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Feb 29, 2012 4:11 pm    Post subject:
Reply with quote

Ed Goodman wrote:
You know that if you include a "COMPAT=YES" in a PSB that it adds an extra PCB up front? If you use a DB call against that PCB, you would get an AD error.
Thanks for this information, Ed.

Have a good one,

Regards,
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 IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts S213-14 ABEND explantion Apurva Mehta JCL & VSAM 5 Thu Jul 07, 2016 10:56 pm
No new posts How to determine where is error in ab... jackzhang75 PL/I & Assembler 13 Fri Apr 15, 2016 2:01 am


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