HP XP Command View Advanced Edition Software - Manual (Page 284)

//* All Rights Reserved. Copyright (C) 2013, 2014, Hitachi, 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 'HP.' 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 Smart Manager for MF files.
//*
//CLEAN EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE HP.CHKLnnn.SMPMCS -----(4)
DELETE HP.CHKLnnn.F1 -----(5)
DELETE HP.CHKLnnn.F2 -----(6)
DELETE HP.CHKLnnn.F3 -----(7)
DELETE HP.CHKLnnn.F4 -----(8)
DELETE HP.CHKLnnn.F5 -----(9)
DELETE HP.CHKLnnn.F6 -----(10)
DELETE HP.CHKLnnn.F7 -----(11)
DELETE HP.CHKLnnn.F8 -----(12)
DELETE HP.CHKLnnn.F9 -----(13)
SET MAXCC = 0
/*
//*********************************************************************
//* TSO receive to restore portable PDS from BINARY FTP
//*********************************************************************
//S1 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
RECEIVE INDSN(CHKLnnn.SMPMCS.XMIT)
DSNAME('HP.CHKLnnn.SMPMCS') + -----(14)
VOLUME(#tso01) -----(15)
RECEIVE INDSN(CHKLnnn.F1.XMIT)
DSNAME('HP.CHKLnnn.F1') + -----(16)
VOLUME(#tso01) -----(17)
RECEIVE INDSN(CHKLnnn.F2.XMIT)
DSNAME('HP.CHKLnnn.F2') + -----(18)
VOLUME(#tso01) -----(19)
RECEIVE INDSN(CHKLnnn.F3.XMIT)
DSNAME('HP.CHKLnnn.F3') + -----(20)
VOLUME(#tso01) -----(21)
RECEIVE INDSN(CHKLnnn.F4.XMIT)
DSNAME('HP.CHKLnnn.F4') + -----(22)
VOLUME(#tso01) -----(23)
Modifying the sample JCL 284