ON ERROR WAIT WINDOW 'MULTIPLE SESSIONS' TIMEOUT 1 
USE EXCLUSIVE datapath ALIAS  ;
    datapath
ON ERROR DO ERRORROUTINE WITH ERROR(),MESSAGE(),PROGRAM(),LINENO()
IF USED('datapath')
ELSE