AYUDA CON UN GRID
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
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
