ICHRIN03 not loading in the LPA correctly.

Discussion:

(too old to reply)

Jim McAlpine

2009-06-23 10:53:15 UTC

I'm in the process of migrating our RACF setup into a new z/OS 1.9 system
and I can't get ICHRIN03 loaded in the LPA correclty. From a listlpa on our
z/OS 1.7 system, the entry looks like this -

ICHRIN03 00DD77D0 00000028 80DD77D0

but in the new z/OS 1.9 system it looks like this -

ICHRIN03 00CDB000 00000008 00CDB000

In the lpalib library, they are both amode 31 rmode 24 and both entries have
a length of 00000028.

Any ideas.

Jim McAlpine

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Barbara Nitz

2009-06-23 11:08:42 UTC

Permalink

What is shown on a D PROG,LPA,MOD=ichrin03 before adding it to lpa and after
the SETPROG LPA,ADD,MODNAME=ichrin03,DSNAME=wherever-it-is-located?

Regards, Barbara Nitz

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Jim McAlpine

2009-06-23 11:11:54 UTC

Permalink

Post by Barbara Nitz
What is shown on a D PROG,LPA,MOD=ichrin03 before adding it to lpa and after
the SETPROG LPA,ADD,MODNAME=ichrin03,DSNAME=wherever-it-is-located?
Regards, Barbara Nitz
It isn't added with setprog, it's included in user.lpalib which is in

lpalstxx.

Jim McAlpine

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Barbara Nitz

2009-06-23 11:47:57 UTC

Permalink

Post by Barbara Nitz
It isn't added with setprog, it's included in user.lpalib which is in
lpalstxx.

Did you browse storage at the location of the 8-byte-ICHRIN03? What does
that show?

As the one that is currently found is apparently not the right one, is there any
reason why you cannot test with the setprog command?

I just checked ours, and ours (1.8) is 528byte long, but we use class
STARTED, so its not really customized, but rather an IBM default.

Barbara

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Jim McAlpine

2009-06-23 11:58:30 UTC

Permalink

Post by Barbara Nitz

Post by Barbara Nitz
It isn't added with setprog, it's included in user.lpalib which is in
lpalstxx.

Barbara, thanks for your suggestions. A dump shows the 8 byte ichrin03 to
be 8 bytes of low values. When I issue the setprog as you suggested, the
modeule gets loaded correctly and the D PROG,LPA,MOD=ichrin03 now
correctly shows the module as -

D PROG,LPA,MOD=ICHRIN03
CSV550I 09.59.15 LPA DISPLAY 671
FLAGS MODULE ENTRY PT LOAD PT LENGTH DIAG
D P ICHRIN03 80C78000 00C78000 00000028 02273040
very strange.

Regards

Jim McAlpine

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Jim McAlpine

2009-06-23 12:10:22 UTC

Permalink

The one in SYS1.LPALIB is 8 bytes long and is 8 bytes of low values. But the
lpalstxx member has the USER.LPALIB first like so -

USER.LPALIB,
ADCD.Z19S.LPALIB,
EQA810.SEQALPA(S9RES1),
SYS1.LPALIB,
SYS1.SERBLPA,
NET530.SCNMLPA1(S9RES2),
FAN140.SEAGLPA(S9RES1),
ISF.SISFLPA(S9RES1),
EOY.SEOYLPA(S9RES2),
SYS1.SBDTLPA,
CEE.SCEELPA(S9RES2),
ISP.SISPLPA(S9RES1),
TCPIP.SEZALPA(S9RES1),
SYS1.SORTLPA,
SYS1.SDWWDLPA,
SYS1.SICELPA
why would the search not be in the sequence of the libraries above ???

Jim McAlpine

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Barbara Nitz

2009-06-23 12:12:36 UTC

Permalink

Jim,

at this point, the only thing I can think of is that something is wrong with the
lpalstxx member that you use. What else is in that user.lpalib? Is that
*something else* loaded correctly? Were there any IPL lpa-error messages?

Barbara

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Barbara Nitz

2009-06-23 12:22:43 UTC

Permalink

Init&Tuning Reference:

The LPALIB data set is always the first data set in the concatenation
(see "Using the SYSLIB statement" in topic 67.3). Unless overridden by a
SYSLIB statement in PROGxx, the LPALST concatenation begins with
SYS1.LPALIB. If you do not use SYSLIB and place the LPALIB data set
name on any record in any LPALSTxx member, the name is ignored.

So I guess the module is found at IPL from the one in SYS1.LPALIB, not the
one from your user.lpalib.

Barbara

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Jim McAlpine

2009-06-23 12:45:00 UTC

Permalink

Post by Barbara Nitz
The LPALIB data set is always the first data set in the concatenation
(see "Using the SYSLIB statement" in topic 67.3). Unless overridden by a
SYSLIB statement in PROGxx, the LPALST concatenation begins with
SYS1.LPALIB. If you do not use SYSLIB and place the LPALIB data set
name on any record in any LPALSTxx member, the name is ignored.
So I guess the module is found at IPL from the one in SYS1.LPALIB, not the
one from your user.lpalib.
Barbara
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Barbara, thanks very much. I had probably known that at some stage and
forgotten it.

Thanks again.

Jim McAlpine

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Jim McAlpine

2009-06-23 13:22:44 UTC

Permalink

Post by Jim McAlpine
Barbara, thanks very much. I had probably known that at some stage and
forgotten it.
Thanks again.
Jim McAlpine

I obviously had known that as I have a procxx member containing a SYSLIB
statement in my z/OS 1.7 system.

Isn't getting older wonderful.

Jim McAlpine

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Mark Zelden

2009-06-23 13:23:39 UTC

Permalink

Post by Jim McAlpine
The one in SYS1.LPALIB is 8 bytes long and is 8 bytes of low values. But the
lpalstxx member has the USER.LPALIB first like so -
USER.LPALIB,
ADCD.Z19S.LPALIB,
EQA810.SEQALPA(S9RES1),
SYS1.LPALIB,
SYS1.SERBLPA,
NET530.SCNMLPA1(S9RES2),
FAN140.SEAGLPA(S9RES1),
ISF.SISFLPA(S9RES1),
EOY.SEOYLPA(S9RES2),
SYS1.SBDTLPA,
CEE.SCEELPA(S9RES2),
ISP.SISPLPA(S9RES1),
TCPIP.SEZALPA(S9RES1),
SYS1.SORTLPA,
SYS1.SDWWDLPA,
SYS1.SICELPA
why would the search not be in the sequence of the libraries above ???

PROGxx SYSLIB LPALIB(....) could put a library ahead of those defined
in LPALSTxx. IEALPAxx could load something in MLPA.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:***@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Arthur Gutowski

2009-06-24 16:59:58 UTC

Permalink

On Tue, 23 Jun 2009 08:23:03 -0500, Mark Zelden

On Tue, 23 Jun 2009 13:09:17 +0100, Jim McAlpine

PROGxx SYSLIB LPALIB(....) could put a library ahead of those defined
in LPALSTxx. IEALPAxx could load something in MLPA.

Just a thought - write an SMP/E USERMOD to REPLACE the IBM-supplied
ICHRIN03 in SYS1.LPALIB. Pro: it eliminates the duplication and LPA load
sequencing issue. Cons: You have to write and maintain MCS, and re-install
for every OS upgrade (but PRO: *if* IBM ever changes the format, you find
out before the first IPL); and if you're a multi-system environment, a
USERMOD is tough to maintain if the table is not common across all systems.

Regards,
Art Gutowski
Ford Motor Company

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Walt Farrell

2009-06-24 18:17:20 UTC

Permalink

Post by Arthur Gutowski
Just a thought - write an SMP/E USERMOD to REPLACE the IBM-supplied
ICHRIN03 in SYS1.LPALIB. Pro: it eliminates the duplication and LPA load
sequencing issue. Cons: You have to write and maintain MCS, and re-install
for every OS upgrade (but PRO: *if* IBM ever changes the format, you find
out before the first IPL); and if you're a multi-system environment, a
USERMOD is tough to maintain if the table is not common across all systems.

That would work (but the format is extremely unlikely to change; all
enhancements would be via the STARTED class).

In any case, the simplest approach may be to MLPA the module in, from
whatever library it lives in. Though that will waste 8 bytes or so of PLPA,
I suppose.

--
Walt Farrell, CISSP
IBM STSM, z/OS Security Design

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Mark Zelden

2009-06-24 19:41:15 UTC

Permalink

Exactly what we do where we can. Including SMF exits (how many "wrong
IEFACTRT" threads have their been on IBM-MAIN). We have a mixture
of both, but our "usermods library" is well documented as to which ones
are true SMP/E usermods and which ones live in a "SYSLIB LPALIB"
concatenated ahead of SYS1.LPALIB.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:***@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Rick Fochtman

2009-06-24 19:54:33 UTC

Permalink

Post by Mark Zelden

Exactly what we do where we can. Including SMF exits (how many "wrong
IEFACTRT" threads have their been on IBM-MAIN). We have a mixture
of both, but our "usermods library" is well documented as to which ones
are true SMP/E usermods and which ones live in a "SYSLIB LPALIB"
concatenated ahead of SYS1.LPALIB.
Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Have you checked for a pre-existing copy in LPALIB ??

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Rick Fochtman

2009-06-24 19:55:18 UTC

Permalink

Post by Mark Zelden

Exactly what we do where we can. Including SMF exits (how many "wrong
IEFACTRT" threads have their been on IBM-MAIN). We have a mixture
of both, but our "usermods library" is well documented as to which ones
are true SMP/E usermods and which ones live in a "SYSLIB LPALIB"
concatenated ahead of SYS1.LPALIB.
Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Have you checked LPA for a pre-existing version???

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Mark Zelden

2009-06-24 20:12:37 UTC

Permalink

Post by Walt Farrell

That would work (but the format is extremely unlikely to change; all
enhancements would be via the STARTED class).
In any case, the simplest approach may be to MLPA the module in, from
whatever library it lives in. Though that will waste 8 bytes or so of PLPA,
I suppose.

I did that a lot more often in the days prior to SYSLIB LPALIB. But we still
use that method also.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:***@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Mark Zelden

2009-06-24 20:16:40 UTC

Permalink

Post by Rick Fochtman

Post by Mark Zelden

Exactly what we do where we can. Including SMF exits (how many "wrong
IEFACTRT" threads have their been on IBM-MAIN). We have a mixture
of both, but our "usermods library" is well documented as to which ones
are true SMP/E usermods and which ones live in a "SYSLIB LPALIB"
concatenated ahead of SYS1.LPALIB.
Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Have you checked for a pre-existing copy in LPALIB ??

Not sure how / why that is relevant. In this particular case, yes a copy
is in LPALIB. But you can install usermods into SYS1.LPALIB or SYS1.LINKLIB
(for example) regardless. I have been at shops that install JES2 exits
into LINKLIB (we do that here in some environments, or maybe into
SHASLNKE now - although they just have to be in a LNKLST library).

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:***@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html