RE: Getting into pointers

[David FOXWELL <David.FOXWELL@xxxxxxxxx>]

Hi Scott,

> My question: Why did you use the BASED keyword?  Why bother
> using BASED and then %ALLOC?  Why not just do this?
>
> D MyDS            DS                  LIKEDS ( gMyOtherDS )
> DIM ( 100 )
> D MyPtr           S               *
>
>     MyPtr = %addr(MyDS);
>     PGM2(MyPtr);
>
> Why tell the OS to let you handle the allocation if you're
> just going to allocate the exact size of the structure?


I'm afraid the answer to those questions is lack of experience/ignorance.

I feel I'm getting the hang of it though.

I now have something like

D MyDS            DS                  BASED ( MyPtr )
D MyPtr           S               *

    PGM2(MyPtr);

I've got rid of the BASED keyword in PGM2. I've kept it in PGM1 so that MyDS will be usable when PGM2 returns. Is that reasonable?

Can you explain why did you do this :

     MyPtr = %addr(MyDS);

Before the call? In my case it's PGM2 that creates the DS and sends back the pointer to PGM1.

Thanks.