22 lines
908 B
Plaintext
22 lines
908 B
Plaintext
//DTSPGOV1 JOB (TP),GOVONE,MSGCLASS=X,CLASS=A,MSGLEVEL=(1,1), 00010011
|
|
// NOTIFY=TOPFF0,USER=#DOADTS,REGION=4M 00010011
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//PROCLIB JCLLIB ORDER=PROD.PROCS.BATCH.LIB BY Z/OS
|
|
//**********************************************************************
|
|
//* START OF GOV1 FILE TRANSFER PROCESS BETWEEN ODC1 ODC2 & GOV1 *
|
|
//* RUNS ON DOES CA/7 *
|
|
//* FTP'S JOB DTSPODC2 TO OS12 TO START GET PROCESS FROM GOV1 *
|
|
//**********************************************************************
|
|
//JS010 EXEC PGM=FTP,REGION=2M,PARM='(EXIT TIMEOUT 120'
|
|
//SYSPRINT DD SYSOUT=*
|
|
//OUTPUT DD SYSOUT=*
|
|
//FTPJOB DD DISP=SHR,DSN=DOESTAX.PROD.JOBLIB(DTSPODC2)
|
|
//INPUT DD *
|
|
10.27.12.1
|
|
FTG1DOS1
|
|
DESUSR
|
|
SITE FILETYPE=JES
|
|
PUT 'DOESTAX.PROD.JOBLIB(DTSPODC2)'
|
|
QUIT
|
|
/*
|