Re: Weird RNX0103 error with no apparent cause

[Rob Berendt <robertowenberendt@xxxxxxxxx>]

James,
Were these line numbers from the source, or the compiler listing?

Others,
DSPMSGD RANGE(RNX0103) MSGF(QSYS/QRNXMSG)

On Tue, Jan 17, 2023 at 1:36 PM 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.