But the approach below has a clear drawback: the programmer has to remember that what has been written to MYUSER.GDG(+1), is later read by the 'put' command referencing MYUSER.GDG(0). Confusing ...
Instead, if you code your ftp step as follows: //STP030 EXEC PROC=FTP,TO='windowsserver' //SYSPRINT DD SYSOUT=* //IN DD DISP=SHR,DSN=MYUSER.GDG(+1) or DSN=*.COPYGDG.SYSUT2 //OUTPUT DD SYSOUT=* //INPUT DD * MYUSER mywindowspassword binary put //dd:IN MYUSER.GDG.PLUS1 quit you don't have to care about anything. Straightforward ... > //COPYGDG EXEC PGM=IEBGENER > //SYSIN DD DUMMY > //SYSPRINT DD SYSOUT=* > //SYSUT1 DD DISP=SHR,DSN=MYUSER.IN > //SYSUT2 DD DISP=(,CATLG,DELETE),DSN=MYUSER.GDG(+1), > // SPACE=(CYL,(1,5)),UNIT=SYSDA, > // DCB=MYUSER.MODEL > //* > //* > //STP030 EXEC PROC=FTP,TO='windowsserver' > //SYSPRINT DD SYSOUT=* > //OUTPUT DD SYSOUT=* > //INPUT DD * > MYUSER > mywindowspassword > binary > put 'MYUSER.GDG(0)' MYUSER.GDG.PLUS1 > quit > /* Walter Marguccio z/OS Systems Programmer BELENUS LOB Informatic GmbH Munich - Germany ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
