The method for modifying HDSYK3RC, which performs SMP/E RECEIVE processing, 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:
//HDSYK3RC JOB (ACCT#),'RECEIVE BC MANAGER', -----(1) // REGION=0M,CLASS=A, -----(2) // MSGLEVEL=(1,1),MSGCLASS=X,NOTIFY=&SYSUID -----(3) //********************************************************************* //* //* All Rights Reserved. Copyright (C) 2003, 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(CHYKnnn) RFPREFIX(HITACHI) -----(6) LIST. /*