Randy,

Have you considered the system symbol interpreter called EZACFSM1?  I 
checked to make sure it was available in Comm Server 1.7.  This is what your 
sample job will turn into:

//FTPTEST  JOB  (JOB,JOB),'RHARRIS',CLASS=Z,MSGCLASS=M
//STEP01   EXEC PGM=EZACFSM1
//SYSOUT   DD   DSN=&T1,DISP=(,PASS),UNIT=VIO
//SYSIN    DD   *
xxx.xxx.xxx.xxx
userid password
PUT 'RANDYS.TEST.FTP.DATASET' randys.test.ftp.dataset.&MON&DAY&YR2
QUIT
/*
//*
//STEP02   EXEC PGM=FTP
//SYSFTPD  DD  DSN=parmlib(FTPSDATA),DISP=(SHR,KEEP,KEEP)
//SYSTCPD  DD  DSN=parmlib(TCPDATA),DISP=(SHR,KEEP,KEEP)
//SYSMDUMP DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//OUTPUT   DD  SYSOUT=*
//INPUT    DD  DSN=&T1,DISP=(OLD,PASS)
/*

Regards,
Roland

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to