Sample JCL for generating an enhanced ACS test listing

Figure 1. Sample JCL for ACBJBAX1

//* SAMPLE JCL TO GENERATE ENHANCED ACS TEST LISTING IN BATCH        *
//********************************************************************
//********************************************************************
//*                                                                  *
//* STEP TO GENERATE ENHANCED ACS TEST LISTING                       *
//*                                                                  *
//* PARAMETERS:                                                      *
//*                                                                  *
//*      ACSDSN   - ACS TEST LISTING (INPUT)                         *
//*      XREFDSN  - ENHANCED ACS TEST LISTING (OUTPUT)               *
//*      XREFSPC  - The Space parameters can be specified  12@WA42064*
//*                 for XREFDSN dataset using this parameter.        *
//*                                                                  *
//*                 Syntax ==> XREFSPC(PRI,SEC) Where                *
//*                            PRI -> Primary space in Tracks        *
//*                            SEC -> Secondary space in Tracks      *
//*                                   to be allocated.               *
//*                 Eg. XREFSPC(10,20)                               *
//*                                                                  *
//*                 If this parameter is not specified, by default   *
//*                 ACSDSN dataset space parameters are used to      *
//*                 allocate XREFDSN dataset.                        *
//*                                                                  *
//*      OUTPUT SELECTION CRITERIA: (DATA COMES FROM TEST CASE PDS)  *
//*         DSNINFO  - DSN   - DATA SET NAME                         *
//*         UNITINFO - UNIT  - UNIT ON WHICH THE DATA SET RESIDES    *
//*         SIZEINFO - SIZE  - SIZE OF DATA SET                      *
//*         EXPTINFO - EXPDT - EXPIRY DATE OF THE DATA SET           *
//*         JOBINFO  - JOB   - JOB WHICH ALLOCATED THE DATA SET      *
//*         PGMINFO  - PGM   - PROGRAM WHICH ALLOCATED THE DATA SET  *
//*                                                                  *
//********************************************************************

Figure 2. Sample JCL for ACBJBAX1 (continued)

//GENREP  EXEC  ACBJBAOB,
//        PLIB1=SYS1.DGTPLIB,
//        TABL2=userid.TEST.ISPTABL
//SYSTSIN  DD *
PROFILE PREFIX(IBMUSER)
DEL RSLT1
%ACBQBAX1 +
ACSDSN(BASE.LISTING) +
XREFDSN(RSLT1) +
XREFSPC() +
DSNINFO(Y) +
UNITINFO(Y) +
SIZEINFO(Y) +
EXPTINFO(Y) +
JOBINFO(Y) +
PGMINFO(Y)
/*
//********************************************************************
//*                                                                  *
//* COPY ENHANCED ACS TEST LISTING                                   *
//*                                                                  *
//*    SYSUT1 - INPUT (FROM PREVIOUS STEP)                           *
//*    SYSUT2 - OUTPUT                                               *
//*                                                                  *
//********************************************************************
//REPGEN   EXEC PGM=IEBGENER
//SYSIN    DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DISP=SHR,DSN=IBMUSER.ENHANCED.LISTING
//SYSUT2   DD SYSOUT=*
//*