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

Retrieve IMS SubSystem Name


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

New User


Joined: 03 Mar 2006
Posts: 45
Location: Simpsonville, SC

PostPosted: Wed Feb 02, 2022 9:51 pm
Reply with quote

I'm total newbie to IMS, but am looking at a task where I need to retrieve the IMS Subsystem Name in order to build a unique key for a Name/Token. If I'm running a program under IMS is there a call or control block that I can pull the IMS Subsystem Name from? The routine that needs to do this is running as part of the IMS Compression User Exit. I'm digging through the User Exit Manuals, but was hoping for a quick pointer from someone who knows IMS.
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 741
Location: Whitby, ON, Canada

PostPosted: Thu Feb 03, 2022 4:47 am
Reply with quote

INQY ENVIRON call.
Back to top
View user's profile Send private message
isakshields

New User


Joined: 09 Aug 2021
Posts: 3
Location: Sweden

PostPosted: Tue Feb 08, 2022 6:40 pm
Reply with quote

This should do the trick if you are writing in COBOL:
github.com/shields1/IMS/blob/main/IMSINQY.cbl
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 Get name of Subsystem routine is exec... All Other Mainframe Topics 2
No new posts retrieve volume records from decollec... DFSORT/ICETOOL 4
No new posts Unable to retrieve Datasets Names usi... CLIST & REXX 20
No new posts Retrieve multiple records with metaco... CA Products 0
No new posts SQL to retrieve latest Eff date and then DB2 8
Search our Forums:

Back to Top