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

Reply via email to