JCL example for Stand-Alone Prefix Resolution

To run Stand-Alone Prefix Resolution, you must edit and submit a JCL stream. This example will give you an idea how to specify parameters in the JCL stream.

The JCL example shown in the following figure invokes Stand-Alone Prefix Resolution to resolve logical relationships and preprocess secondary indexes.

In this example, the TYPE=LM control statement is specified.

The preallocated DFSURWF3 data set is used as input to Stand-Alone Prefix Update or the IMS™ Database Prefix Update utility.

The preallocated DFSURIDX is an output data set needed by the IMS HISAM Reorganization Unload and Reload utilities to build secondary indexes.

For your own needs, change the values marked in bold.

Figure 1. Stand-Alone Prefix Resolution JCL

//HPPR     JOB (...,...),...
//*
//JOBLIB   DD DISP=SHR,DSN=IMS.SDFSRESL
//         DD DISP=SHR,DSN=HPS.SHPSLMD0
//HPPR     EXEC PGM=FABYMAIN
//*-----------------------------------------------------------------*
//*       STAND-ALONE PREFIX RESOLUTION                             *
//* ----------------------------------------------------------------*
//DFSURWF1 DD DISP=SHR,DSN=FABY.WF1.A,BUFNO=88
//         DD DISP=SHR,DSN=FABY.WF1.B
//DFSURWF3 DD DISP=SHR,DSN=FABY.WF3,BUFNO=44
//DFSURCDS DD DISP=SHR,DSN=FABY.CDS
//DFSURIDX DD DISP=SHR,DSN=FABY.IDX,BUFNO=44
//SYSUDUMP DD SYSOUT=*
//INDXWK01 DD  UNIT=3390,SPACE=(CYL,(22,1)),VOLUME=ABC001
//INDXWK02 DD  UNIT=3390,SPACE=(CYL,(22,1)),VOLUME=ABC002
//LPLCWK01 DD  UNIT=3390,SPACE=(CYL,(22,1)),VOLUME=ABC003
//LPLCWK02 DD  UNIT=3390,SPACE=(CYL,(22,1)),VOLUME=ABC004
//TWINWK01 DD  UNIT=3390,SPACE=(CYL,(22,1)),VOLUME=ABC005
//TWINWK02 DD  UNIT=3390,SPACE=(CYL,(22,1)),VOLUME=ABC006
//FABYPRNT DD SYSOUT=*
//FABYMSG  DD SYSOUT=*
//FABYIN   DD *
    TYPE=LM
    UPDATE=NO
/*