On Thu, 27 May 2010 22:13:57 -0400, larry macioce 
<[email protected]> wrote:

>I am sorry if I didnt make myself clear, we are trying to put a gdg to a
>windows server. I understand that the way I am trying to transmit the file
>in the jcl is failing,but I was wondering if I had some syntax wrong but I
>feel Micheal may have hit it on the head, that ftp and the put do not
>understand the notation of (+1)

Yes, it does. But you have to be aware of the fact that the FTP step actually 
runs in a separate space and that counts as if it is a separate job.

The following just works, provided, of course, GDG base and model has been 
correctly set up.

//MYUSER3 JOB 'JANTJE',
//             CLASS=C,MSGCLASS=X,MSGLEVEL=(1,1),
//             NOTIFY=&SYSUID
//*
//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
/*

Clearly, Windows does not understand what a GDG is, but that is not the issue 
here...

Cheers,

Jantje.

----------------------------------------------------------------------
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

Reply via email to