get a file from one IP
Posted: Thu Dec 30, 2010 7:51 pm
i HAVE this job, and i would like to know if it is correct.
tHANK YOU
/FTPRZH01 EXEC PGM=FTP,
// PARM='<server> (EXIT'
//SYSTCPD DD DSN=TCPIPSIS.COMUN.CONFIG(TCPDATA),DISP=SHR
//SYSFTPD DD DSN=TCPIPSIS.COMUN.CONFIG(FTSDATA),DISP=SHR
//SYSPRINT DD SYSOUT=*
//OUTPUT DD *
//INPUT DD DISP=SHR,DSN=ORC.GRISB.JCL.SYSIN(K3FTPRZH)
// DD *
CD
IN
BIN
GET CCDTA1 +
'ORC.DEVT.RZHART.CCDTA1' (REPLACE
CLOSE
QUIT
// PARM='<server> (EXIT'
//SYSTCPD DD DSN=TCPIPSIS.COMUN.CONFIG(TCPDATA),DISP=SHR
//SYSFTPD DD DSN=TCPIPSIS.COMUN.CONFIG(FTSDATA),DISP=SHR
//SYSPRINT DD SYSOUT=*
//OUTPUT DD *
//INPUT DD DISP=SHR,DSN=ORC.GRISB.JCL.SYSIN(K3FTPRZH)
// DD *
CD
IN
BIN
GET CCDTA1 +
'ORC.DEVT.RZHART.CCDTA1' (REPLACE
CLOSE
QUIT