I'm not saying that I agree that GETMAIN should initialize the storage.
I am just saying that the way storage is handled has changed in z/OS
1.10 and it bit us in vendor code. As I said earlier, programming 101
says that you should initialize any area you plan on using so, if the
program was coded correctly, changes in GETMAIN wouldn't have caused
this problem.
That being said, can you guarantee that all of your old assembler
programs initialize their working storage? 


Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Walt Farrell
Sent: Friday, November 21, 2008 1:28 PM
To: [email protected]
Subject: Re: z/OS upgrade

On Fri, 21 Nov 2008 12:46:14 -0500, Veilleux, Jon L
<[EMAIL PROTECTED]>
wrote:

>Wayne, I ran a test on both z/OS 1.9 and z/OS 1.10 using the following
>code
and on 1.9 the area was initialized to zeroes  and on 1.10 it wasn't:
>
>         L     R6,=F'1000'
>         GETMAIN R,LV=(6)
>         LTR   R15,R15
>         BNZ   GETERR
>         LR    R4,R1  * PUT IN WORKREG
>         LA    R5,100(R4)
>********************* BEGIN SNAP ROUTINE
>         OPEN  (SNAP,OUTPUT)
>         SNAP  DCB=SNAP,PDATA=REGS,ALL,STORAGE=((R4),(R5))

There is no a guarantee that the storage obtained by that particular
GETMAIN will be cleared to zero, Jon, and there has never been one.  It
is entirely dependent on storage layout and what has run previously in
that task.  The books document the cases where GETMAIN and STORAGE
guarantee the storage is zeroed.  In all other cases there is no
guarantee, and if the storage in some other case ends up zeroed you're
just lucky (or unlucky, depending on your viewpoint). 

--
  Walt

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html




This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to