//* ****************************************************************** //* * SHIP PACKAGE PKG-ID TO DESTINATION DEST-ID ( OPTION BACKOUT ) . //* ****************************************************************** //* //* THE FOLLOWING DD STATEMENT MUST BE THE *LAST* CARD IN THIS MEMBER. //* ISPSLIB MEMBER C1BMXIN IS INCLUDED AFTER IT AS THE INSTREAM DATA. //* //C1BMXIN DD * *-------------------------------* ISPSLIB(C1BMXIN) * //*SHIP PAC 'PACKAGE123456 ' TO DEST destid OPT OUT PREFIX LNDV.NNDV . //* *============================================* ISPSLIB(C1BMXNDM) * //* *==============================================================* * //* ****************************************************************** //* * SHIP PACKAGE PKG-ID TO DESTINATION DEST-ID ( OPTION BACKOUT ) . //* ****************************************************************** //* //* THE FOLLOWING DD STATEMENT MUST BE THE *LAST* CARD IN THIS MEMBER. //* ISPSLIB MEMBER C1BMXIN IS INCLUDED AFTER IT AS THE INSTREAM DATA. //* //C1BMXEOH DD DATA,DEL=## )IM C1BMXEOJ OPT ## //C1BMXIN DD * *-------------------------------* ISPSLIB(C1BMXIN) * //*SHIP PAC 'PACKAGE123456 ' TO DEST destid OPT OUT PREFIX LNDV.NNDV . //* *============================================* ISPSLIB(C1BMXNDM) * //* *==============================================================* *
the c1bmxeoj will be modified:
FROM -
)CM PACKAGE SHIPMENT BATCH JCL - END OF JOB JOBSTEP - ISPSLIB(C1BMXEOJ) )CM )CM THIS SKELETON CAN BE CUSTOMIZED TO EXECUTE JOBSTEP(S) AFTER THE STAGING )CM AND TRANSMISSION METHOD DEPENDENT JOBSTEPS. THE ACTUAL TRANSMISSION OF )CM OF THE STAGING DATASETS HAS PROBABLY NOT COMPLETED WHEN THIS JOBSTEP )CM EXECUTES. THE DISTRIBUTED VERSION OF THIS SKELETON CONTAINS ONLY A )CM COMMENT CARD. )CM )CM * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * )CM //* ISPSLIB(C1BMXEOJ) - END OF JOB *************************************************************************************************************** )CM PACKAGE SHIPMENT BATCH JCL - END OF JOB JOBSTEP - ISPSLIB(C1BMXEOJ) )CM )CM THIS SKELETON CAN BE CUSTOMIZED TO EXECUTE JOBSTEP(S) AFTER THE STAGING )CM AND TRANSMISSION METHOD DEPENDENT JOBSTEPS. THE ACTUAL TRANSMISSION OF )CM OF THE STAGING DATASETS HAS PROBABLY NOT COMPLETED WHEN THIS JOBSTEP )CM EXECUTES. THE DISTRIBUTED VERSION OF THIS SKELETON CONTAINS ONLY A )CM COMMENT CARD. )CM )CM * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * )CM //* ISPSLIB(C1BMXEOJ) - END OF JOB //* *--------------------------------------------* ISPSLIB(C1BMXEND) * //* *--------------------------------------------------------------* * //* *--------------------------------------------------------------* * //* *--------------------------------------------------------------* * //* *--------------------------------------------------------------* * //C1BMXDSN EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD DISP=(OLD,PASS),DSN=&&&&HDEL //* //C1BMXUSS EXEC PGM=BPXBATCH //STDPARM DD DISP=(OLD,PASS),DSN=&&&&HUDL //STDOUT DD SYSOUT=* //STDERR DD SYSOUT=*