Re: Compilation Error on CLEAR

[dlclark@xxxxxxxxxxxxxxxx]

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 07/13/2017 03:38:51 
PM:
> I am getting a compilation error on the following. Not sure what needs 
to
> be corrected. here is the relevant code:
>
> D MCH_TEM             DS                 QUALIFIED TEMPLATE
> D MCHEffDate                       8S 0
> D MCHThruDate                    8S 0
> D MChoice                             1
>
> D XRefMCH                DS                 QUALIFIED DIM(999)
> D ClientPlan                         19
> D MCHWnd                                        LIKEDS(MCH_TEM) DIM(99)
>
>
> 1709.00 Clear *ALL XRefMCH(XC).MCHWnd ;
>
> *RNF5393 20 170900 Factor 2 of a CLEAR or RESET operation is not valid.
>
> If I remove *ALL, it compiles. Any help is greatly appreciated.


        *ALL is not valid for arrays nor for array data structures (DIM 
keyword).  *ALL is for tables or for multiple-occurrence data structures 
(OCCURS keyword),


Sincerely,

Dave Clark