Creating a site default table for FF Stand-alone DB Sensor
To generate a site default table, code the FF Site Default Generation utility JCL, run the job, and assemble and link-edit the source code.
About this task
The following figure shows the steps for creating the site default table. The numbers in the figure match the numbers in the procedure steps.
Procedure
Example
The following example shows how to specify the FF Site Default Generation utility JCL to create source code for BBESCTL0.
//BBESDFL1 JOB ....
//*
//DBSTGEN PROC HLQ='HPS'
//*--------------------------------------------------------------------
//* CREATE SOURCE CODE OF SITE DEFAULT TABLE
//*--------------------------------------------------------------------
//G EXEC PGM=BBESTGEN,PARM='GEN'
//STEPLIB DD DISP=SHR,DSN=&HLQ..SHPSLMD0 DB Solution Pack load module library
//SYSPUNCH DD DISP=(NEW,PASS,DELETE),DSN=&&SOURCE,
// DCB=(RECFM=FB,BLKSIZE=800),SPACE=(TRK,(1,1)),UNIT=SYSDA
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD DUMMY
//*--------------------------------------------------------------------
//* ASSEMBLE & LINK ==> SITE DEFAULT TABLE MODULE (BBESCTL0)
//*--------------------------------------------------------------------
//ASM EXEC PGM=ASMA90,COND=(4,LT,G),
// PARM='OBJECT,NODECK,LIST,XREF(SHORT)'
//SYSLIN DD DISP=(,PASS),UNIT=SYSDA,SPACE=(CYL,(5,5,0)),
// DCB=(BLKSIZE=400),DSN=&&OBJECT
//SYSUT1 DD DISP=(,DELETE),UNIT=SYSDA,SPACE=(CYL,(10,5))
//SYSPUNCH DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSIN DD DISP=(OLD,DELETE,DELETE),DSN=&&SOURCE
//*
//L EXEC PGM=IEWL,COND=(4,LT,ASM),REGION=4096K,
// PARM='LIST,REFR,REUS,AMODE=31,RMODE=ANY'
//SYSPRINT DD SYSOUT=*
//SYSLIN DD DISP=(OLD,DELETE,DELETE),DSN=&OBJECT
//*
// PEND
//*
//*-------------------------------------------------------------------*
//* BBESTGEN (PARM='GEN') - DB SENSOR SITE DEFAULT GENARATION UTILITY*
//*-------------------------------------------------------------------*
//GO EXEC DBSTGEN,HLQ=HPS
//*-------------------------------------*
//* SPECIFY SITE DEFAULT VALUES *
//*-------------------------------------*
//G.BBESIN DD *
GLOBAL DBRC=YES,
ITKBSRVR=ITKB001
/*
//L.SYSLMOD DD DISP=SHR,DSN=HPS.TABLELIB(BBESCTL0)
What to do next
When you code the DB Sensor JCL to run a Database Sensor job, you must concatenate the load module library in which BBESCTL0 resides to the STEPLIB DD of the DB Sensor JCL.
You can always check the options that are set in the site default table by running the FF Site Default Generation utility with the PARM='REPORT' option. When you specify this option, the utility prints the keywords and their parameters that are set in the site default table in the Site Default report.
The following example shows how to print the keywords and the parameters that are defined in BBESCTL0.
//BBESDFL2 JOB ....
//*
//*--------------------------------------------------------------------
//* PRINT SITE DEFAULT TABLE
//*--------------------------------------------------------------------
//REPORT EXEC PGM=BBESTGEN,PARM='REPORT'
//STEPLIB DD DISP=SHR,DSN=HPS.TABLELIB
//STEPLIB DD DISP=SHR,DSN=HPS.SHPSLMD0 DB Solution Pack load module library
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD DUMMY