BINDJCL DD statement (PTF BQQ4959 applied)
The JCL for AR/CTL for Db2 DSNHLI utility consists of the mandatory BINDJCL DD statement. The BINDJCL data set must:
- Be a PDS with the following DCB parameters:
- Have enough free directory space for the ARDUHLI0 program to add members required for the generated BINDJCL statements
- Have enough free data space for the ARDUHLI0 program to write all generated BINDJCL statements
The following figure shows sample BINDJCL data set information:
. Data Set Information .
. Command ===> .
. .
. Data Set Name . . . . : <HLQ>.BINDJCL .
. .
. General Data Current Allocation .
. Management class . . : TSCANC0 Allocated cylinders : 1 .
. Storage class . . . : PROTEUS Allocated extents . : 1 .
. Volume serial . . . : PRT061 Maximum dir. blocks : 256 .
. Device type . . . . : 3390 .
. Data class . . . . . : DEFAULT .
. Organization . . . : PO Current Utilization .
. Record format . . . : FB Used cylinders . . : 1 .
. Record length . . . : 80 Used extents . . . : 1 .
. Block size . . . . : 27920 Used dir. blocks . : 1 .
. 1st extent cylinders: 1 Number of members . : 7 .
. Secondary cylinders : 1 .
. Data set name type : PDS Dates .
. Creation date . . . : 2020/05/29 .
. Referenced date . . : 2020/06/25 .
. Expiration date . . : ***None*** .
. Command ===> .
. .
. Data Set Name . . . . : <HLQ>.BINDJCL .
. .
. General Data Current Allocation .
. Management class . . : TSCANC0 Allocated cylinders : 1 .
. Storage class . . . : PROTEUS Allocated extents . : 1 .
. Volume serial . . . : PRT061 Maximum dir. blocks : 256 .
. Device type . . . . : 3390 .
. Data class . . . . . : DEFAULT .
. Organization . . . : PO Current Utilization .
. Record format . . . : FB Used cylinders . . : 1 .
. Record length . . . : 80 Used extents . . . : 1 .
. Block size . . . . : 27920 Used dir. blocks . : 1 .
. 1st extent cylinders: 1 Number of members . : 7 .
. Secondary cylinders : 1 .
. Data set name type : PDS Dates .
. Creation date . . . : 2020/05/29 .
. Referenced date . . : 2020/06/25 .
. Expiration date . . : ***None*** .
The following figure shows a sample BIND JCL:
. Menu Utilities Compilers Help .
. ------------------------------------------------------------------------------- .
. BROWSE <HLQ>.BINDJCL(CKPTRTN) Line 0000000000 Col 001 080 .
. Command ===> Scroll ===> CSR .
. ********************************* Top of Data ********************************** .
. //<userID> JOB (<acct>),'BIND AR/CTL DSNHLI',CLASS=<X>,REGION=512M, .
. // MSGCLASS=X,NOTIFY=&SYSUID .
. //********************************************************************* .
. //* * .
. //* JCL STATEMENTS GENERATED BY ARDUHLI0 V04.02.00 - 06/11/20-04.01 * .
. //* ON 06/11/2020 AT 09:05:57.097917 * .
. //* USING <HLQ>.LOAD * .
. //* * .
. //********************************************************************* .
. //CKPTRTN EXEC PGM=IEWL,PARM='LIST,XREF,LET' .
. //SYSLIB DD DISP=SHR,DSNAME=<HLQ>.LOAD .
. //ARCLIB DD DISP=SHR,DSNAME=<HLQ>.ARCLIB .
. //SYSLMOD DD DISP=SHR,DSNAME=<HLQ>.SYSLMOD .
. //SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(2048,1024)) .
. //SYSPRINT DD SYSOUT=* .
. //SYSLIN DD * .
. INCLUDE SYSLIB(CKPTRTN) .
. REPLACE -IMMED,DSNHLI .
. INCLUDE ARCLIB(ARCLI000) .
. ORDER CKPTRTN .
. ORDER ARCLI000 .
. MODE RMODE(24) .
. MODE AMODE(31) .
. ENTRY CKPTRTN .
. NAME CKPTRTN(R) .
. /* .
. // .
. ******************************** Bottom of Data ******************************** .
. ------------------------------------------------------------------------------- .
. BROWSE <HLQ>.BINDJCL(CKPTRTN) Line 0000000000 Col 001 080 .
. Command ===> Scroll ===> CSR .
. ********************************* Top of Data ********************************** .
. //<userID> JOB (<acct>),'BIND AR/CTL DSNHLI',CLASS=<X>,REGION=512M, .
. // MSGCLASS=X,NOTIFY=&SYSUID .
. //********************************************************************* .
. //* * .
. //* JCL STATEMENTS GENERATED BY ARDUHLI0 V04.02.00 - 06/11/20-04.01 * .
. //* ON 06/11/2020 AT 09:05:57.097917 * .
. //* USING <HLQ>.LOAD * .
. //* * .
. //********************************************************************* .
. //CKPTRTN EXEC PGM=IEWL,PARM='LIST,XREF,LET' .
. //SYSLIB DD DISP=SHR,DSNAME=<HLQ>.LOAD .
. //ARCLIB DD DISP=SHR,DSNAME=<HLQ>.ARCLIB .
. //SYSLMOD DD DISP=SHR,DSNAME=<HLQ>.SYSLMOD .
. //SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(2048,1024)) .
. //SYSPRINT DD SYSOUT=* .
. //SYSLIN DD * .
. INCLUDE SYSLIB(CKPTRTN) .
. REPLACE -IMMED,DSNHLI .
. INCLUDE ARCLIB(ARCLI000) .
. ORDER CKPTRTN .
. ORDER ARCLI000 .
. MODE RMODE(24) .
. MODE AMODE(31) .
. ENTRY CKPTRTN .
. NAME CKPTRTN(R) .
. /* .
. // .
. ******************************** Bottom of Data ******************************** .
Related topic
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*