If you are transferring a PDS from one MVS LPAR to another and creating
the target PDS, couldn't you use:
mvsput 'FTP.V8050.MVS.BUILDJCL' 'DRP.V8050.MVS.BUILDJCL.NEW'
(REAllocate
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of John McKown
Sent: Thursday, September 07, 2017 1:33 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTP JCL EXAMPLE - FTP PDS
On Thu, Sep 7, 2017 at 11:47 AM, willie bunter <
0000001409bd2345-dmarc-requ...@listserv.ua.edu> wrote:
> John,
>
> I am stuck again. Would you have the parm when FTPing a PDS/PDSE?
>
> I tried the following:
>
> QUOTE SITE PRI=50 SEC=20 CYL
> MPUT 'FTP.V8050.MVS.BUILDJCL(*)' +
> 'DRP.V8050.MVS.BUILDJCL.NEW'
> QUIT
>
>
That MPUT command just looks "wrong" to me. I am assuming that you want to
send all the members in FTP.V8050.MVS.BUILDJCL to a new PDSE called
DRP.V8050.MVS.BUILDJCL.NEW. What I think you need is akin to:
-- use the next two if transferring within same z/OS system (don't key in this
line) quote site pri=50 sec=20 cyl mkdir 'DRP.V8050.MVS.BUILD.JCL.NEW' (like
'FTP.V8050.MVS.BUILDJCL
-- or use the next two if the receiving dataset is on a different z/OS system
(don't key in this line) quote site lrecl=? recfm=? pri=50 sec=20 cyl dir=100
pdstype=pdse mkdir 'DRP.V8050.MVS.BUILD.JCL.NEW'
-- common commands (don't key in this line) cd 'DRP.V8050.MVS.BUILD.JCL.NEW'
lcd 'FTP.V8050.MVS.BUILDJCL'
prompt
mput *
bye
You can use the first "quote & mkdir" lines - the one with the "(like ..."
- only if the FTP.--- DSN is on the system from which you are doing the ftp,
which is not likely. If you're sending from one z/OS to another, then use the
"quote site" and the second "mkdir". You must use the "cd" command to direct
the output into the DRP.--- dataset. You must use the "lcd"
command to read the member from the FTP.--- dataset. I put in the "prompt"
command to disable the normal prompt for confirming the transfer of each
member. The "mput *' actually transfer the members from the FTP.--- to the
DRP.--- dataset.
--
UNIX was not designed to stop you from doing stupid things, because that would
also stop you from doing clever things. -- Doug Gwyn
Maranatha! <><
John McKown
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
