lnError = 0 lcOldError = ON("ERROR") ON ERROR lnError = ERROR() TABLEUPDATE() IF lnError != 0 DO CASE CASE lnError = ... WAIT WINDOW "Duplicate value found" CASE lnError = ... WAIT WINDOW "Could not update record" OTHERWISE WAIT WINDOW "Unexpected error of type " + ALLTRIM(STR(lnError)) + " detected" ENDcase ENDif ON ERROR &lcOldError