DSN8WLMP

//*********************************************************************
//*  Name = DSN8WLMP
//*
//*  Descriptive Name =
//*    DB2 Sample WLM startup PROC for DSNTSPMP, the DB2 SQL Procedures
//*    Processor, and for ADMIN_UPDATE_SYSPARM, the DB2 stored
//*    procedure that changes subsystem parameters.
//*
//*
//*    Licensed Materials - Property of IBM
//*    5635-DB2
//*    (C) COPYRIGHT 1982, 2006 IBM Corp.  All Rights Reserved.
//*
//*    STATUS = Version 11
//*
//*  Function =
//*    This JCL can be customized to establish the WLM startup PROC
//*    needed to run DSNTPSMP, the DB2 SQL Procedures Processor,
//*    and to run ADMIN_UPDATE_SYSPARM, the DB2 stored procedure
//*    that changes subsystem parameters.
//*
//*    Before you can use this procedure, you need to have defined a
//*    WLM Application Environment for running DSNTPSMP and
//*    ADMIN_UPDATE_SYSPARM.
//*
//*    *** *** *** *** *** *** IMPORTANT *** *** *** *** *** *** ***
//*    For DSNTPSMP and ADMIN_UPDATE_SYSPARM, NUMTCB=1 is required.
//*    Specify no other value. This assures concurrent executions
//*    of DSNTPSMP and ADMIN_UPDATE_SYSPARM will run in their
//*    own address space, which is needed for proper dataset
//*    operation from within a REXX/TSO DB2 stored procedure.
//*
//*    (1) Customize this proc for use on your system by locating and
//*        changing all occurrences of the following strings as
//*        indicated:
//*        (A) '!WLMENV!' to the name of the WLM Application Environment
//*            you have chosen for running DSNTPSMP and
//*            ADMIN_UPDATE_SYSPARM
//*        (B) '!DSN8WLMP!' to the name of the WLM Procedure associated
//*            with that environment
//*        (C) '!DSN!' to the name of your DB2 subsystem
//*        (D) 'CBC!!' to the prefix of your target library for
//*            IBM C/C++ for z/OS
//*        (E) 'CEE!!' to the prefix of your target library for
//*            IBM Language Environment for z/OS
//*        (F) 'DSN!!0' to the prefix of your target library for
//*            DB2 for z/OS
//*    (2) Copy the customized proc to your MVS proclib, to the member
//*        you specified as the WLM procedure name for the WLM
//*        application environment you have chosen for running DSNTPSMP
//*        and ADMIN_UPDATE_SYSPARM
//*        Note: This should be the same value as you specified in
//*              step 1B, above.
//*
//* CHANGE LOG:
//*   09/20/2012 Add ZPMDFLTS for ADMIN_UPDATE_SYSPARM DK1557/PM71114
//*
//*********************************************************************
//!DSN8WLMP! PROC DB2SSN=!DSN!,NUMTCB=1,APPLENV=!WLMENV!
//*
//NUMTCB@1 SET NUMTCB=                         <== Null NUMTCB symbol
//*
//DSNTPSMP EXEC PGM=DSNX9WLM,TIME=1440,
//             PARM='&DB2SSN,1,&APPLENV',      <== Use 1, not NUMTCB
//             REGION=0M,DYNAMNBR=5            <== Allow for Dyn Allocs
//* Include SDSNEXIT to use Secondary Authids (DSN3@ATH DSN3@SGN exits)
//STEPLIB  DD  DISP=SHR,DSN=DSN!!0.SDSNEXIT
//         DD  DISP=SHR,DSN=DSN!!0.SDSNLOAD
//         DD  DISP=SHR,DSN=CBC!!.SCCNCMP      <== C Compiler
//         DD  DISP=SHR,DSN=CEE!!.SCEERUN      <== LE runtime
//SYSEXEC  DD  DISP=SHR,                       <== Location of DSNTPSMP
//             DSN=DSN!!0.SDSNCLST                 and DSNADMUZ
//SYSTSPRT DD  SYSOUT=*
//CEEDUMP  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSABEND DD  DUMMY
//DSNTRACE DD  SYSOUT=*
//*
//**** Data sets required by the SQL Procedures Processor
//SQLDBRM  DD  DISP=SHR,                       <== DBRM Library
//             DSN=DSN!!0.DBRMLIB.DATA
//SQLCSRC  DD  DISP=SHR,                       <== Generated C Source
//             DSN=DSN!!0.SRCLIB.DATA
//SQLLMOD  DD  DISP=SHR,                       <== Application Loadlib
//             DSN=DSN!!0.RUNLIB.LOAD
//SQLLIBC  DD  DISP=SHR,                       <== C header files
//             DSN=CEE!!.SCEEH.H
//         DD  DISP=SHR,
//             DSN=CEE!!.SCEEH.SYS.H
//         DD  DISP=SHR,                       <== Debug header file
//             DSN=DSN!!0.SDSNC.H
//SQLLIBL  DD  DISP=SHR,                       <== Linkedit includes
//             DSN=CEE!!.SCEELKED
//         DD  DISP=SHR,
//             DSN=DSN!!0.SDSNLOAD
//SYSMSGS  DD  DISP=SHR,                       <== Prelinker msg file
//             DSN=CEE!!.SCEEMSGP(EDCPMSGE)
//*
//**** DSNTPSMP Configuration File - CFGTPSMP (optional)
//*             A site provided sequential dataset or member, used to
//*             define customized operation of DSNTPSMP in this APPLENV.
//*CFGTPSMP DD  DISP=SHR,DSN=
//*
//**** Workfiles required by the SQL Procedures Processor
//SQLSRC   DD  UNIT=SYSALLDA,SPACE=(23440,(20,20)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)
//SQLPRINT DD  UNIT=SYSALLDA,SPACE=(23476,(20,20)),
//             DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
//SQLTERM  DD  UNIT=SYSALLDA,SPACE=(23476,(20,20)),
//             DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
//SQLOUT   DD  UNIT=SYSALLDA,SPACE=(23476,(20,20)),
//             DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
//SQLCPRT  DD  UNIT=SYSALLDA,SPACE=(23476,(20,20)),
//             DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
//SQLUT1   DD  UNIT=SYSALLDA,SPACE=(23440,(20,20)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)
//SQLUT2   DD  UNIT=SYSALLDA,SPACE=(23440,(20,20)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)
//SQLCIN   DD  UNIT=SYSALLDA,SPACE=(32000,(20,20))
//SQLLIN   DD  UNIT=SYSALLDA,SPACE=(3200,(30,30)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
//SQLDUMMY DD  DUMMY
//SYSMOD   DD  UNIT=SYSALLDA,SPACE=(23440,(20,20)),   <= PRELINKER
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)
//*
//**** Data sets required by ADMIN_UPDATE_SYSPARM
//ZPMDFLTS DD  DISP=SHR,                       <== Defaults file
//             DSN=DSN!!0.NEW.SDSNSAMP(DSNADMZW)
//*