Ayuda con este cursor

15/04/2005 - 20:41 por Andys | Informe spam
Amigos:
Estoy tratando de hacer un corsor de consulta de
articulos asi:

Pero que tenga los siguientes parametros.

lCodigo="2222" &&Que el codigo contega 2222
ldescripcion="*AB*" &&Que la descripcion contega AB
lCategoria="Buenas" &&Que la categoria se igual a buenas
lFecha="" && todas las fechas
lprovedor="" && Todos los provedores.


Lo que quiero es que el cursor me muestre de la tabla
articulos los registros que contengan estas
acaracteriticaso que y si las variables estan vacias me
muetre todos los articulos.

Por favor agradezco cualquiera ayuda.

Gracias.

Andys Bohorquez
Cartagena -Colombia

Preguntas similare

Leer las respuestas

#1 Esparta Palma
15/04/2005 - 21:12 | Informe spam
Podrias construir el SELECT-SQL:

lcSQLCodigo = IIF(EMPTY(lcCodigo), ".T.", "cCodigo $ lcCodigo")
lcSQLDescripcion = IIF(EMPTY(lcDescripcion),;
".T.", "cDescripcion $lcDescripcion")

lcSQLCategoria = IIF(EMPTY(lcCategoria),;
".T.", "cCategoria = lcCategoria")


ldSQLFecha = IIF(EMPTY(ldFecha),".T.","dFecha = ldFecha")

SELECT * FROM Productos ;
WHERE &lcSQLCodigo .AND. &lcSQLDescripcion ;
AND &lcSQLCategoria .AND. &lcSQLFecha ;
INTO CURSOR cProductos



ž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º

Espartaco Palma Martínez
SysOp http://www.PortalFox.com
México D.F.
MoBlogs!
http://weblogs.golemproject.com/esparta/ <- Tech
http://www.espartha.com/blog/ <- Personal
VFP Bookmarks http://del.icio.us/esparta/vfp

Andys wrote:
Mostrar la cita
#2 Andys
15/04/2005 - 23:02 | Informe spam
Espartaco,
Probe tu ejemplo de SELECT-SQL pero me da un error.
¡Falta algun operando!

Por favor te gradesco mucho que me ayudes con esto.

Gracias.

Andys Bohorquez
Cartagena -Colombia

Mostrar la cita
lcCodigo")
Mostrar la cita
$lcDescripcion")
Mostrar la cita
buenas
Mostrar la cita
me
Mostrar la cita
#3 Esparta Palma
15/04/2005 - 23:26 | Informe spam
Desconozco cual sea tu error, pero si funciona correctamente, lo he
hecho por años, deberías revisar que es lo que tienen tus variables (con
el Debugger), para así ver dónde está el error, a continuación un
ejemplo donde se vé que si ejecuta correctamente:

OPEN DATABASE(HOME(2)+"Data\TestData")
lcEmp_id = ""
lcCust_id ="AN"
lcSQLemp = IIF(EMPTY(lcEmp_id),".T.","ALLTRIM(Emp_id) = lcEmp_id")
lcSQLCust = IIF(EMPTY(lcCust_id),".T.","lcCust_id $ cust_id")
SELECT * FROM orders ;
WHERE &lcSQLemp .AND. &lcSQLCust ;
INTO CURSOR cOrders
BROW


ž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º€ø,žž,ø€º°`°º

Espartaco Palma Martínez
SysOp http://www.PortalFox.com
México D.F.
MoBlogs!
http://weblogs.golemproject.com/esparta/ <- Tech
http://www.espartha.com/blog/ <- Personal
VFP Bookmarks http://del.icio.us/esparta/vfp

Andys wrote:
Mostrar la cita
#4 Andys
16/04/2005 - 03:13 | Informe spam
Probe y salio este error en esta linea
SELECT * FROM Productos ; pero el ejemplo debe funcionar
buscare cual sera mi error y te comentare como me fue.

Gracias.

Andys Bohorquez
Cartagena-Colombia

Mostrar la cita
correctamente, lo he
Mostrar la cita
tus variables (con
Mostrar la cita
continuación un
Mostrar la cita
lcEmp_id")
Mostrar la cita
cust_id")
Mostrar la cita
ldFecha")
Mostrar la cita
#5 Andys
16/04/2005 - 20:28 | Informe spam
Te cuento que rediseñe nuevamente teniendo en cuenta el
ultimo ejemplo que me mostraste y todo salio bien
funciona perfecto.

Gracias.

Andys Bohorquez
Cartagena-Colombia


Mostrar la cita
lcCategoria")
Mostrar la cita
tabla
Mostrar la cita
Ads by Google
Search Busqueda sugerida