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
 

 

Information on the result of GHU and GU call on failure

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

Active User


Joined: 14 Aug 2006
Posts: 198

PostPosted: Fri Feb 09, 2007 1:23 pm    Post subject: Information on the result of GHU and GU call on failure
Reply with quote

Can any one please give information on the result of GHU and GU call on failure.

That is in case a GU or GHU call fails what will be the value contained in IO area.

Will the values already present in IO area cleared out.
Back to top
View user's profile Send private message

Bitneuker

CICS Moderator


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

PostPosted: Mon Feb 12, 2007 1:07 am    Post subject:
Reply with quote

Unpredictable. If a GU-call fails you should correct your ssa-content. Follow the link in my signature and search for GU. Have fun exploring and if you don't find your answers you're wellcome to post........... icon_wink.gif
Back to top
View user's profile Send private message
abin

Active User


Joined: 14 Aug 2006
Posts: 198

PostPosted: Thu Feb 15, 2007 12:40 pm    Post subject: Thanks for reply
Reply with quote

Hi George

Thanks for the reply

Sorry for being so late to reply.
I searched the documents you refered to . But my doubt is not cleared.
I will tell exactly what the issue is

If before I have some value ( Not Junk) in IO AREA and using this IO AREA I am making a GHU call. If this GHU call fails, will the value in IO AREA be preserved or will it be cleared out with some junk value.

My concern is whether the values previously in IO area be retained back in case of a failure in GHU call.

I hope I explained it properly.

Any who knows please help on this topic.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Thu Feb 15, 2007 3:44 pm    Post subject:
Reply with quote

I don't know why you want to know this but imho the 'old' values should be available in your working storage or declared variable. No segment is returned into the io-area. Below a BTS-test with a successfull GU returning an ioarea and an unsuccessfull GU showing no ioarea is returned. Why don't you just save the ioarea after a successfull GU? Or even better; have your tried icon_rolleyes.gif

Code:
****** DB CALL- FUNC=GU  , PCB=DBNLVER , STATUS=  , LEVEL=01, SEGMENT=QSALVERT
         KFB=    @                                                           
             10177                                                           
             C320C                                                           
        SSA1=QSALVERT(Q01POLNR =    @)                                       
             DECDECDE4DFFDDDDD47101775                                       
             82135593D801763590EC320CD                                       
PAGE 0084                B A T C H   T E R M I N A L   S I M U L A T O R   ' B
             ----.----1----.----2----.----3----.----4----.----5----.----6----.
      IOAREA=    @                                                           
             10177100000000000000000000000000000000000000000000000000000000044
             C320C0C000C000C0C000C000C000C0CC000CC00C00C000C00C00CC00C0CCC0C00
                                                                             
             000000044000000000000444444444444000000000000000000             
             CCCCCCC000000C0000C0C000000000000000000000000000000             
****** DB CALL- FUNC=GU  , PCB=DBNLVER , STATUS=GE, LEVEL=01, SEGMENT=QSALVERT
         KFB=    @                                                           
             10177                                                           
             C320C                                                           
        SSA1=QSALVERT(Q01POLNR =    @)                                       
             DECDECDE4DFFDDDDD47101775                                       
             82135593D801763590EC320CD                                       
        SSA2=QSPRSCHP                                                         
             DEDDECCD4                                                       
             827923870                                                       
****** DB CALL- FUNC=GU  , PCB=DBNLVER , STATUS=GE, LEVEL=01, SEGMENT=QSALVERT
Back to top
View user's profile Send private message
abin

Active User


Joined: 14 Aug 2006
Posts: 198

PostPosted: Thu Feb 15, 2007 3:55 pm    Post subject:
Reply with quote

HI George,

Thanks for the reply.
It is true. I can try it see it for myself.
And I always can save the value in WS variable.
But in my case I cannot touch the code. And the code is working fine when it should not? I wanted to make sure this is not a random process.

The actual scenario is like this.

I mmove certain value to IO area.
I make a GHU call with same IO area which fails.
I make a ISRT call with same IO area and the segment is inserted properly.

This shows even after GHU fail the value in IO area is not gone. I wanted make it sure this is not because of some luck from my part.

And unfortunatelly my doubt is not cleared.

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

CICS Moderator


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

PostPosted: Thu Feb 15, 2007 4:13 pm    Post subject:
Reply with quote

Why doubt if you don't have a problem? Put a bit of trust in the system. If you already have your doubts here I know many more situations in applications much more doubtfull like unprotected borders of subscripted tables icon_wink.gif Furthermore a computer is known to act rather consistent. If results deviate it is usually because of influence from the outer world.
or a new release of some system component
Back to top
View user's profile Send private message
abin

Active User


Joined: 14 Aug 2006
Posts: 198

PostPosted: Thu Feb 15, 2007 4:21 pm    Post subject:
Reply with quote

Thanks Guys for all your help.

Lets see what the system do over the time.
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
This topic is locked: you cannot edit posts or make replies. Rexx to create GDG by scanning JJ result krish.deepu CLIST & REXX 5 Tue Oct 25, 2016 5:32 pm
No new posts Cobol EZASOKET call to SETSOCKOPT fails Andi1982 COBOL Programming 6 Thu Oct 06, 2016 7:12 pm
No new posts Strange EXEC function call in z/VM Willy Jensen CLIST & REXX 3 Wed Oct 05, 2016 2:07 pm
No new posts Obtaining file information pahiker COBOL Programming 25 Tue Sep 27, 2016 7:25 pm
No new posts COBOL DB2 - CALL statement - high CPU... TS70363 DB2 15 Sun Sep 11, 2016 6:07 am


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