IMS Subsystem Name



IBM's hierarchical database management system with a Database Manager (IMS DB) and a Transaction Manager(IMS DC)

IMS Subsystem Name

Postby drowelf » Wed Feb 02, 2022 9:48 pm

I'm totally unfamiliar with 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.
Eric Erickson
864-688-2850
drowelf
 
Posts: 4
Joined: Thu Jan 20, 2022 1:33 am
Has thanked: 0 time
Been thanked: 1 time

Re: IMS Subsystem Name

Postby Isakshields » Wed Feb 09, 2022 11:05 am

This should do the trick if you are writing in COBOL:
github.com/shields1/IMS/blob/main/IMSINQY.cbl
Isakshields
 
Posts: 2
Joined: Fri Nov 30, 2018 1:14 am
Location: Stockholm, Sweden
Has thanked: 0 time
Been thanked: 0 time


Return to IMS DB/DC