RECVUPLD (TSO/E RECEIVE processing)

The following numbers correspond to the numbers appearing on the right side of the sample JCL.

(1) to (3)

Modify the JOB statement in accordance with the installation environment.

(4) to (11), (13), (15), (17), (19), (21), and (23)

Change the prefix for the dataset name from HITACHI to the TSO/E-user-ID.

(12), (14), (16), (18), (20), (22), and (24)

Change VOLSER from #tso01 to TSOW00.

//RECVUPLD JOB (ACCT#),'TSO RECEIVE',                         -----(1)
//             REGION=0M,CLASS=A,                             -----(2)
//             MSGLEVEL=(1,1),MSGCLASS=X,NOTIFY=&SYSUID       -----(3)
//*********************************************************************
//*
//* All Rights Reserved.
//* Copyright (C) 2024, 2026, Hitachi Vantara, Ltd.
//*
//*********************************************************************
//*
//*  This JOB uses TSO RECEIVE command to receive the data sets
//*  that were allocated by ALLOUPLD JCL and contain the unzipped
//*  .XMIT files that were uploaded via binary FTP transfer.
//*
//*  Instructions:
//*  1. Logon with the same USERID used for ALLOUPLD job.
//*  2. Change 'HITACHI.' prefixes to suit your naming convention.
//*  3. Change '#tso01' to VOLSER of your device.
//*  4. Submit this JCL.
//*  5. See this product's documentation for SMP/E instructions.
//*     Modify the .SMPMCS file so that the chosen file prefix
//*     is indicated in the RFDSNPFX() parameter of the
//*     FUNCTION() statement.
//*     Allocate the .SMPMCS file directly to the SMP/E
//*     SMPPTFIN DD statement on the receive step. SMP/E will
//*     locate the other files via the catalog.
//*
//*
//*  Remove all mainframe analytics recorder files.
//*
//CLEAN    EXEC PGM=IDCAMS
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  *
     DELETE HITACHI.CHRSnnn.SMPMCS                            -----(4)
     DELETE HITACHI.CHRSnnn.F1                                -----(5)
     DELETE HITACHI.CHRSnnn.F2                                -----(6)
     DELETE HITACHI.CHRSnnn.F3                                -----(7)
     DELETE HITACHI.CHRSnnn.F4                                -----(8)
     DELETE HITACHI.CHRSnnn.F5                                -----(9)
     DELETE HITACHI.CHRSnnn.F6                                -----(10)
     SET MAXCC = 0
/*
//*********************************************************************
//* TSO receive to restore portable PDS from BINARY FTP
//*********************************************************************
//S1       EXEC PGM=IKJEFT01
//SYSTSPRT DD  SYSOUT=*
//SYSTSIN  DD  *
     RECEIVE INDSN(CHRSnnn.SMPMCS.XMIT)
       DSNAME('HITACHI.CHRSnnn.SMPMCS') +                     -----(11)
       VOLUME(#tso01)                                         -----(12)
     RECEIVE INDSN(CHRSnnn.F1.XMIT)
       DSNAME('HITACHI.CHRSnnn.F1') +                         -----(13)
       VOLUME(#tso01)                                         -----(14)
     RECEIVE INDSN(CHRSnnn.F2.XMIT)
       DSNAME('HITACHI.CHRSnnn.F2') +                         -----(15)
       VOLUME(#tso01)                                         -----(16)
     RECEIVE INDSN(CHRSnnn.F3.XMIT)
       DSNAME('HITACHI.CHRSnnn.F3') +                         -----(17)
       VOLUME(#tso01)                                         -----(18)
     RECEIVE INDSN(CHRSnnn.F4.XMIT)
       DSNAME('HITACHI.CHRSnnn.F4') +                         -----(19)
       VOLUME(#tso01)                                         -----(20)
     RECEIVE INDSN(CHRSnnn.F5.XMIT)
       DSNAME('HITACHI.CHRSnnn.F5') +                         -----(21)
       VOLUME(#tso01)                                         -----(22)
     RECEIVE INDSN(CHRSnnn.F6.XMIT)
       DSNAME('HITACHI.CHRSnnn.F6') +                         -----(23)
       VOLUME(#tso01)                                         -----(24)
END
/*
//