Re: Weird RNX0103 error with no apparent cause

[Glenn Gundermann <glenn.gundermann@xxxxxxxxx>]

I would check a compile listing and see what code that line number
represents.
Then check the dump listing for the value of the variable in question.

Yours truly,

Glenn Gundermann
Email: glenn.gundermann@xxxxxxxxx
Cell: (416) 317-3144

I am riding 600 KM from Toronto to Montreal to raise money and awareness
for the Toronto People with AIDS Foundation.
2023 will be my 21st year participating in the Friends For Life Bike Rally.
It would be very much appreciated if you make a donation to my fundraising
page.
https://secure.pwatoronto.org/site/TR/BikeRally/General?px=1001945&pg=personal&fr_id=1080

---

On Tue, 17 Jan 2023 at 13:36, James H. H. Lampert via RPG400-L <
rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:

> We are seeing an RNX0103 error on a customer box, and the statement
> number given in the message details doesn't make any sense.
>
> The message says that the error point is at statement 9120, but all we
> have there is:
>
>     9116  /END-FREE
>     9117 C                   MOVEL     'ARRIVED'     CLPKEY
>     9118 C                   MOVE      xCompDate21z  CLPKEY
>     9119 C                   Z-ADD     0             CLPRETCD
>     9120  /FREE
>     9121       CLEAR CLPDATAR;
>     9122       WRITE WTCLOGR;
>     9123     ENDIF;
>     9124  /END-FREE
>
> Does anybody have any insights into this? About all this block of code
> tells me is that somebody else took the ill-conceived initiative of
> converting large blocks of code to /FREE format.
>
> --
> 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.