Answering my own question for the benefit of future searchers.

Yes, CSVDYNEX LIST may be used to answer this question, and Yes, the
relevant bit is EXAAEDEFINED. FWIW, I think all of the information in this
regard that SHOWMVS obtains from non-GUPI interfaces may be obtained in this
manner in a supported fashion.

There is one annoying gotcha IMHO with CSVDYNEX LIST. I inferred from the
documentation that the "answer" returned was in the format

{header, EXAAE, module, module, ...}

Instead, the results are in the format

{header, module, module, ..., EXAAE}

What that means is that if you do not provide an answer area long enough to
hold ALL of the member entries, you will not get the EXAAE (which in my case
is all that I am interested in). How many member areas might there be? There
appears to be no limit. Yes, you can issue CSVDYNEX LIST twice, once to find
out how much storage you need, and once with enough storage. I only need
this information to put out an optional warning, so I made the executive
decision that if 20 member entries was not enough, the customer was just
going to have to live without the warning.

Charles
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Charles Mills
Sent: Thursday, April 24, 2014 10:42 AM
To: [email protected]
Subject: Any way to programmatically determine state of SMFPRMxx
SYS(EXITS())?

Is there any way for an (authorized) program to determine whether
SYS(EXITS(IEFU8n)) has been specified? That is, whether IEFU8n (where 'n' is
3, 4 or 5) is active. 

Note that z/OS allows a module to be added to an exit even though the exit
is not active and the module will never receive a single call. I am looking
for whether the EXIT is active and will be called by z/OS, not whether or
not module XXXXX has been installed on the exit.

I am hoping for a conventional z/OS macro type answer, not "issue /D SMF,O
from Rexx and parse the results."

I am looking at bit EXAAEDEFINED in the CSVDYNEX answer area mapping DSECT
CSVEXAA. Does this provide the information I am looking for? Does something
else?

Thanks,
Charles 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to