FoxPro/Visual FoxPro - VERIFICAR CONSULTA ¿?

HOLA

TENGO UN PROBLEMITA, COMO HACER PARA SABER SI UNA CONSULTA SQL ESTA BIEN ESTRUCTURADA ANTES DE EJECUTARLA

EJE;

SELECT * FROM TABLA WHERE

ESTO SERIA UN ERROR; ENTONCES ANTES EJECUTARLA DEBO SABER SI ESTA BIEN HECHA LA CONSULTA, COMO PODRIA SABER ESTO

GRACIAS

En VFP9 es facil con las opciones de background compiler.

Y EN EL 7 COMO SERIA?

GRACIAS

Estas características no estan disponible en la 7

Hice un programita que te puede servir. Aquí te lo envío :

* IsError.prg
* Ejecuta el comando pasado como parámetro
* y devuelve número de error ocurrido o cero si no huvo error

LPARA Comando

LOCAL OnError,NroError
m.OnError=ON('ERROR')
ON ERROR m.NroError=Informar(ERROR(),MESSAGE())
m.NroError=0
&Comando.
ON ERROR &OnError.
RETURN m.NroError

FUNCTION Informar
LPARA NroError,Mensaje
MESSAGEBOX('Error : ('+LTRI(STR(m.NroError,4))+') '+Mensaje)
RETURN NroError
ENDFUNC

*=============================================* (P) Carlos Cuyé

Ejemplo de IsError.prg
==================

IF IsError("SELECT * FROM TABLA WHERE ")=0
Tu código para cuando tu consulta se ejecutó correctamente
ELSE
Tu código para cuando tu consulta da error
ENDIF

Espero que te sirva. Suerte