Using IBM FTP CS V2R1, the uploaded INFILE's excess space is not RLSE'd.
//FTPUP EXEC PGM=FTP,PARM='(EXIT=4' //SYSPRINT DD SYSOUT=*,DCB=BLKSIZE=133 //SYSABEND DD SYSOUT=* //SYSOUT DD SYSOUT=* //FTPOUT DD SYSOUT=* //INFILE DD DSN=MXGLRG.CICS.UNTERSE,DISP=(NEW,CATLG,CATLG), // UNIT=(3390,1),DSNTYPE=LARGE, // DSORG=PS,RECFM=FB,LRECL=1024,BLKSIZE=6144, // SPACE=(CYL,(500,500),RLSE) //SYSIN DD * 99.99.99.99 USERID PASSWORDPHRASE BINARY GET CICS2.terse + 'MXGLRG.CICS.UNTERSE' (replace CLOSE QUIT I found one reference that CLOSE TYPE=T prevents RLSE, but no reference if FTP uses TYPE=T. Barry Herbert W. "Barry" Merrill, PhD President-Programmer MXG Software Merrill Consultants 10717 Cromwell Drive Dallas, TX 75229-5112 ba...@mxg.com <mailto:ba...@mxg.com> Fax: 214 350 3694 - Still works, received as email Tel: 214 351 1966 - Unreliable, please use email www.mxg.com <http://www.mxg.com> HomePage: FAQ answers most questions ad...@mxg.com <mailto:ad...@mxg.com> License Forms, Invoice, Payment, ftp information supp...@mxg.com <mailto:supp...@mxg.com> Technical Issues MXG-L FREE ListServer http://www.mxg.com/mxg-l_listserver/ ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN