This seems to work for me:

quote site blksize=27998 lrecl=0 recfm=u pri=19950 sec=100 track  
mode b                                                            
ebcdic                                                            
PUT 'My.DSS.DUMP' 'MY.DSS.DUMP'                   
QUIT                                                              

Tom Chicklon

------------------------------------------------------

Hi list,

I'm  trying to send a dfdss file between two z/OS systems through FTP,
when
I submit the job this fails with RC=2875, message follows:

SYSIN instream FTP

USERID PASSWORD
SENDSITE
BINARY
QUOTE SITE LRECL=0 RECFM=U BLKSIZE=27998 VOL=TOOLAL
QUOTE SITE PRI=120 SEC=20 CYLINDERS
QUOTE STRU R
PUT 'USERID.BAT1WORK.D' 'USERID.BAT1WORK.D'
QUIT

Abend:

...
EZA1736I QUOTE STRU
R
EZA1701I >>> STRU
R
250 Data structure is
Record
EZA1460I
Command:
EZA1736I PUT 'USERID.BAT1WORK.D' 'USERID.BAT1WORK.D'
EZA1701I >>> PORT
170,251,189,33,22,196
200 Port request
OK.
EZA1701I >>> STOR 'USERID.BAT1WORK.D'

125 Storing data set USERID.BAT1WORK.D

EZA2590E send error from send_data - EDC5140I Broken pipe.
(errno2=0x74520442)
EZA2603E Error sending the
file
451 Transfer aborted due to file error. File is
catalogued.
EZA1735I Std Return Code = 27451, Error Code =
00010
EZA1701I >>>
QUIT


But when I don't specify the FTP command 'QUOTE STRU R', FTP works OK!!!

EZA1460I
Command:
EZA1736I PUT 'USERID.BAT1WORK.D'
'USERID.BAT1WORK.D'
EZA1701I >>> SITE VARrecfm LRECL=27998 RECFM=U
BLKSIZE=27998
200 SITE command was
accepted
EZA1701I >>> PORT
170,251,189,33,22,193
200 Port request
OK.
EZA1701I >>> STOR
'USERID.BAT1WORK.D'
125 Storing data set
USERID.BAT1WORK.D
EZA1485I 22342404 bytes transferred - 10 second interval rate 2232.01
KB/sec
- O
250 Transfer completed
successfully.
EZA1617I 31596876 bytes transferred in 13.960 seconds.  Transfer rate
2263.39 Kb

But this is'nt the solution because then the dfdss file cannot be
restored
in the receiver system because of his structure...

Please, help!




This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

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