Hello all!

can anyone advise if there is a way ( and how to do it ) to return focus to a field if an error occurs and this message box is displayed??

(in field.VALID)
MESSAGEBOX(" # NOT FOUND!",21,"ERROR!!")

*************
I have tried a program call on error :

******
cMessageTitle = 'ENTRY ERROR!!!!'
cMessageText = 'Record not found. Would you like to search again?'
nDialogType = 5 + 16

nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)

DO CASE
CASE nAnswer = 2
cancel
CASE nAnswer = 4
form.txtField.setfocus()
ENDCASE

but it doesnt work if either...

any help will be appreciated!!

TIA, Dan

*******