16 lines
750 B
Plaintext
16 lines
750 B
Plaintext
//DTSPODC2 JOB (PCFHF,CA7),'FTP NOTIFY',CLASS=G,MSGCLASS=2,
|
|
// MSGLEVEL=(1,1),USER=PCUCC7
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//PROCLIB JCLLIB ORDER=PROD.PROCLIB BY Z/OS
|
|
//*LOGONID PCUCC7
|
|
//**********************************************************************
|
|
//* GOV1 FTP GET FILE PROCESS *
|
|
//* RUNS ON OS12 *
|
|
//* DEMANDS JOB DTSPG1G1 ON OS12 CA/7 TO PUT FILE TO GOV1 *
|
|
//**********************************************************************
|
|
/*JOBPARM SYSAFF=OS12
|
|
//CA7BAT EXEC PROC=CA7BTI
|
|
//BTERM.SYSIN DD DSN=SYS2.CA7.ODC2.TRAILERS(DTSPG1G1),DISP=SHR
|
|
//BTERM.SYSPRINT DD SYSOUT=R,DCB=BLKSIZE=133
|
|
//*
|