I wrote a small program that took the parm (after the system
substituted the variables) and wrote it as a F 80 80 file w 1 record.
Ran it once for each card then used all the files for the input file.

On Thu, Sep 16, 2010 at 4:19 PM, Frank Swarbrick
<frank.swarbr...@efirstbank.com> wrote:
> You'll have to migrate to VSE to get this feature.
>
> :-)
>
> On 9/16/2010 at 2:47 PM, in message
> <d075e858419f4f45ab32ccfc321a616202b3edfad...@fbnex.furniturebrands.com>,
> "Harris, Randy" <rhar...@furniturebrands.com> wrote:
>> Trying to do an ftp from mainframe (z/OS v1.7) to a network server.
>> I would like to be able append the system date to the dataset in the put
>> statement.
>> Is there a symbolic parameter for date that will allow me to do this?
>>
>> //FTPTEST  JOB  (JOB,JOB),'RHARRIS',CLASS=Z,MSGCLASS=M
>> //STEP01   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  *
>> xxx.xxx.xxx.xxx
>> userid password
>> PUT 'randys.test.ftp.dataset' ''randys.test.ftp.dataset.Dyymmdd'
>> QUIT
>> /*
>>
>> Thanks,
>>
>> Randy Harris
>> Lane Furniture Industries, Inc.
>> Tupelo, MS 38802
>> Phone: 662-566-3447
>> rhar...@furniturebrands.com<mailto:rhar...@furniturebrands.com>
>>
>>
>>
>> ----------------------------------------------------------------------
>> 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
>
>>>>
>
> The information contained in this electronic communication and any document 
> attached hereto or transmitted herewith is confidential and intended for the 
> exclusive use of the individual or entity named above.  If the reader of this 
> message is not the intended recipient or the employee or agent responsible 
> for delivering it to the intended recipient, you are hereby notified that any 
> examination, use, dissemination, distribution or copying of this 
> communication or any part thereof is strictly prohibited.  If you have 
> received this communication in error, please immediately notify the sender by 
> reply e-mail and destroy this communication.  Thank you.
>
> ----------------------------------------------------------------------
> 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
>



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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