chely22
05 de Febrero del 2004

ESTIMADOS AMIGOS DEL ZORRO ME PODRIAN AYUDAR A CORREGIR LO SIGUIENTE

TENGO DOS TABLAS
1. ALMACENES
2.ASIGNA

LOS DATOS A ELEGIR EN UN COMBOBOX LOS TOMO DE LA TABLA ALMACENES.

AL ELEGIR UN ELEMENTO DEL COMBOBOX, LO BUSCO EN LA TABLA ASIGNA Y LUEGO ALMACENO LOS DATOS QUE CUMPLAN LA CONDICION EN OTRA TABLA DENOMINADA ASI.DBF

EN UN GRID QUIERO QUE ME APARESCAN LOS DATOS DE LA TABLA ASI.DBF Y TENGO EL SIGUIENTE CODIGO EN EL PROCEDIMIENTO INTERACTIVE CHANGE

alma=thisform.combo1.value
do case
case alma = "PUEBLA"
select * from asigna where alm = 1 into table c:asi.dbf
case alma = "LIBRES"
select * from asigna where alm = 2 into table c:asi.dbf
case alma = "TEHUACAN"
select * from asigna where alm = 3 into table c:asi.dbf
case alma = "IZUCAR DE MATAMOROS"
select * from asigna where alm = 4 into table c:asi.dbf
case alma = "CHIGNAHUAPAN"
select * from asigna where alm = 5 into table c:asi.dbf
case alma = "TEPEACA"
select * from asigna where alm = 6 into table c:asi.dbf
thisform.refresh()
endcase

AL INICIALIZARSE EL FORMULARIO ME MUESTRA LOS DATOS DE LA TABLA ASI.DBF PERO AL ELEGIR OTRO ELEMENTO DEL COMBO SE BORRA TODO

ME PODRIAN AYUDAR A DECIFRAR MI ERROR
GRACIAS A TODOS SALUDOS

Kop.
05 de Febrero del 2004

Hola
el thisform.refresh() lo tienes dentro de la ultima condicion
CASE.. dejalo fuera del CASE y refresca la grilla tambien. (por si las moscas) .

Do Case
..
....
.....
.......
EndCase
thisform.grid1.recordsource = "asi"
thisform.grid1.refresh
thisform.refresh()


Kop.