JCL example for Concurrent Prefix Update

To run Concurrent Prefix Update, 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 Concurrent Prefix Update to resolve logical relationships and update the prefix of each logical segment in the two databases that are defined by HDAM01 and HDAM02 DD statements.

In this example, the following control statements are specified:

TYPE=LO
UPDATE=YES
DBRC=YES

Change the bold values to meet your site requirements.

Figure 1. Concurrent Prefix Update JCL

 //HPPR     JOB (...,...),...
 //*
 //JOBLIB   DD DISP=SHR,DSN=IMS.SDFSRESL
 //         DD DISP=SHR,DSN=HPS.SHPSLMD0
 //HPPR     EXEC PGM=FABYMAIN
 //*-----------------------------------------------------------------*
 //*       CONCURRENT PREFIX UPDATE                                  *
 //* ----------------------------------------------------------------*
 //DFSURWF1 DD DISP=SHR,DSN=FABY.WF1.A,BUFNO=88
 //         DD DISP=SHR,DSN=FABY.WF1.B
 //DFSURCDS DD DISP=SHR,DSN=FABY.CDS
 //IMS      DD DISP=SHR,DSN=IMS.DBDLIB
 //SYSUDUMP DD SYSOUT=*
 //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=LO
     UPDATE=YES
     DBRC=YES
 /*
 //HDAM01   DD DISP=SHR,DSN=HDAM01
 //HDAM02   DD DISP=SHR,DSN=HDAM02
 //RECON1   DD DISP=SHR,DSN=RECON1
 //RECON2   DD DISP=SHR,DSN=RECON2
 //RECON3   DD DISP=SHR,DSN=RECON3