>hey everyone,
>i have a problem that is causing me fits. here is the scenario:
>
>i have 2 tables in use in the work area.
>
>i want to close both tables at the same time.
>
>here is a rough breakdown of the code causing me trouble.
>
> use alias1
> use alias2
> do while not something
> x = 0
> select alias1;
> insert into alias1;
> fields;
> values alias2->fields
> x = x + 1
> delete record(x) in alias2
> use
> use alias1
> use alias2
> enddo
>
>I want to move on to the next field in alias two to insert into alias one.
>The problem is, I think, that it close all the work area and not just the work area for alias1 and alias2.
>
>Any suggestions would be appreciate. Thanks

use alias2
scan while not something
    insert into alias1 ;
       (fieldlist) values (valuelist)
     delete
endscan

Cetin