Re: QPROCT and QPRODT

Below is the info for the ADDN instruction from the V6R1 Information Centre:

Resultant Conditions:

/snip

Positive - The algebraic value of the numeric scalar sum operand is
positive.

Negative - The algebraic value of the numeric scalar sum operand is
negative.

Zero - The algebraic value of the numeric scalar sum operand is zero.

Unordered - The value assigned a floating-point sum operand is NaN.

/end-snip

I can't see the subtle difference you allude to - but that means very little
:-)

Richard


-----Original Message-----
From: mi400-bounces@xxxxxxxxxxxx [mailto:mi400-bounces@xxxxxxxxxxxx] On
Behalf Of Dennis Lovelady
Sent: 30 April 2010 16:06
To: 'MI Programming on the AS400 / iSeries'
Subject: Re: [MI400] QPROCT and QPRODT

You're probably missing nothing at all! I was just surprised that the
QPRCRTPG API doesn't flag /MXD, /HI, /NOR, /TR or /ZC as an invalid
branch/indicator keyword for the ADDN(IS) statement - that's all. I was
expecting a more rigorous syntax check from QPRCRTPG.

Based on the documentation provided by IBM, the valid branch/indicator
tests
for ADDN are POS, NEG, ZER and UNOR - correct?

Ah, I see where you're coming from now. I did not check the docs AFA what
indics are available from ADDN, or might have followed. I am inclined to
agree with you, but now I wonder: is the documentation faulty or is the
fault with QPRCRTPG? Or maybe neither: does the doc say that those are the
valid flags after ADDN, or does it say that those are the ones that may be
affected? (See the subtle difference?)

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
I bought some powdered water, but I don't know what to add to it.





_______________________________________________
This is the MI Programming on the AS400 / iSeries (MI400) mailing list
To post a message email: MI400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/mi400
or email: MI400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mi400.