The JCL contains numbered instructions that tell you what to do.
//CAKSLOAD JOB (ACCTINFO),'PMGR',CLASS=A,REGION=4M,MSGCLASS=X //* //******************************************************* //* PURPOSE: THIS JOB STREAM WILL USE THE COMMITTED //* VERSION OF THE CA PMA/DATAMANAGER TABLE TO //* PROCESS SELECTED DATA FILES. //* //* INSTRUCTIONS: //* //* 1. CUSTOMIZE THE INSTREAM SYMBOLICS. //* 2. IF YOUR DATABASE IS DB2, REMOVE THE DATACOM //* LIBRARIES AND UNCOMMENT THE DB2 LIBRARY. //* 3. CUSTOMIZE THE CAIKSJR DD STATEMENT TO REFLECT //* THE DD NAME UTILIZED IN THE INPUT CONTROL //* STATEMENT AND TO CUSTOMIZE THE DD DATA SET NAME. //* 4. CUSTOMIZE THE CAIKSOP DATA SET NAME. //* 5. IF THE RECYCLE INPUT CONTROL STATEMENT WILL BE //* SPECIFIED, CUSTOMIZE THE DATA SET NAME OF THE //* CAIKSRI DD STATEMENT.IF THIS STATEMENT WILL NOT BE //* USED, REMOVE OR COMMENT OUT THIS STATEMENT. //* 6. IF THE RECYCLE OUTPUT CONTROL STATEMENT WILL BE //* SPECIFIED, CUSTOMIZED THE DATA SET NAME OF THE //* CAIKSRO DD STATEMENT. IF THIS STATEMENT WILL NOT //* BE USED, REMOVE OR COMMENT OUT THIS STATEMENT. //******************************************************* //CAKSLOAD PROC INDEX='CAI', /*DATASET // DCIND='CAI', /*DATACOM // DVOL='CAIVOL', /*VOL SER OF DASD // PERMDA='DISK', /*PERM DASD NAME // SYSOUT='*' /*SYSOUT CLASS //STEP1 EXEC PGM=CAKSLOAD //STEPLIB DD DSN=&INDEX..CAILIB,DISP=SHR // DD DSN=&INDEX..CAICICS,DISP=SHR // DD DSN=&DCIND..USERLOAD,DISP=SHR <-- DATACOM // DD DSN=&DCIND..INFOCAI.LOAD,DISP=SHR <-- DATACOM // DD DSN=&DCIND..LOAD,DISP=SHR <-- DATACOM //* DD DSN=SYS2.DSNLOAD,DISP=SHR <-- DB2 //SYSOUT DD SYSOUT=&SYSOUT. //* //************************************************** //* THE CA PMA/DM LOAD CONTROL REPORTS WILL BE //* OUTPUT TO THE SYSPRINT DD STATEMENT. //************************************************** //* //SYSPRINT DD SYSOUT=&SYSOUT. //* //************************************************** //* THE CAIKSPAR DD STATEMENT DEFINES THE DATA SET //* NAME OF THE CA PMA GLOBAL PARAMETER FILE WHICH //* WILL BE ACCESSED DURING PROCESSING. //************************************************** //* //CAIKSPAR DD DSN=&INDEX..PMAPARM,DISP=SHR //* //************************************************** //* THE CAIKSJR DD STATEMENT DEFINES THE INPUT //* DATA SET NAME OF THE FILE TO BE PROCESSED. //* THE DDNAME TO BE USED IS VARIABLE. THE DDNAMES //* ARE DEFINED DURING IRD RECORD DEFINITION //* ACCOMPLISHED VIA THE CA PMA/DM ONLINE FACILITY. //************************************************** //* //CAIKSJR DD DSN=CAI.JARSPMA.HISTORY.CHARGS7, <---- CUSTOMIZE // DISP=SHR //* //************************************************** //* THE CAIKSRI DD STATEMENT DEFINES THE INPUT //* DATA SET NAME OF THE CORRECTED ERROR FILE WHICH //* WILL ALSO BE INPUT IN THIS PROCESS. USE THIS DD //* STATEMENT IN CONJUNCTION WITH THE FOLLOWING DM //* CONTROL STATEMENT: //* //* RECYCLE INPUT //************************************************** //* //*CAIKSRI DD DSN=&INDEX..DM.ORD.ERROR.FILE,DISP=SHR <----- CUSTOMIZE //* //************************************************** //* THE CAIKSOP DD STATEMENT DEFINES THE DATA SET //* NAME OF THE ORD DATA FILE WHICH WILL BE //* CREATED DURING THIS PROCESS. //************************************************** //* //CAIKSRO DD DSN=&INDEX..DM.ORD.ERROR.FILE(0), <----- CUSTOMIZE // UNIT=&PERMDA., <----- CUSTOMIZE // DISP=(NEW,CATLG,DELETE), // DCB=(RECFM=V,LRECL=32000,BLKSIZE=32760,DSORG=PS), // VOL=SER=&DVOL., // SPACE=(TRK,(10,10)) //* //************************************************** //* THE CAIKSRO DD STATEMENT DEFINES THE OUTPUT //* DATA SET NAME OF THE ERROR FILE WHICH MAY BE //* CREATED DURING THIS PROCESS. USE THIS DD //* STATEMENT IN CONJUNCTION WITH THE FOLLOWING DM //* CONTROL STATEMENTS: //* //* RECYCLE OUTPUT AND ERRORS. //************************************************** //* //*CAIKSRO DD DSN=&INDEX..DM.ORD.ERROR.FILE(0), <----- CUSTOMIZE //* UNIT=&PERMDA., <----- CUSTOMIZE //* DISP=(NEW,CATLG,DELETE), //* DCB=(RECFM=VB,LRECL=3200,BLKSIZE=32760,DSORG=PS), //* VOL=SER=&DVOL., //* SPACE=(TRK,(10,10)) //* //******************************************************* //* THE SYSIN DD STATEMENT IS USED TO INPUT THE DMLOAD //* CONTROL STATEMENTS. //******************************************************* //* //SYSIN DD DDNAME=SYSIN // PEND //* //DMLOAD EXEC CAKSLOAD //STEP1.SYSIN DD * INPUT JARS = CAIKSJR OUTRECS = MBJ
Sample output generated by this jobstream appears in the section Daily Processing Output.
| Copyright © 2011 CA. All rights reserved. | Tell Technical Publications how we can improve this information |