Re: Odd/Even packed numbers.

["Leif Svalgaard" <leif@xxxxxxxx>]

Barbara, I'm no RPG-programmer (it shows), so, hey, I claim
ignorance. My guess is that zoned variables don't have and odd/even
problem.

----- Original Message -----
From: Barbara Morris <bmorris@ca.ibm.com>
To: <midrange-l@midrange.com>
Sent: Thursday, November 28, 2002 5:32 PM
Subject: Re: Odd/Even packed numbers.


> Leif Svalgaard wrote:
> >
> > From: Leif Svalgaard <leif=vPETv0UHqg8@public.gmane.org>
> >
> > > From: Booth Martin <Booth=zPOEG7LBV2lWk0Htik3J/w@public.gmane.org>
> > > >  Leif, would you try one more thing since you are already there,
please?
> > > > What happens if you define it as 14S 0 and 15S 0?  Does packed vs.
signed
> > > > make a difference?
> > > >
> >
> > I should be more precise. I did this with an MI-program where you cannot
> > specify signed/unsigned for packed data. It is possible that in RPG and
> > COBOL, extra code is generate to invert the sign if the result turned
> > out to be negative and you specified unsigned data. This should
> > add to the time in both cases (even and odd), but there should still
> > be a difference. Somebody else might try this. Hey it only takes
> > a minute to write the program.
> >
>
> Leif, 14S 0 and "signed" mean "zoned", not "signed packed".  ZND(14,0)
> in MI.  (Go figure - this use of the term "signed" has always puzzled me
> since the first time I encountered it in DDS.)
>