Automated Testing

Automated Testing

Automated Testing

Build an automated testing process to enable continuous integration of your hybrid cloud applications including z/OS

 View Only

Unable to copy the RACF data base to SYSUT1

  • 1.  Unable to copy the RACF data base to SYSUT1

    Posted Fri July 27, 2012 09:31 AM
    Hi All,

    We are setting up new environment on UT box for that i am running IBMUSERE job to copy the RACF data base to SYSUT1. The job is showing some error's;

    ********************************* TOP OF DATA ********************************** J E S 2  J O B  L O G  --  S Y S T E M  S Y S 1  --  N 11.59.24 JOB00046 ---- FRIDAY,    27 JUL 2012 ---- 11.59.24 JOB00046  IRR010I  USERID IBMUSER  IS ASSIGNED TO THIS JOB. 11.59.24 JOB00046  ICH70001I IBMUSER  LAST ACCESS AT 10:04:18 ON FRIDAY, JULY 27 11.59.24 JOB00046  $HASP373 IBMUSERE STARTED - INIT 1    - CLASS A - SYS SYS1 11.59.24 JOB00046  IEF403I IBMUSERE - STARTED - TIME=11.59.24 11.59.24 JOB00046  IEF453I IBMUSERE - JOB FAILED - JCL ERROR - TIME=11.59.24 11.59.24 JOB00046  $HASP395 IBMUSERE ENDED ------ JES2 JOB STATISTICS ------ 27 JUL 2012 JOB EXECUTION DATE 41 CARDS READ 104 SYSOUT PRINT RECORDS 0 SYSOUT PUNCH RECORDS 6 SYSOUT SPOOL KBYTES 0.00 MINUTES EXECUTION TIME 1 //IBMUSERE JOB CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),NOTIFY=&SYSUID        //*                                                                    //* CLONE ADCD RACF DATABASE AND USE CLONE AFTER IPL                   //*                                                                    //* MUST RUN WHEN THERE IS NO RACF ACTIVITY                            //* UPON FAILURE, ENSURE THAT ICHRDSNT IS NOT IN USER.LINKLIB          //*                                                                    IEFC653I SUBSTITUTION JCL - CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),NOTIFY=I 2 //         SET VOLSER=SYSUT1               * SHOULD BE ON NON-ADCD DIS 3 //         SET SIZE=20                                                 //*                                                                    //* LOGICAL COPY OF RACF DATABASE                                      //*                                                                    4 //COPY     EXEC PGM=IRRUT400,PARM='LOCKINPUT,FREESPACE(20)'            5 //SYSPRINT DD SYSOUT=*                                                 6 //INDD1    DD DISP=SHR,DSN=SYS1.RACFDS  7 //OUTDD1   DD DISP=(NEW,CATLG),DSN=USER.RACF,       * MUST BE IN MCAT  //            UNIT=SYSALLDA,VOL=SER=&VOLSER,                           //            SPACE=(CYL,(&SIZE),,CONTIG),DCB=DSORG=PSU                //*                                                                    //* RE-ALLOW UPDATES TO ADCD RACF DATABASE (FOR BACKOUT PURPOSES)      //*                                                                    IEFC653I SUBSTITUTION JCL - DISP=(NEW,CATLG),DSN=USER.RACF,UNIT=SYSALL CONTIG),DCB=DSORG=PSU 8 //UNLOCK   EXEC PGM=IRRUT400,PARM='UNLOCKINPUT',COND=EVEN              9 //SYSPRINT DD SYSOUT=*                                                 10 //INDD1    DD DISP=SHR,DSN=SYS1.RACFDS                                 //*                                                                    //* CREATE A RACF DATA BASE NAME TABLE (ICHRDSNT)                      //* BASED UPON SYS1.SAMPLIB(RACTABLE)                                  //*                                                                    11 //TABLE    EXEC HLASMCL,COND=(0,NE)                                    12 XXASMACL   PROC XX* XX******************************************************************** XX* XX*  Licensed Materials - Property of IBM XX* XX*  5696-234   5694-A01 XX* XX*  Copyright IBM Corporation 1992, 2008 All Rights Reserved. XX* XX*  US Government Users Restricted Rights - Use, duplication XX*  or disclosure restricted by GSA ADP Schedule Contract XX*  with IBM Corp. XX* XX******************************************************************** XX* XX*  ASMACL XX* XX*  This procedure runs the High Level Assembler, link-edits the XX*  newly assembled program. XX* XX******************************************************************** XX* 13 XXC        EXEC PGM=ASMA90 XX* 14 XXSYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR 15 XXSYSUT1   DD  DSN=&&SYSUT1,SPACE=(4096,(120,120),,,ROUND), XX             UNIT=SYSALLDA,BUFNO=1 16 XXSYSPRINT DD  SYSOUT=* 17 XXSYSLIN   DD  DSN=&&OBJ,SPACE=(3040,(40,40),,,ROUND), XX             UNIT=SYSALLDA,DISP=(MOD,PASS), XX             BLKSIZE=3040,LRECL=80,RECFM=FB,BUFNO=1 XX* 18 //C.SYSIN  DD *                                                        19 XXL        EXEC PGM=HEWL,PARM='MAP,LET,LIST,NCAL',COND=(8,LT,C) XX* 20 XXSYSLIN   DD  DSN=&&OBJ,DISP=(OLD,DELETE) 21 XX         DD  DDNAME=SYSIN 22 //L.SYSLMOD DD DISP=SHR,DSN=USER.LINKLIB                               X/SYSLMOD  DD  DISP=(,PASS),UNIT=SYSALLDA,SPACE=(CYL,(1,1,1)), X/             DSN=&&GOSET(GO) 23 XXSYSUT1   DD  DSN=&&SYSUT1,SPACE=(1024,(120,120),,,ROUND), XX             UNIT=SYSALLDA,BUFNO=1 24 XXSYSPRINT DD  SYSOUT=* XX* 25 //L.SYSIN   DD *                                                       //*                                                                    STMT NO. MESSAGE 11 IEFC001I PROCEDURE HLASMCL WAS EXPANDED USING SYSTEM LIBRARY HLA.SASMS ICH70001I IBMUSER  LAST ACCESS AT 10:04:18 ON FRIDAY, JULY 27, 2012 IEF212I IBMUSERE COPY INDD1 - DATA SET NOT FOUND IEF272I IBMUSERE COPY - STEP WAS NOT EXECUTED. IEF373I STEP/COPY    /START 2012209.1159 IEF374I STEP/COPY    /STOP  2012209.1159 CPU    0MIN 00.00SEC SRB    0MIN 00.00S IEF375I  JOB/IBMUSERE/START 2012209.1159 IEF376I  JOB/IBMUSERE/STOP  2012209.1159 CPU    0MIN 00.00SEC SRB    0MIN 00.00S ******************************** BOTTOM OF DATA ********************************

    Please help us out in the following errors.
    Thanks,
    Shajeel Ahmed Khan
    RVXY_Shajeel_Khan