Consulta SQL

Hola gente. Tengo un problemita con una consulta.
El tema viene a si: Tengo una base de datos de VFP, al cual me conecto con
SQLCONNECT(), y todas las operaciones sobre la base de datos la hago con
SQLEXEC().
Cuando realizo una consulta, y filtro por un valor (31446560501) me
devuelve un cursor vació, en cambio con otros valores, o la mayoría no.
La sentencia es:

lcIdPaciente = �31446560501�

cSQL = "Select d.dia_nombre, p.pac_te " +;
" From pacientes p " +;
" inner join diagnosticos d " +;
" on d.dia_id == p.pac_diagnostico " +;
" where p.pac_id == Val('" + lcIdPaciente + "')"

SELECT 0
SQLEXEC(cn, cSQL, "Consulta")
THISFORM.txtDiagnostico.value = ''
THISFORM.txtTelefono.value = ''
IF RECCOUNT() > 0 THEN
THISFORM.txtDiagnostico.value = dia_nombre
THISFORM.txtTelefono.value = pac_te
ENDIF
IF USED('Consulta')
SELECT Consulta
USE
ENDIF

Lo mas extraño que la misma consulta, fuera de la aplicación, en la
ventana de comandos, con la base de datos abierta, me devuelve el cursor
con el registro correcto.
En la ventana de comandos (sin SQLEXEC())�
Select d.dia_nombre, p.pac_te From pacientes p inner join diagnosticos d
on d.dia_id == p.pac_diagnostico where p.pac_id == Val('31446560501')



PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway