Steve,

There is a different way of doing that.

USE Data\MyData.dbc
DELETE FOR ObjectType='Relation'
USE IN MyData

You've just deleted all relations in the dbc file. Then, when you want to add them back you use the ALTER TABLE blah blah blah WITH blah blah blah ADD FOREIGN KEY TAG blah etc.

I don't know anything about that code to add back the relations because I always get it from the prg created with the GENDBC.prg.

I've found it useful to delete all persistent relations and referential integrity also prior to performing some maintenance functions and then I add them back after the maintenance.

Wally Noll