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

Reply via email to