On 10 September 2014 19:17, Charles Mills <[email protected]> wrote:
> Am I correct in assuming that "cannot be dubbed ..." == lacking an OMVS 
> segment?

Close, but not exactly. There are several more subtle reasons that may
cause a dub to fail. What I've done (in assembler code, but it could
be in C and probably others) is to call a harmless and fast UNIX
service (I use sysconf() BPX1SYC) early in startup that will fail with
return and reason codes if UNIX services in general won't work. Then I
put out a message, rather than have TCP/IP or some other service I
need fail later on.

But there is a chicken & egg problem, in that the UNIX kernel service
to retrieve message text from return and/or reason codes itself
requires that your process be dubbed. (I complained about this years
ago, but at least back then IBM had no plans to change this
behaviour.) So I have a short list of hardcoded return and reason
codes taken from the book, and I issue a hopefully useful message to
explain the detailed reason rather then a generic "dub failed"
message. You can look up return code EMVSINITIAL and see what the
possible reason codes are - things like:
JRSAFNOUSER: The user ID is not defined to the security product
JRSAFNOGID: The user ID is in a group that has no GID
and so on. EMVSINITIAL is the common problem, but there might also be
other return codes that indicate startup problems: EMVSNOTUP, EMVSERR,
EMVSSAF2ERR, and maybe others.

Of course you'll want to show the actual return and reason codes so
that if IBM has added one since you checked, the end user can look it
up.

Your situation may well have a different chicken & egg issue; I don't
know what provokes LE to issue its U4093 abend, but it may be that it
tries to get dubbed on its own initiative and that's its polite way of
saying that the attempt failed. In which case you may be too late to
do what I suggested, or even to use querydub() as Bob did.

Tony H.

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

Reply via email to