On 2015-02-24 18:10, Bernd Oppolzer wrote:
IMO the older versions of PL/1 didn't have such options
to initialize automatic storage. Or, if they had, it was VERY uncommon
to use them ...
I would suggest to check the old versions reference manuals and
if there indeed is such an option (I don't think so, but maybe), then I
would look at old compile listings (which should have been archived)
and check if this option has been used (hopefully not). If there was no
such option or if it has not been used, there is no danger to switch it off.
Given that CICS programs are somewhat/quite/very unlikely to only work with
fixed bin, but far more likely with fixed dec, the current STORAGE() options
would have caused nothing but S0C7's by initializing these to binary zero...
And initializing CHAR to binary zero? Not a very normal scenario.
Robert
Kind regards
Bernd
Am 24.02.2015 um 17:35 schrieb Denis Gäbler:
Region default STORAGE(00,NONE,00,0)
The third
parameter set to zero is a killer, get rid of it! The consequence of
using it
Is that all automatic storage in a procedure will be set to binary
zeroes upon
each entry to the procedure, and if you've got deeply nested
procedures with
lots of local variables, you will suffer, big, big, big time! If
you need
specific variables to be initialised use INIT(whatever) on those, and
only
those.
While what you state is all true, its not a good advice to change that without
proper testing, because they might have old (e.g. COBOL) LE programs, that
rely on the storage being zero'd out by LE, because they do not have INIT or
VALUES clauses and programs cannot be changed in time to allow the third parm
to be set to something other than 00.
For example VS COBOL used to have the option WSCLEAR, which did not require
initializing variables, I don't know about pre Enterprise Versions of PL/I.
Denis.
-----Original Message-----
From: Robert Prins <[email protected]>
To: IBM-MAIN <[email protected]>
Sent: Tue, Feb 24, 2015 2:54 pm
Subject: Re: Enterprise PL/1 performance
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
--
Robert AH Prins
robert(a)prino(d)org
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
