FoxPro/Visual FoxPro - HACER INFORME BASE UNA CONSULTA

 
Vista:

HACER INFORME BASE UNA CONSULTA

Publicado por Luthien (2 intervenciones) el 01/12/2005 16:06:52
HOLA BUENAS TARDES,
A VER SI ALGUIEN DE USTEDES CONSIGUE SACARME DEL APURO.
TENGO UN FORMULARIO CON DOS COMBOS QUE RECOGEN EL NOMBRE DEL PRODUCTO A BUSCAR. LOS DATOS LOS RECOGEN BIEN Y LA BUSQUEDA SE HACE OK TMB. PERO NO SE COMO PASAR ESTOS DATOS A UN INFORME.
EL CODIGO QUE TENGO EN EL BOTON PARA EJECUTAR EL INFORME ES EL SIGUIENTE:

Select idproducte From productes WHERE productes.idproducte between thisform.combo2.displayvalue AND thisform.combo1.displayvalue INTO CURSOR productess
SELECT productess
report Form "c:\mpressup\informes\lproductes.frx" preview

PERO SIEMPRE ME SACA TODOS LOS REGISTROS. ALGUIEN PODRIA DECIRME COMO HACERLO?

UN SALUDO Y GRACIAS DE ANTEMANO.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:HACER INFORME BASE UNA CONSULTA

Publicado por gmo (1 intervención) el 10/12/2005 20:31:33
mira yo tengo un ejemplo
lo que tienes que hacer es lo siguiente:

una vez capturado el valor de un combo haces esto

por ejmplo:

use "tu tabla" in 0 order "tu index" alias "tu tabla"
select "tu tabla"
op=valor combo1

if op=0
messagebox('ingrese un numero por favor',0+64,'error de ingreso')
else
set filter to "tu index"=op
go top
do while !eof()
lo que quieres que muestre tu report
report from "nombre reporte" etc.........
select "tu tabla"
skip
enddo
use in select(tu tabla) *******////// sierra tabla
thisform.refresh


pd = funciona con visual foxpro6 y si quieres un ejemplo enviame un mail saludos
gmo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar