I am not prepared to dismiss Mr Gabler's concern about COBOL programs invoked by PL/I out of hand; The scenario he sets out is a possible one.
PL/I automatic storage does not, however, behave at all like COBOL working storage, and I judge that his problem is likely to arise very rarely even in mixed COBOL-and-PL/ I environments, which are themselves uncommon. (COBOL does now have local storage, an almost exact analogue of PL/I automatic storage; but it is still very little used, chiefly, it would seem, because last-set values are lost. On Tue, Feb 24, 2015 at 11:35 AM, Denis Gäbler <[email protected]> wrote: > > 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 > -- John Gilmore, Ashland, MA 01721 - USA ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
