FoxPro/Visual FoxPro - AS/400

Use el comando SQLCONNECT y el SQLEXEC para obtener información de un archivo en un AS/400. Así..

Store Sqlconnect('QGPL', '') to Conexion QGPL es el nombre del ODBC
IF Conexion <= 0
MESSAGEBOX('No se puede conectar', 16, 'Error de conexión')
ELSE
= sqlexec(Conexion, "select * from PLDAT.Cvlregl2 where Cvlregl2.QL = " + ls_cedula, "MiCursor")
ls_fec_Nac=MiCursor.qlacdx
ENDIF

En la penúltima línea el programa me dice que no se encuentra el alias "MiCursor" ¿Qué puedo estar haciendo mal?

hola

cambia la linea del sqlexec por la que te corregi y veras que funciona

= sqlexec(Conexion, "select * from PLDAT.Cvlregl2 where Cvlregl2.QL = ?ls_cedula", "MiCursor")

saludos

israel