Re: Unreferenced variables not showing up in debug

[Charles Wilt <charles.wilt@xxxxxxxxx>]

WAD...
"With the default OPTION(*UNREF), after a READ to a file, you might want to
look at a few fields to see what record you got. If you didn't use a field
in the module, the compiler wouldn't load it, so it would have blanks or
zeros. This can be extremely confusing."

https://www.ibm.com/developerworks/community/blogs/b542d3ac-0785-4b6f-8e53-f72051460822/entry/are_you_using_option_nounref_if_so_good_if_not_read_on?lang=en

Charles

On Wed, Jun 17, 2015 at 11:33 AM, Dan <dan27649@xxxxxxxxx> wrote:

> With an RPGLE program compiled with OPTION(*UNREF), I would expect that
> input fields defined but not used in the program (i.e. *RNF7031: The name
> or indicator is not referenced) would still be available to view the values
> in debug.  FWIW, this is a very simple, 20 line program, no subprocs, and
> we are on v7r1.
>
> When I use the EVAL command on the unreferenced fields in debug, it
> displays a blank result.  For example:
>     FIELDA = '      '
> ... even though I know the value in the file is 'ABC123'.
>
> My workaround was to CLEAR each of the unreferenced fields inside of an IF
> group that would never test true.  Now, debug shows the values correctly.
>
> I thought I remembered there was an option to include these unreferenced
> fields so their values could be viewed in debug and/or a dump.  (Maybe it
> was just the latter?)  And the *UNREF option seemed to fit the bill, but
> apparently not.
>
> From the RPG reference:  "If *UNREF is specified, all variables are
> generated into the module."  I guess "generated into the module" is subject
> to interpretation.
>
> What am I missing?
>
> - Dan
> --
> 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: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.