FoxPro/Visual FoxPro - QUE PASA CON MI VISTA ?

 
Vista:

QUE PASA CON MI VISTA ?

Publicado por ERNESTO RODRIGUEZ (61 intervenciones) el 25/11/2003 01:50:18
Necesito mostrar los artículos de un determinado almacén.
Para lo cual tengo un FORM donde pido los datos del almacén y la
consulta con un Optiongroup de modo que si el usuario coloca
"Todos" crea una Vista con todos los productos en todos los Almacenes.

Y si escoje "Por Almacén" muestra SOLO los de ése almacén.
Y funciona muy bien pero ... cuando el usuario ejecuta la
consulta por "Todos" los almacenes primero y después llama al Form
de los datos de la consulta y quiere ver solo los de UN SOLO almacén,
VFP siempre muestra la primera consulta donde están todos los productos y todos los almacenes.
BOTON CLICK DEL FORM DE DATOS DE CONSULTA
IF ThisForm.Optiongroup1.VALUE=1
DO FORM fconartic.scx WITH consgen,codigo &&& Consulta General
THISFORM.RELEASE()
ELSE
DO FORM fconartic.scx WITH consgen,codigo &&& Otra Consulta THISFORM.RELEASE()
ENDIF
EN EL INIT DEL FORM DE CONSULTA.
PARAMETERS cGener,cAlmac
OPEN DATABASE inventario
IF cGener="YES"
CREATE SQL VIEW vprodu2 AS ;
SELECT codbode,codprod,descripcion,ubica,precioventa ;
FROM inventario!productos
IF NOT USED("vprodu2")
USE vprodu2 IN 0
ENDIF
SELECT vprodu2
=REQUERY()
ThisForm.List1.ROWSOURCETYPE=2
ThisForm.List1.ROWSOURCE="vprodu2"
THISFORM.REFRESH()
ELSE
CREATE SQL VIEW vprodu2 AS ;
SELECT codbode,codprod,descripcion,ubica,precioventa ;
FROM inventario!productos WHERE codbode=cAlmac
IF NOT USED.....ETC. ETC.
MUCHAS 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