**************************** * cmdSave.Click nresp = MESSAGEBOX ('It desires to keep the data ? ',1+32+256,'message of the system') DO CASE CASE nresp=1 && Si es OK TABLEUPDATE(.T.) CASE nresp=2 && Si es Cancel TABLEREVERT(.T.) ENDCASE Thisform.Refresh *****************************************Saludos,