If something like hyperswap has moved the IODF to another device, then you can
use the IOCINFO "IODFINFO" service and get the information from the IODI
structure that is returned :
IODI_IODFODEVoriginal IODF device
IODI_IODFUCB UCB address of current - (if IODI_IODFUCBINVLD is
OFF)
Mapping macro is IOSDIODI in MACLIB
Rob Scott
Rocket Software
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
Steve Horein
Sent: 16 December 2020 17:00
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IODF address
EXTERNAL EMAIL
Hi!
I am able to determine the IODF unit address from IPAIODFU in IPA. However,
this value becomes stale if the address changes when the storage folks move
disk around. I can see the MVS command DISPLAY IPLINFO accounts for those
changes in message IEE254I:
IEE254I hh.mm.ss IPLINFO DISPLAY text
Explanation: Where text is:
SYSTEM IPLED AT hh.mm.ss ON mm/dd/yyyy RELEASE fmid LICENSE = system USED
LOADxx IN loadxxdsname ON devx ARCHLVL = n MTLSHARE = Y N IEASYM LIST =
s1 NONE IEASYS LIST = s2{(OP)} IODF DEVICE: ORIGINAL(iodfdev1)
CURRENT(iodfdev2) IPL DEVICE: ORIGINAL(ipldev1) CURRENT(ipldev2) VOLUME(iplvol)
Is there an accessible (lives in COMMON), supported data area that also
contains the "CURRENT" information that is present in the DISPLAY command?
While I can parse the output of a console command, I would much rather fetch
only the desired information from storage, if possible.
Thanks,
Steve Horein
----------------------------------------------------------------------
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
