HDSYKDRC (SMP/E RECEIVE processing for REVERSE RESYNC protection function)

The method for modifying HDSYKARC, which performs SMP/E RECEIVE processing for the extended access control function, is explained below.

The following numbers correspond to the numbers appearing on the right side of the sample JCL. Modify the underlined parts in the sample JCL as follows:

(1)-(3)

Modify the JOB text to match the installation environment.

(4)

Change the prefix for the dataset name from HDSYK to HTC1.BCM.

(5)

Change the volume allocated to the SMP/E dataset from #smp01 to SMP001.

(6)

Change RFPREFIX from HITACHI to HTC1.BCM.

//HDSYKDRC JOB (ACCT#),'RECEIVE BC MANAGER',                  -----(1)
//             REGION=0M,CLASS=A,                             -----(2)
//             MSGLEVEL=(1,1),MSGCLASS=X,NOTIFY=&SYSUID       -----(3)
//*********************************************************************
//*
//* All Rights Reserved. Copyright (C) 2022, 2023, Hitachi, Ltd.
//*
//*********************************************************************
//*
//* This JCL executes SMP/E RECEIVE to uncompress .XMIT files.
//*
//* Instructions:
//* 1) Modify the JOB statement to match your environment.
//* 2) Modify the following values to match your environment:
//*
//*            Value         Description
//*           --------   --------------------------------
//*           GIMSMP     Installation SMP/E program
//   SET  PFX=HDSYK      Prefix of SMP files                  -----(4)
//   SET  VRM=Vnnnnnn    Second level name (VER REL MOD)
//   SET  VSN=#smp01     DASD volume serial for SMPTLIB       -----(5)
//*           HITACHI    Refer to 4) for detail.
//*
//* 3) Select form of SMPPTFIN DD statement depending upon whether
//*    installing from tape or uploaded .XMIT file.
//*
//* 4) Modify the value of RFPREFIX to match the prefix of the data set
//*    that you created with the JCL 'RECVUPLD'. Refer to the comment
//*    (refer to 3.) in 'RECVUPLD' for more detail.
//*
//* 5) Submit the JCL.
//*
//*********************************************************************
//RECEIVE  EXEC PGM=GIMSMP
//SMPOUT   DD  SYSOUT=*
//SMPRPT   DD  SYSOUT=*
//SMPLIST  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SMPWRK1  DD  UNIT=SYSDA,
//             SPACE=(3120,(0364,0380,500)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK2  DD  UNIT=SYSDA,
//             SPACE=(3120,(0364,0380,500)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK3  DD  UNIT=SYSDA,
//             SPACE=(3120,(0364,0380,500)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK4  DD  UNIT=SYSDA,
//             SPACE=(3120,(0364,0380,500)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK6  DD  UNIT=SYSDA,
//             SPACE=(3120,(0364,0380,500)),
//             DCB=(RECFM=FB,BLKSIZE=3120)
//SYSUT1   DD  UNIT=SYSDA,SPACE=(3120,(0380,0760))
//SYSUT2   DD  UNIT=SYSDA,SPACE=(3120,(0380,0760))
//SYSUT3   DD  UNIT=SYSDA,SPACE=(3120,(0380,0760))
//SYSUT4   DD  UNIT=SYSDA,SPACE=(3120,(0038,0100)),
//             DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB)
//* The following data sets would likely be specified in a
//* cataloged procedure customized for a particular customer.
//SMPPTS   DD  DISP=SHR,DSN=&PFX..SMPPTS
//SMPLOG   DD  DISP=MOD,DSN=&PFX..SMPLOG
//SMPLOGA  DD  DISP=MOD,DSN=&PFX..SMPLOGA
//SMPCSI   DD  DISP=SHR,DSN=&PFX..SMPCSI.CSI
//GLOBAL   DD  DISP=SHR,DSN=&PFX..SMPCSI.CSI
//TGT1     DD  DISP=SHR,DSN=&PFX..SMPCSI.CSI
//DLIB1    DD  DISP=SHR,DSN=&PFX..SMPCSI.CSI
//SMPHOLD  DD  DUMMY
//SMPTLIB  DD  DISP=SHR,UNIT=3390,VOL=SER=&VSN
//* Use DASD files if installing from .XMIT distribution
//SMPPTFIN DD DSN=&PFX..CHYKnnn.SMPMCS,DISP=SHR
//* Use tape files if installing from cartridge tape
//*SMPPTFIN DD DSN=SMPMCS,DISP=OLD,
//*        VOL=SER=HDSYK,UNIT=3480,LABEL=(1,SL)
//SMPCNTL  DD  *
SET        BDY(GLOBAL).
RECEIVE    SELECT(
              CHYKccc  /* adds the reverse resync protect function. */ 
                 )                            
           RFPREFIX(HITACHI)                                  -----(6)
           LIST.
/*