Writing SRBs to sniff private storage data in another address space is not for the faint-hearted.
It can be done, however it is very easy to do it incorrectly or in an unsafe manner. AR-Mode access to the foreign address space (HSM) is a big no-no - you are breaking system integrity rules and besides it will only work if the address space is non-swappable or the storage is currently swapped in. So - what is a sensible programmer to do? First of all, ask IBM for a supported HSM Query API to return the information you require - a proper API not just some lame TSO TPUT thing that you have to screen-scrape. I realise that any new API resolution will take a few years to hit the streets, however if no-one asks then there are no RFEs presented to the developers. In the meantime, you could try and come up with a safer local solution based around using ISGQUERY for the SYSDSN major name enqueues for the HSM address space. Depending on local naming standards you could probably spot the BCDS dataset names from the list returned by ISGQUERY. Rob Scott Rocket Software -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Manfred Lotz Sent: Wednesday, January 17, 2018 8:04 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Finding the names of hsm's BCDSs Hi there, I like to find out the DFSMShsm BCDS names programmatically. As I know the DD names, i.e. BAKCAT, and optionally BAKCAT2, BAKCAT3 and BAKCAT4 I thought of using AR mode in order to get the TIOT of HSM. However, in order to get to the TIOT reliably I need SWAREQ which doesn't support AR mode. Is there a way to get access to another address space's TIOT? Any ideas much appreciated. -- Thanks a lot, Manfred Lotz ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ================================ Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ Main Office Toll Free Number: +1 855.577.4323 Contact Customer Support: https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - http://www.rocketsoftware.com/manage-your-email-preferences Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy ================================ This communication and any attachments may contain confidential information of Rocket Software, Inc. All unauthorized use, disclosure or distribution is prohibited. If you are not the intended recipient, please notify Rocket Software immediately and destroy all copies of this communication. Thank you. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
