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
 

 

Cobol IMS program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
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    Post subject: Cobol IMS program
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    Post subject:
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    Post subject:
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    Post subject:
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    Post subject:
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    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 XML Parse for COBOL 5.2 Bhanu Praveen COBOL Programming 1 Sat Jul 08, 2017 8:58 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm
No new posts pre-compiler for program in an HFS Pedro DB2 0 Fri Jun 23, 2017 11:13 pm
No new posts Dynamic output file creation in cobol... smileheal COBOL Programming 7 Thu Jun 15, 2017 10:53 pm
No new posts Search utility(3.14) using JCl and Cobol RKS3 COBOL Programming 12 Sat Jun 10, 2017 10:24 pm


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