Just put
local array laTables[1]
instead of the private declaration.

It doesn't have much sense to declare variables private anyway and use l in front of the name.


>Here is another compile error I am trying to sort out. Moving a vfp6 app to vfp9.
>
>The error returned is " Unknown LATABLES - Undefined"
>
>The only occurences of LATABLES is in the following code:
>
>

 PRIVATE lnctr, latables
> CREATE CURSOR PackCo (flpack L, fctable C (10), fcdesc C (80))
> lcgroupcond = IIF( .NOT. EMPTY(ouser.fcgroup), ;
"UPPER(uttable.fcgroup)==UPPER(ouser.fcgroup)", ;
"UPPER(uttable.fcgroup)==UPPER('EVERYONE  ')")
> SELECT .F. AS flpack, fctable, PROPER(fcdesc)  ;
FROM uttable  ;
WHERE AT_C('APPDATA', fcdatabase) <> 0  ;
AND NOT UPPER(uttable.fcdesc) = "CUSTOM TABLE" ;
 AND &lcgroupcond  ;
INTO ARRAY latables ORDER BY fctable
> FOR lnctr = 1 TO ALEN(latables, 1)
>    APPEND BLANK
>    REPLACE flpack WITH latables(lnctr, 1), ;
fctable WITH latables(lnctr, 2), ;
fcdesc WITH i(latables(lnctr, 3))
> ENDFOR