Hi Gnana,

Sorry, i made a typo. Replace USE (aTableList[nLoop,1]) EXCLUSIVE with USE (????????.objectname) EXCLUSIVE.

Gavin...

>Hi Gnana,
>
> You could try something like this ( with appropriate error checking of course ).
>
>

>CLOSE DATA ALL
>
>USE ????????.dbc
>
>SCAN FOR UPPER(objecttype) = "TABLE"
>    SELECT 0
>    USE (aTableList[nLoop,1]) EXCLUSIVE
>    PACK
>    USE
>ENDSCAN
>
>
>Regards,
>   Gavin...
>
>

>
>>If I have to iterate through all the tables in the database and pack them all, is there a simple command to do it? If not, what command would I use to obtain the list of tables in a database, so I could iterate them.
>>
>>Thanx
>>Gnana