Thanks fer the hint Sergey,

How about on error this simple?
llerror =.f.
set database to
copy file (xdbcfile) to (destfile)
use (destfile) exclusive
if (llerror)
keyboard '{TAB + ENTER}' && to break the link and free the table
endif

set database to mydatabase