//dtseftg1 JOB (TOS00),'GOVONE FTP',CLASS=A,MSGCLASS=X,
//      USER=#DOADTS
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//PROCLIB JCLLIB ORDER=PROD.PROCLIB    BY Z/OS
//*
//*
//FTPXFER  EXEC PGM=FTP,REGION=6M,PARM='(EXIT TIMEOUT 120'
//SYSPRINT DD  SYSOUT=*
//OUTPUT   DD  SYSOUT=*
//INPUT    DD  *
10.27.12.1
FTG1DOS1
DESUSR
ebcdic
mode block
site tr pri=300 sec=200 unit=work
put 'DOESTAX.HDVL.EFTEXT' DOESTAX.HDVL.EFTEXT
dir
quit
/*
//*-------------------------------------------------------------------*
//* A trailer step should be added here to demand the SYADG1P1 job    *
//* at ODC2                                                           *
//*-------------------------------------------------------------------*