I check this MOD (ICHRDSNT) in target zone and found that its available
in DISTLIB: AOSBN. But in JCL we pointed to something else as below. The
system currently
I am working is z/OS 2.1
++SRC(ICHRDSNT) DISTLIB(AORASRC) DISTMOD(ALINKLIB) .
CSI QUERY - MOD ENTRY Row 1 to 1
of 1
===> SCROLL ===>
PAGE
To return to the previous panel, enter END .
Primary Command: FIND
Entry Type: MOD Zone Name: MVST100
Entry Name: ICHRDSNT Zone Type: TARGET
FMID: HRF7790 LASTUPD: CPPDSNT TYPE=ADD
RMID: CPPDSNT DISTLIB: AOSBN
Link-edit Parameters:
-------- -------- -------- -------- -------- -------- --------
LMOD ICHRDSNT
******************************* Bottom of data
*******************************
But when I check my older version of z/OS system like z/OS 1.13, I found
this MOD in DISTLIB: ALINKLIB . So I think the JCL was setup for older
version.
CSI QUERY - MOD ENTRY Row 1 to 1
of 1
===> SCROLL ===>
PAGE
To return to the previous panel, enter END .
Primary Command: FIND
Entry Type: MOD Zone Name: MVST100
Entry Name: ICHRDSNT Zone Type: TARGET
FMID: HRF7780 LASTUPD: SP1D001 TYPE=ADD
RMID: SP1D001 DISTLIB: ALINKLIB RMIDASM
Link-edit Parameters:
-------- -------- -------- -------- -------- -------- --------
LMOD ICHRDSNT
******************************* Bottom of data
********************************
After seeing this, I modified my JCL from
++SRC(ICHRDSNT) DISTLIB(AORASRC) DISTMOD(ALINKLIB) .
to
++SRC(ICHRDSNT) DISTLIB(AORASRC) DISTMOD(AOSBN) . and run apply check
Job. it run good.
Am I doing correct or anything more I am missing before actually apply of
this USERMOD
Regards
On Tue, Feb 4, 2014 at 11:25 AM, Lizette Koehler <[email protected]>wrote:
> You need to list your SMP/E V2.1 CSI Global zone and see where the Module
> ICHRDSNT resides.
>
> There is a LISTMOD command you can use (or Option 3 in the SMP/E Panels)
> that will help you know what you need to code.
>
> The message says: THE DISTLIB VALUE (AOSBN) so your DISTLIB value of
> ALINKLIB is not correct.
>
> Lizette
>
>
> > -----Original Message-----
> > From: IBM Mainframe Discussion List [mailto:[email protected]] On
> > Behalf Of venkat kulkarni
> > Sent: Monday, February 03, 2014 10:46 PM
> > To: [email protected]
> > Subject: Re: RACF USERMOD APPLY
> >
> > Answers are below.
> >
> > When was the last time you ran this Usermod successfully?
> >
> > I found this USERMOD in one of our old USERMOD library and I modified it
> to
> > make it work for z/OS 2.1 . Like FMID etc
> >
> > Why are did you code it with both DISTMOD and DISTLIB?
> >
> > I have not coded anything in this. It was already there.
> >
> >
> > Have you listed the module ICHRDSNT to see where it lives?
> >
> > It is under SYS1.LINKLIB(ICHRDSNT)
> >
> >
> > What version of z/OS is this for?
> >
> > z/OS 2.1
> >
> >
> > On Tue, Feb 4, 2014 at 11:10 AM, Lizette Koehler
> > <[email protected]>wrote:
> >
> > > When was the last time you ran this Usermod successfully?
> > >
> > > Why are did you code it with both DISTMOD and DISTLIB?
> > >
> > > Have you listed the module ICHRDSNT to see where it lives?
> > >
> > > What version of z/OS is this for?
> > >
> > > The messages are very helpful in resolving your issue
> > > > GIM40501E ** THE DISTLIB VALUE (ALINKLIB) SPECIFIED FOR MOD
> > ICHRDSNT
> > > > IN SYSMOD
> > > > SP21001 DOES NOT MATCH THE DISTLIB VALUE (AOSBN) IN
> > THE
> > > > MOD ENTRY
> > > > FOR ICHRDSNT.
> > >
> > > If you have access to the SMP/E Panels in ISPF, use Option 3 QUERY.
> > >
> > >
> > > Thanks
> > >
> > > Lizette
> > >
> > > > -----Original Message-----
> > > > From: IBM Mainframe Discussion List
> > > > [mailto:[email protected]] On Behalf Of venkat kulkarni
> > > > Sent: Monday, February 03, 2014 7:43 PM
> > > > To: [email protected]
> > > > Subject: RACF USERMOD APPLY
> > > >
> > > > Hello,
> > > > I am getting issue while applying RACF USERMOD for changing
> > > > RACF NAME TABLE.
> > > >
> > > > //USERMOD1 JOB ((660)),
> > > > // 'VENKAT',
> > > > // CLASS=A,
> > > > // MSGCLASS=A,
> > > > // TIME=1440,NOTIFY=&SYSUID
> > > > //*
> > > > //STEP1 EXEC PGM=GIMSMP,REGION=6M,
> > > > // TIME=120
> > > > //SMPCSI DD DSN=SMPE.GLOBAL.CSI,
> > > > // DISP=SHR
> > > > //SMPHOLD DD DUMMY
> > > > //SMPOUT DD SYSOUT=*
> > > > //SMPRPT DD SYSOUT=*
> > > > //SYSPRINT DD
> > SYSOUT=*,DCB=(LRECL=133,BLKSIZE=2660,RECFM=FB)
> > > > //SMPCNTL DD *
> > > > SET BDY(GLOBAL) .
> > > > RECEIVE S(UM21001) .
> > > > SET BDY(MVST100) .
> > > > APPLY CHECK S(UM21001) REDO .
> > > > /*
> > > > //SMPPTFIN DD DATA,DLM='%%'
> > > > ++USERMOD(UM21001) REWORK(2014034) .
> > > > ++VER(Z038) FMID(HRF7790) PRE(CPPDSNT) .
> > > > ++JCLIN .
> > > > //UM21001 JOB MVSSP121
> > > > //ICHRDSNT EXEC PGM=IEWL,
> > > > // PARM='LIST,LET,XREF,NCAL'
> > > > //SYSPRINT DD SYSOUT=*
> > > > //SYSUT1 DD UNIT=3390,SPACE=(CYL,(1,1)) //SYSLMOD DD
> > > > DSN=Z.LINKLIB,DISP=SHR //SYSLIN DD * INCLUDE
> > SYSLMOD(ICHRDSNT)
> > > > ENTRY ICHRDSNT NAME ICHRDSNT(R)
> > > > /*
> > > > ++SRC(ICHRDSNT) DISTLIB(AORASRC) DISTMOD(ALINKLIB) .
> > > > ICHRDSNT CSECT
> > > > DC AL1(1) # PRIMARY RACF DATASETS
> > > > DC CL44'SYS1.RACFP' NAME OF PRIMARY
> > > > DC CL44'SYS1.RACFB' NAME OF BACKUP
> > > > DC AL1(255) # RESIDENT BLOCKS (ONE
> TRACK)
> > > > DC X'80' UPDATES DUPLICATED ON BACKUP
> D
> > > > END
> > > > %%
> > > > //
> > > >
> > > > APPLY CHECK S(UM21001) REDO .
> > > >
> > > > GIM40501E ** THE DISTLIB VALUE (ALINKLIB) SPECIFIED FOR MOD
> > ICHRDSNT
> > > > IN SYSMOD
> > > > SP21001 DOES NOT MATCH THE DISTLIB VALUE (AOSBN) IN
> > THE
> > > > MOD ENTRY
> > > > FOR ICHRDSNT.
> > > > GIM22601I APPLY PROCESSING FAILED FOR SYSMOD UM21001.
> > > > GIM20501I APPLY PROCESSING IS COMPLETE. THE HIGHEST
> > RETURN
> > > > CODE WAS 08.
> > > >
> > > > I am not able to find hint to solve this issue. Can anybody help me
> > > > on
> > > this.
> > > >
> > >
> > > ----------------------------------------------------------------------
> > > 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
>
> ----------------------------------------------------------------------
> 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
