Re: RPG IV Pointers

[Jim Langston <jlangston@xxxxxxxxxxxxxxxx>]

Okay, so, can I do this?

D MyPointer                         S                              *
D MyField                            S                        50
C                                              Eval     MyPointer = 
%Addr(MyField)

Is that equivalent to:

D MyPointer                         S                              *
D MyField                            S                        50   
Based(MyPointer)

Regards,

Jim Langston

Paul Tuohy wrote:

> Hi Rajeev,
>
> I think you are confusing the definition of a pointer with the use of a 
>pointer.
>
> A pointer is defined with a data type of '*'.
>
> A field (array, data structure or whatever) can then be defined. specifying 
>that
> the memory location is BASED on the pointer.
>
> D MyPointer                         S                              *
> D MyField                            S                        50
> Based(MyPointer)
>
> The program has to place a valid memory address in the pointer field
>
> C                                              Eval     MyPointer =
> %Addr(OtherField)
>
> HTH
>
> Paul Tuohy

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---