Re: Simple RPG question (because the docs are worthless) -- RPG400-L

Well, thanks for info everybody!
Luckily there's still an enthousiastic RPG community, so many responses
after 3 minutes.

On Tue, Feb 20, 2018 at 3:31 PM, Duane Scott <dscott@xxxxxxxxxxx> wrote:

Thanks. And it probably would have if I had actually gone to your
reference.

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
broehmer@xxxxxxxxxxxxxxx
Sent: Tuesday, February 20, 2018 9:29 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <
rpg400-l@xxxxxxxxxxxx>
Subject: RE: Simple RPG question (because the docs are worthless)

Sorry. Just thought the "EVAL M" search would have been enough for the
reference. :-)

res = (x / y) * p + (q / r / s)

and res has 17 decimal places, then if one of the temporary values in that
expression needed to have 75 digits and 20 decimal places (55 integer
places), the compiler will make the temporary 63 digits and 17 decimal
places (46 integer places).

From: Duane Scott <dscott@xxxxxxxxxxx>
To: "RPG programming on the IBM i (AS/400 and iSeries)"
<rpg400-l@xxxxxxxxxxxx>
Date: 02/20/2018 08:26 AM
Subject: RE: Simple RPG question (because the docs are worthless)
Sent by: "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>

Finish? Don't leave us hanging, please?

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
broehmer@xxxxxxxxxxxxxxx
Sent: Tuesday, February 20, 2018 9:22 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <
rpg400-l@xxxxxxxxxxxx>
Subject: Re: Simple RPG question (because the docs are worthless)

RPG CAFE on DeveloperWorks can sometimes be really helpful. This is from
Barbara in 2012.
Just search for "Eval M".

The M extender tells the compiler to reduce the chance of overflow for a
sub-expression by maximizing the number of integer places in the compiler
temporaries. So if a temporary value might need to have 75 digits and 20
decimal places (55 integer places), the compiler would make it 63 digits
and 8 decimal places (keeping 55 integer places).

The R extender tells the compiler to reduce the chance of loss of accuracy
for a sub-expression by not letting the number of decimal places in the
compiler temporaries go below the number of decimal places in the result.
So if you have

res = (x / y) * p + (q / r / s)

From: john erps <jacobus.erps@xxxxxxxxx>
To: "RPG programming on the IBM i (AS/400 and iSeries)"
<rpg400-l@xxxxxxxxxxxx>
Date: 02/20/2018 08:10 AM
Subject: Simple RPG question (because the docs are worthless)
Sent by: "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>

Hi,

What does the "operation extender" M means I know R and H, but not M.

I tried to look into the RPG docs, at opcode "eval" which seems to me a
logical place to document this, but no. The extenders are mentioned but i
can't find the doc for M (or R or H). When i click "precision rules" i get
to see doc about "operation extender" R.

Man how bad is the RPG documentation on IBM's site. It's terrible.
How on earth is somebody not already having 20+ years of experience in RPG
ever going to find some info. A simple function like "half adjust" is
buried as some "operation extender" (instead of a normal half-adjust
function or BIF or whatever), and the doc on this "operation extender" H is
almost impossible to find.

Pff, the only thing worse would be no doc at all. Terrible.

Sorry for the rant...
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

"CONFIDENTIALITY NOTICE: This e-mail transmission (and/or the attachments
accompanying it) contain confidential information belonging to the sender.
The information is intended only for the use of the intended recipient.
If you are not the intended recipient, you are hereby notified that any
disclosure, copying, distribution or the taking of any action in reliance
on the contents of the information is strictly prohibited. Any
unauthorized interception of this transmission is illegal under the law.
If you have received this transmission in error, please promptly notify
the sender by reply e-mail, and then destroy all copies of the
transmission."
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD
CONFIDENTIALITY NOTICE: This electronic message transmission is intended
only for the person or entity to which it is addressed and may contain
information that is privileged, confidential or otherwise protected from
disclosure. If you have received this transmission, but are not the
intended recipient, you are hereby notified that any disclosure, copying,
distribution or use of the contents of this information is strictly
prohibited. If you have received this e-mail in error, please contact NALC
Health Benefit Plan at 703-729-4677 and delete and destroy the original
message and all copies.
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

"CONFIDENTIALITY NOTICE: This e-mail transmission (and/or the attachments
accompanying it) contain confidential information belonging to the sender.
The information is intended only for the use of the intended recipient. If
you are not the intended recipient, you are hereby notified that any
disclosure, copying, distribution or the taking of any action in reliance
on the contents of the information is strictly prohibited. Any
unauthorized interception of this transmission is illegal under the law.
If you have received this transmission in error, please promptly notify the
sender by reply e-mail, and then destroy all copies of the transmission."
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD