LOCAL lcOldOnError * Save the original error handler lcOldOnError = ON("ERROR") * Issue ON ERROR with the name of a procedure ON ERROR DO errhandler WITH ERROR(), MESSAGE() * code to which the error handling routine applies USE TableThatHasTheSameStructure APPEND FROM TableThatHasAProblem * Reset the original error handler ON ERROR &lcOldOnError PROCEDURE errhandler LOCAL aErrInfo[1] AERROR(aErrInfo) RETURN && Ignore the error????? * It would probably be best to make sure * that it was a function not found that * caused the error, though. *DO CASE * CASE aErrInfo[1] = 1 && File Does Not Exist * * display an appropriate message * * and take some action to fix the problem. * OTHERWISE * * display a generic message, maybe * * send high priority mail to an administrator *ENDPROC>hi mike