Re: Passing a pointer-based array as a parameter

Should I change my focus to prototypes?

The RPG ref on an *ENTRY PARM says "Fields or data structures defined with
the keywords BASED, IMPORT, or EXPORT" are not allowed.

Thanks,
Dan

On 1/30/06, Dan <dan27649@xxxxxxxxx> wrote:
>
> I searched, but it's all greek to me.  I'm not even sure I've got the
> terminology correct, so feel free to correct where needed.  And, by all
> means, provide links as appropriate.
>
> I've got an ILE RPG program (PGMA) that will call an ILE RPG service
> program (SRVPGMB).  I would like SRVPGMB to return a dynamically allocated
> array back to PGMA.  In real life, the array could end up having 10 elements
> or 20000 elements.
>
> Unfortunately, the compiler doesn't think much of passing a dynamically
> allocated array as a parameter, issuing RNF5029 "Result-Field entry of PARM
> operation in *ENTRY PLIST is not valid; specification is ignored."  I tried
> to pass FLa, defined below:
>
>    d FL@             s               *
>    d                 ds                  Based( FL@ )
>    d FLa                                 Dim( 32766 )
>    d  Fld1                         10    Overlay( FLa : *Next )
>    d  Fld2                         10    Overlay( FLa : *Next )
>    d  Fld3                           3i 0 Overlay( FLa : *Next )
>
> Is there a way to accomplish this?
>
> TIA,
> Dan
>