Which server is now available to pull HOLDDATA. If I'm not mistaken a few changes were made that cause this long time process to fail in this shop. What should replace "service.bouler.ibm.com" what should now be used to transmit via FTP?
Received RC=1808 FTP process //****************************************************************** //* FTP from IBM to NNN to get FULL ENHANCED HOLDDATA * //* service.boulder.ibm.com * //* public.dhe.ibm.com * //****************************************************************** //TIVDST00 OUTPUT JESDS=ALL,DEST=OPC INSERTED BY TWS //TIVDSTAL OUTPUT JESDS=ALL INSERTED BY TWS //FTPHOLDD EXEC PGM=FTP,REGION=2M,PARM='(EXIT' //SYSPRINT DD SYSOUT=* //OUTPUT DD SYSOUT=* //INPUT DD * service.boulder.ibm.com anonymous name.n...@nnn.zzz<mailto:name.n...@nnn.zzz> cd /s390/holddata locsite lrecl=80 blksize=0 recfm=fb cyl primary=15 get full.txt 'HLQ.SMPE.ENHANCED.HOLDDATA' (repl quit /* //*********************************************************************/ //* RECEIVE HOLDDATA into the z/OS GLOBAL ZONE for z/OS and Websphere */ //*********************************************************************/ //RECHLD1 EXEC PGM=GIMSMP,PARM='PROCESS=WAIT',DYNAMNBR=120,REGION=4M, // COND=(0,NE,FTPHOLDD) //SMPCSI DD DISP=SHR,DSN=SMPEMVS.GLOBAL.CSI //SMPOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SMPHOLD DD DISP=SHR,DSN=HLQ.SMPE.ENHANCED.HOLDDATA //SMPCNTL DD * SET BDY(GLOBAL). RECEIVE HOLDDATA. /* Thanks Joe ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
