I am attempting to FTP a file from z/VM which I extracted from the z/VM
Spool (PRT) to the z/OS JES Spool. Here are my ftp statements from a code
snippet in my code:

queue     id
queue     "quote site filetype=jes"
queue     "mode b"
queue     "type e"
queue     "quote site lrecl=254"
queue     "put" temp_file
queue     "dir"
queue     "quit"

"ftp" host "(exit"

My problem is that the "quote site lrecl=254" is being overridden by the
put of the file which is setting it to an LRECL=80 thus:

>>>site filetype=jes
200 SITE command was accepted
Command:
>>>MODE b
200 Data transfer mode is Block
Command:
>>>TYPE e
200 Representation type is Ebcdic NonPrint
Command:
>>>site lrecl=254
200 SITE command was accepted
Command:
>>>SITE VARrecfm
200 SITE command was accepted
>>>PORT 172,21,246,100,8,186
200 Port request OK.
>>>STOR temp.file
125 Sending Job to JES internal reader FIXrecfm 80    <============
250-It is known to JES as JOB10347
250 Transfer completed (data was truncated)       <============

Does anyone have any suggestions on how to overcome this?



Lionel B. Dyck, Consultant/Specialist
Enterprise Platform Services, Mainframe Engineering
KP-IT Enterprise Engineering
925-926-5332 (8-473-5332) | E-Mail: [EMAIL PROTECTED]
AIM: lbdyck | Yahoo IM: lbdyck
Kaiser Service Credo: "Our cause is health. Our passion is service. We're
here to make lives better."

I never guess. It is a capital mistake to theorize before one has data.
Insensibly one begins to twist facts to suit theories, instead of theories
to suit facts.
- Sir Arthur Conan Doyle

NOTICE TO RECIPIENT: If you are not the intended recipient of this e-mail,
you are prohibited from sharing, copying, or otherwise using or disclosing
its contents. If you have received this e-mail in error, please notify the
sender immediately by reply e-mail and permanently delete this e-mail and
any attachments without reading, forwarding or saving them. Thank you.

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