Re: Weird decimal data error

Not as such no.

An error like this on the CHAIN would normally occur during the "scattering" to use your term. i.e. as the fields were bing unpacked from the I/O buffer into the individual fields.

If you are allowed to, try it in debug on the original problem box and stop through the individual field moves (this implies of course that you have NOT specified NODebugIO). That at least would identify the field in question.

If indeed none of the fields are populated that would suggest that the first field is the one in error but ...


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On May 21, 2019, at 7:06 PM, James H. H. Lampert <jamesl@xxxxxxxxxxxxxxxxx> wrote:

I'm looking at a program dump I can't explain, on a customer box.

The program in question threw a decimal data error on a CHAIN statement. It is traditional RPG scatter-gather I/O; no target structure is specified on the statement. The joblog and the dump itself agree on which statement it was. The record it was trying to chain to exists. It matches what the dump shows in both the key and the input buffer. None of the fields of the record show any decimal data errors.

And here's the kicker: in the dump, the record shows in the buffer, but *not* in the fields!

Just a few minutes ago, connected to the same box, running the same program, in the same environment, I was able to reproduce the circumstances under which the error occurred for the end-user, but not the error itself: for me, it worked just fine.

The box is on V7R3M0. The program was created on that box, using the V3R7M0 ILE RPG compiler.

Has anybody ever heard of anything like this happening?

--
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@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com