Can anyone tell me why I get error 1814 - Queries of this type are not supported on line 10 (and I assume also on line 15). Is there a good workaround? I need to overright records on table A if records with the same manu_code are on table B. Both tables have the same name. Table A is the current file used in the application, table B is from a backup table.

If File(Thisform.copydir+'distributors.dbf') .and. File(Thisform.copydir+'dcatalogs.dbf')
olddistributors = appendfromdirectory+'distributors.dbf'
fromdir = appendfromdirectory+'dcatalogs.dbf'
USE dcatalogs EXCLUSIVE
USE distributors EXCLUSIVE
IF FILE(olddistributors) .and. FILE(fromdir)
DELETE FROM dcatalogs WHERE manu_code in ;
(select manu_code FROM distributors WHERE manu_code in ;
(select manu_code FROM &olddistributors))
INSERT INTO dcatalogs (manu_code,itemdesc,style) ;
SELECT manu_code,itemdesc,style FROM &fromdir ;
WHERE manu_code in ;
(select manu_code FROM distributors WHERE manu_code in ;
(select manu_code FROM &olddistributors))
ENDIF
ENDIF

Thanks,

Randy