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
