i would make a assign method for the property say exevalue

and suppose
exevalue = sqlexec(han,'select .....') && returns -1

in the exevalue_assign assign method something like

aerror(odbc_error)

if vNewval = -1 and odbc_error(1) = 14 and number_or_retry = .t.
if make_connection() && make connection as earlier timed out or what ever
number_or_retry = .t. && do it gain if same error
endif
retry && so that the statement would execute again
endif

Maby not clear could u also give good pointers ?