Fito
HReadSeek(Tabla,Campo,Objeto_ventana)IF HFound(Tabla) THEN .... avisa de que existeELSE ... no existeEND-IF