RLSE works perfectly with IEFBR14 and DISP=(,CATLG)  ;-)))
(I had to fix it several times)

--
Radoslaw Skorupka
Lodz, Poland






W dniu 2016-04-04 o 14:02, Vernooij, CP (ITOPT1) - KLM pisze:
RLSE is done during CLOSE of a dataset. IEFBR14 doesn't OPEN/CLOSE datasets.

Kees.

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Charles Mills
Sent: 04 April, 2016 13:54
To: [email protected]
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:[email protected]] On Behalf 
Of Tom Marchant
Sent: Sunday, April 03, 2016 10:30 PM
To: [email protected]
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.





---
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: [email protected]
Sąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru 
Sądowego, nr rejestru przedsiębiorców KRS 0000025237, NIP: 526-021-50-88. 
Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości 
wpłacony) wynosi 168.955.696 złotych.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to