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

Need AIBRETRN value for end of IMS-DB in AERTDLI call.


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
maheshurstd

New User


Joined: 16 Feb 2006
Posts: 14

PostPosted: Tue Nov 13, 2007 3:49 am
Reply with quote

Hi friends,

I'm looking for the AIBRETEN value, when DB2 stored procedure is accessing the IMS-DB and the end of IMS database is reached. This call is established using AERTDLI call and we pass AIB block in the call statement so as to capture the return code and various other fields.

I know that, The equivalent IMS status codes will be GE or GB and If AIBRETRN value is SPACE, then the IMS segment is found successfully.

Similarly, If the segment is not found or the end of IMS-DB is reached, what will be the AIBRETRN values.

Thanks,
Mahesh Urs
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Tue Nov 13, 2007 4:12 am
Reply with quote

You might start exploring (the first link in my signature) and amongst the results find this though I don't know if it satifies your question. If not; feel free to explore some more.
Back to top
View user's profile Send private message
maheshurstd

New User


Joined: 16 Feb 2006
Posts: 14

PostPosted: Thu Nov 15, 2007 12:22 am
Reply with quote

Thanks for your reply.
But the link you gave is for queue manager and i'm looking for the AIBRETRN values returned from the IMS-DB to the DB2 after the "AERTDLI" call. Specially the value returned to DB2, when end of IMS database is reached.

Thanks,
Mahesh.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Thu Nov 15, 2007 2:28 am
Reply with quote

Well, asked a bit around and this was one of the answers. didn't explore them yet but have a look at it.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Thu Nov 15, 2007 2:51 am
Reply with quote

Quote:
The end of database is as you know indicated by the PCB status code GE or GB depending on the DLI call. If you have the AIB, then you can get to the
PCB, by using the AIBRSA1 field in AIB. This points to the PCB block/mask.

The DLI return & reason code values are the same for any IMS module (like
AERTDLI) that uses the AIB interface (as against the PCB interface). The IMS Messages and Codes, Volume 1: Appendix E (GC18-7827-00) book contains the list of return & reason codes and the IMS Application Programming:
Database Manager (SC18-7809-00) book contains the AIB & PCB masks.

For IMS V9, the books are online at:
www-306.ibm.com/software/data/ims/v9/v9index.html


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 Error while running web tool kit REXX... CLIST & REXX 5
No new posts Call program, directly from panel CLIST & REXX 9
No new posts Batch call online program, EXCI task ... CICS 3
No new posts CSQBGET - Call giving completion code... COBOL Programming 3
No new posts CICS DPL call CICS 6
Search our Forums:

Back to Top