Well, it was worth a shot. I checked active FILEDEFs just before the GET.
There were none.
But I set one for OUTPUT anyway. Still get RECFM F. I'll let Chuckie's
pals sort it out via the PMR.
Thanks for the suggestion, though!
Finally wrote a pretty complex little VMFTP macro to help the users (and
servers):
getfmzos ?
GETFMZOS EXEC Y2 help...
GETFMZOS opens an FTP session with the hard-coded remote FTP server,
and 'GET's a sequential dataset, PDS (one or all members).
>[EMAIL PROTECTED]>
+-pds(mbr_name)-+
+-pds(*)--------+
+-FTPXFER-+
>>--+-outfn----+--+-outft---+--+-outfm-+--(--+---------+--+---------+--<>
+-=--------+ +-=-------+ +-REPlace-+ +-OLDDate-+
+-*--------+ +-*-------+
It's a work in progress (but that works). I'll probaly have to add RECFM
and LRECL to the operands when LOCSITE is fixed.
BTW, anyone know how to get the last R/W date from an MVS dataset via FTP.
All I get is the ReferenceDate (no time). PDS members provide the last
update date/time, but not sequential files (in any place I've yet stumbled
across -- not with LIST or DIR). Kind of makes OLDDATE a lot less useful
for sequential files.
Mike Walter
Hewitt Associates
The opinions expressed herein are mine alone, not my employer's.
"Huegel, Thomas" <[EMAIL PROTECTED]>
Sent by: "VM/ESA and z/VM Discussions" <[email protected]>
01/05/2006 04:46 PM
Please respond to
"VM/ESA and z/VM Discussions" <[email protected]>
To
[email protected]
cc
Subject
Re: Quick way to change RECFM?
Mike,
This is just a bit of a-stab-in-the-dark, perhaps if you issue a filedef
command before the FTP command ... somethink like this FILEDEF OUTPUT DISK
myfile out e (RECFM V LRECL .....
I think the ddname has to be OUTPUT
Tom
-----Original Message-----
From: Mike Walter [mailto:[EMAIL PROTECTED]
Sent: Thursday, January 05, 2006 4:03 PM
To: [email protected]
Subject: Re: Quick way to change RECFM?
And perhaps not.. :-(
---<snip>---
ascii
>>>TYPE a
200 Representation type is Ascii NonPrint
Command:
site notrailingblanks
>>>SITE notrailingblanks
200 SITE command was accepted
Command:
locsite var
Command:
locstat
Trace:FALSE, Send Port:TRUE
Use NETRC DATA File:TRUE, Logon Prompting:TRUE
Send Site with Put command:TRUE
Connected to:nn.nn.nnn.nnn, Port:FTP control (nn), logged in
Local Port:nnnn
Data type:a, Transfer mode:s
Record format:V
Translate Table: STANDARD
Console Width: 80
Command:
cms l * * E (iso
DMSLST002E File not found
DTCFTC0100E CMS return code: 28
Command:
get 'FIN.P.DATA' fin.data.e
>>>PORT nn,nnn,nn,nn,nnn
200 Port request OK.
>>>RETR 'FIN.P.DATA'
125 Sending data set FIN.P.DATA FIXrecfm 600
250 Transfer completed successfully.
39595928 bytes transferred in 9.245 seconds. Transfer rate 4282.96
Kbytes/sec.
Command:
cms l fin data e (iso
FILENAME FILETYPE FM FORMAT LRECL RECS BLOCKS DATE TIME
FIN DATA E1 F 600 69527 10185 2006-01-05
16:00:20
Command:
---<snip>---
Mike Walter
Hewitt Associates
The opinions expressed herein are mine alone, not my employer's.
"Alan Altmark" <[EMAIL PROTECTED]>
Sent by: "VM/ESA and z/VM Discussions" <[email protected]>
01/05/2006 03:31 PM
Please respond to
"VM/ESA and z/VM Discussions" <[email protected]>
To
[email protected]
cc
Subject
Re: Quick way to change RECFM?
On Thursday, 01/05/2006 at 02:48 CST, Mike Walter <[EMAIL PROTECTED]>
wrote:
> get 'FIN.P.DATA' finhrs.data.e
> >>>PORT 10,64,103,94,12,50
> 200 Port request OK.
> >>>RETR 'FIN.P.DATA'
> 125 Sending data set FIN.P.DATA FIXrecfm 600 <--- No!
S'ok, don't worry. The VM and MVS FTP servers add the FIXRECFM to the 125
response in order to convey recfm. However, it's only [supposed to be]
used for TYPE I (binary) transfers.
Perhaps 'ascii', 'site notrailingblanks', and 'locsite var' will get you
what you want.
Alan Altmark
z/VM Development
IBM Endicott
The information contained in this e-mail and any accompanying documents
may contain information that is confidential or otherwise protected from
disclosure. If you are not the intended recipient of this message, or if
this message has been addressed to you in error, please immediately alert
the sender by reply e-mail and then delete this message, including any
attachments. Any dissemination, distribution or other use of the contents
of this message by anyone other than the intended recipient is strictly
prohibited.
__________________________________________________________________
<< ella for Spam Control >> has removed VSE-List messages and set aside
VM-List for me
You can use it too - and it's FREE! http://www.ellaforspam.com
The information contained in this e-mail and any accompanying documents may
contain information that is confidential or otherwise protected from
disclosure. If you are not the intended recipient of this message, or if this
message has been addressed to you in error, please immediately alert the sender
by reply e-mail and then delete this message, including any attachments. Any
dissemination, distribution or other use of the contents of this message by
anyone other than the intended recipient is strictly prohibited.
