Re: Replacing *ENTRY PLIST

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

Charles,

It doesn't know that *N is the same as 'myprogram'.  The names have to 
match in order for it to know they are referring to the same thing.

-SK


On 9/4/2019 12:26 PM, Charles Wilt wrote:
> Just ran across some code...
>
> // in a MYINC(MYPGM)
> dcl-pr myprogram extpgm('MYPGM');
>    parm1  char(10) const;
> end-pr;
>
>
>
> //in MYPGM.SQLRPGLE
> /copy MYINC,MYPGM
> dcl-pi *n;
>    parm1 char(10);
> end-pi
>
> I was surprised it compiled successfully...no errors/warnings
>
> When I changed the PI to
> /copy MYINC,MYPGM
> dcl-pi myprogram;
>    parm1 char(10);
> end-pi
>
> Then I got the SEV 20 errors about the missing CONST I expected to see.
>
> Can somebody refresh my brain as to why the compiler didn't throw the
> expected errors with the unnamed PI?
>
> Thanks!
> Charles