RLSE is done during CLOSE of a dataset. IEFBR14 doesn't OPEN/CLOSE datasets.
Kees. -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Charles Mills Sent: 04 April, 2016 13:54 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: RLSE does not work with PGM=FTP Is RLSE ever effective on an input DD (a DD that the program opens for input)? Oh wait, INFILE is an output DD. Never mind. In that case Dr. M. could look into the DD:ddname syntax now supported by FTP. It's also *possible* that a succeeding IEFBR14 step would solve this. Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Tom Marchant Sent: Sunday, April 03, 2016 10:30 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: RLSE does not work with PGM=FTP On Sun, 3 Apr 2016 20:29:09 -0500, Barry Merrill wrote: >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 RLSE is not an attribute that stays with the data set. AFAIK, it only applies to the access with that DD statement. If you were to run a step like this: //COPY EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //ALLOC DD DISP=(NEW,CTLG),DSN=SOME.DATA.SET, // SPACE=(TRK,(20,20),RLSE) //SYSUT1 DD * record 1 record 2 //SYSUT2 DD DISP=OLD,DSN=SOME.DATA.SET I think that you would find that the excess space for SOME.DATA.SET is not released because the data is not written using the DD statement that has RLSE specified. Likewise, FTP isn't using the INFILE DD statement. This is only a guess, based upon my understanding of how RLSE works. I could be wrong. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ******************************************************** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ******************************************************** ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN