Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Issue in IMS GU call using partial key

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

New User


Joined: 23 Nov 2005
Posts: 23

PostPosted: Fri Jul 10, 2009 9:20 pm    Post subject: Issue in IMS GU call using partial key
Reply with quote

Hi All,

I am doing a simple GU call using a partial key but I am not getting the desired O/p.

ex;

Table looks like ;

MO# LN# SHIP#
CM000232 01 00
CM000232 02 00
FZ000482 01 00
FZ000483 01 00
FZ000484 01 00
FZ000485 01 00
FZ000486 01 00
FZ000487 01 00
:
:
I have passed MO# CM000232 and going for a GU using '=>' .I expected the call to return 'CM000232 01 00 " but I got 'FZ000487 01 00'.

I coded it like ;


MOVE LOW-VALUES TO WS-TABLE-KEY.
MOVE WS-HOLD-MO TO WS-MO-NUMBER. (value : CM000232)
MOVE WS-TABLE-KEY TO TAROOT-SSA-KEY.
MOVE '=>' TO TAROOT-SSA-OPER.
DISPLAY 'SSA-OETAROOT' SSA-OETAROOT
CALL 'CBLTDLI' USING GU
TA-PCB-NAME-CTRL
OETAROOT
SSA-OETAROOT.


What could be the reason.. icon_eek.gif

Thank you,
Me.
Back to top
View user's profile Send private message

qzphc5

New User


Joined: 24 May 2003
Posts: 3
Location: USA

PostPosted: Sat Jul 11, 2009 1:16 am    Post subject: Reply to: Issue in IMS GU call using partial key
Reply with quote

Code a Boolean SSA and try to read all the seg occurenaces in the Key ranges you ar expecting to read
Back to top
View user's profile Send private message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Sat Jul 11, 2009 1:23 am    Post subject:
Reply with quote

Please use code tags and show us the SSA definition.
Back to top
View user's profile Send private message
sonu_winks

New User


Joined: 23 Nov 2005
Posts: 23

PostPosted: Sun Jul 12, 2009 11:42 am    Post subject:
Reply with quote

SSA is defined as ;

Code:
05  FILLER                 PIC X(8) VALUE 'OETAROOT'.     
05  TAROOT-SSA-AST         PIC X VALUE '*'.               
05  TAROOT-SSA-CC1         PIC X VALUE '-'.               
05  TAROOT-SSA-CC2         PIC X VALUE '-'.               
05  TAROOT-SSA-QUAL        PIC X VALUE '('.               
05  FILLER                 PIC X(8) VALUE 'TABKEY'.       
05  TAROOT-SSA-OPER        PIC XX VALUE ' ='.             
05  TAROOT-SSA-KEY         PIC X(24).                     
05  FILLER                 PIC X VALUE ')'. 


Value passed :

Code:
OETAROOT*--(TABKEY  =>CM000232                )
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Mon Jul 13, 2009 8:04 pm    Post subject:
Reply with quote

Try changing your GU to a qualified GN. And, it is not a table - DB2 has tables - IMS has databases.
Back to top
View user's profile Send private message
sonu_winks

New User


Joined: 23 Nov 2005
Posts: 23

PostPosted: Tue Jul 14, 2009 9:51 pm    Post subject:
Reply with quote

GN was not working... icon_exclaim.gif
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Jul 15, 2009 12:34 am    Post subject:
Reply with quote

Hello,

Do NOT post "it didn't work. . . The only answer we can offer to that is "Fix it".

You need to take the time to clearly explain what you changed and what happened.

If you post code as part of your explanation, use the "Code" tag as this greatly improves readability.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Wed Jul 15, 2009 4:37 am    Post subject:
Reply with quote

Do not use a > than - use a GN (equal) with a fully qualified SSA and post your code. Dick is correct - we can only help if we know what the BUSINESS REQ is and what you plan to do to resolve it.
Back to top
View user's profile Send private message
Lavansekar247

New User


Joined: 09 Jun 2009
Posts: 6
Location: Chennai

PostPosted: Wed Jul 15, 2009 4:13 pm    Post subject: Issue in IMS GU call using partial key
Reply with quote

Hello,
By looking at your problem statement, appears the GU call retrieves the last occurence for the qualified SSA. But you are expecting the first occurence as per your example.

I have few questions,
1. When you issue GU call with SSA(stated above), the call status was success, but when you validate that was not the one which you have expected. I mean the last occurence was there in IO area rather than the first occurence. Is this correct?

2. Did you get a chance to see how the database organized, by means of data stored in Database. Has DBD says the storing latest data at the top other way, hence you got the last occurrence as first.

3. Can you share WS-TABLE-KEY declaration. Did you ever tried to pass Spaces into WS-TABLE-KEY rather than low-values.

This might not resolve the issue but helps to understand the real problem.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Wed Jul 15, 2009 5:53 pm    Post subject:
Reply with quote

Please look at the DBD and give us the structure. Is it HDAM or HIDAM?
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 Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts Need help in REXX CALL program Raje1002 CLIST & REXX 5 Wed Apr 19, 2017 11:18 pm
No new posts Need help in triggering a PL1 module ... Varungv99 IMS DB/DC 0 Fri Apr 07, 2017 10:01 am
No new posts Execessive parameter issue Sumeendar JCL & VSAM 5 Mon Dec 19, 2016 4:35 pm
No new posts DFHRESPONSE returns issue divated CICS 3 Wed Nov 02, 2016 6:32 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us