Re: Weird RNX0103 error with no apparent cause

I too am curious as to what the dump showed in xRecordID21.
Like, did it get ill trying to convert spaces or characters to numeric?

On Wed, Jan 18, 2023 at 12:10 PM James H. H. Lampert via RPG400-L <
rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:

Not wanting to actually touch the source member, I recompiled with
"*SRCSTMT" as a compiler option in the command.

The exception showed up today, and this time, the statement number was
21 lines down from what it was telling me yesterday (I'm guessing that
somebody changed an include member).

Now, it's a statement that can actually throw the exception, and yet it
still puzzles me.

We have a variable, EnterpriseID, defined thusly:

EnterpriseID s 9 0

and then the exception is thrown here

monitor;
EnterpriseID = %dec(xRecordID21:9:0);
on-error;
endmon;

The fact that it's /FREE code tells me that it's not mine, and the
monitor/on-error/endmon certainly explains why the exception is not
crashing the program.

It's looking more and more like it's completely harmless; nobody catches
exceptions and ignores them unless they're harmless.

xRecordId21 is a 21-character field in a data structure. So what's
throwing the exception? the call to %dec(), or the assignment of the
result to EnterpriseID?

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.