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

Cobol IMS program


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

New User


Joined: 06 Mar 2008
Posts: 30
Location: kottayam

PostPosted: Fri Dec 03, 2010 12:09 pm
Reply with quote

Hi All,

I am new to IMS...Currently I am writing a new module to access an IMS DB.

We want to fetch a age of an account from one of the subsegments of the DB.We dont have to the account number with us and i want to get all the account in the DB.Is it possible for me to get the age status in subsegment by moving '0' 's to the account DB key using the relational operator '>'.
Back to top
View user's profile Send private message
Kjeld

Active User


Joined: 15 Dec 2009
Posts: 365
Location: Denmark

PostPosted: Fri Dec 03, 2010 2:58 pm
Reply with quote

It should work... what have you actually tried?
Back to top
View user's profile Send private message
rickyc.mathew

New User


Joined: 06 Mar 2008
Posts: 30
Location: kottayam

PostPosted: Fri Dec 03, 2010 3:23 pm
Reply with quote

Hi Kjeld,

My key is defined as
01 db-key
05 control-number
05 account-number

I have only control number with me and dont have the account number.But there are multiple account numbers against the same control number.Now what I am trying to do is I want to fetch the age status for each of these account numbers and write it to the file.

I have given a qualified GN call to get the account numer and an unqualified GNP call to the age status.

Could you pls advise me...

Thanks ,
Ricky
Back to top
View user's profile Send private message
Kjeld

Active User


Joined: 15 Dec 2009
Posts: 365
Location: Denmark

PostPosted: Fri Dec 03, 2010 3:42 pm
Reply with quote

I think you have to share more information on your database design, what segments it contains, and their keys.

What do your calls return?
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 Dec 06, 2010 6:06 pm
Reply with quote

IMS is not a relational database. It is a heirachy. When asking these types of questions, you need to tell us at what segment level you need to retrieve information. Is is the root? Please post the DBD structure. You don't FETCH in IMS. You execute some type of GET CALL depending on what you want. You may use 1 SSA or many, etc, etc.
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 Replace each space in cobol string wi... COBOL Programming 3
No new posts Using API Gateway from CICS program CICS 0
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
Search our Forums:

Back to Top