Re: program data structure pointer error

[Charles Wilt <charles.wilt@xxxxxxxxx>]

What was the change?

How is the program called?

The *PARMS in the PSDS (along with %parms()) require that the calling
program pass at least a minimal operational descriptor (aka op-desc).
They _should_ return -1, if op-desc is not there...but...

What's right before the psds in the code?

What's the PI or *ENTRY PLIST for the program look like?

Charles


On Wed, Oct 21, 2009 at 4:41 PM, Len Lester <lenl@xxxxxxxxxxxx> wrote:
> I was debugging a program and after making a change I got a very unusual
> error.  I was eventually able to get rid of the error but I don't
> understand it.
>
> If I comment out the program data structure it works.
> D*               sds
> D* jobusr               254    263
> D* parms            *parms
>
> but when I remove the asterisks a call to the program returns you to the
> menu with no error message.
> A breakpoint at the first instruction in the program isn't reached.
> D                sds
> D  jobusr               254    263
> D  parms            *parms
>
> The joblog shows...
> Pointer not set for location referenced.
> Pointer not set for location referenced.
> Pointer not set for location referenced.
> Exception recursion detected.
> Application error.  *N unmonitored by *N at statement *N, instruction
>  X'4000'.
>
> Changing the sequence of the specs has the same result
> D                sds
> D  parms            *parms
> D  jobusr               254    263
>
> Comment out just the located variable and it works
> D                sds
> D  parms            *parms
> D* jobusr               254    263
>
>
> --
> This is the RPG programming on the IBM i / System i (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.