Filtro Sle en Power builder
Estaba creando un Filtro Para mi Reporte de Clientes
Y Pondré mi Cpdigo a Continuación, Pero les Explico primero mi problema, que una vez Creo todo como se explica me corre super bien pero ... En el Sle cuando Escribo la primera letra me Filtra a los que tengan dicha primera letra, pero cuando escribo la segunda letra, me Genera Error de Registro no Existe ("Ese msgbox lo puse io para que salga cuando no hay registros")
Pero dicho registro si Existe >. <
Supongamos que tengo mis cliente Luis Ramírez y León Valenzuela... Yo Ingreso Primero L y me muestra ambos registros pero cuando después ingreso la "u" Quedándome "Lu", Debería mostrarme a Luis Ramírez solo, ¿Pero me bota Registro no Existe a que se puede deber?
string ls_buscar
integer li_buscar
if w_8productos.dw_1prod.rowcount( )<>0 then //Si el datawindow cliente contiene algun cliente
w_8productos.dw_1prod.setfilter("") //filtramos todos los registros del datawindow cliente
w_8productos.dw_1prod.filter()
//Hacemos una comparación del campo "nombres_cliente" del datawindow con las letras introducidas en el sle_filpro.
ls_buscar="Producto like '"+upper(sle_filpro.text)+"%'"
//Buscamos los registros que coincidan con las letras introducidas en "sle_filpro"
li_buscar=w_8productos.dw_1prod.find(ls_buscar,1,w_8productos.dw_1prod.rowcount())
if li_buscar=0 then
messagebox("Verifique","¡Registro no Existe!",Exclamation!)
sle_filpro.setfocus( )
sle_filpro.text = ""
return
else
w_8productos.dw_1prod.scrolltorow(li_buscar) //Mostramos los registros coincidentes
w_8productos.dw_1prod.setfilter(ls_buscar) //Filtramos los registros que coinciden
w_8productos.dw_1prod.filter()
w_8productos.dw_1prod.setsort("Producto a") //Ordenamos de forma ascendente
w_8productos.dw_1prod.sort( )
end if
else //Si no contiene desplegamos el siguiente mensaje
messagebox("Verifique","¡No Existen Registros!",Information!)
end if
Y Pondré mi Cpdigo a Continuación, Pero les Explico primero mi problema, que una vez Creo todo como se explica me corre super bien pero ... En el Sle cuando Escribo la primera letra me Filtra a los que tengan dicha primera letra, pero cuando escribo la segunda letra, me Genera Error de Registro no Existe ("Ese msgbox lo puse io para que salga cuando no hay registros")
Pero dicho registro si Existe >. <
Supongamos que tengo mis cliente Luis Ramírez y León Valenzuela... Yo Ingreso Primero L y me muestra ambos registros pero cuando después ingreso la "u" Quedándome "Lu", Debería mostrarme a Luis Ramírez solo, ¿Pero me bota Registro no Existe a que se puede deber?
string ls_buscar
integer li_buscar
if w_8productos.dw_1prod.rowcount( )<>0 then //Si el datawindow cliente contiene algun cliente
w_8productos.dw_1prod.setfilter("") //filtramos todos los registros del datawindow cliente
w_8productos.dw_1prod.filter()
//Hacemos una comparación del campo "nombres_cliente" del datawindow con las letras introducidas en el sle_filpro.
ls_buscar="Producto like '"+upper(sle_filpro.text)+"%'"
//Buscamos los registros que coincidan con las letras introducidas en "sle_filpro"
li_buscar=w_8productos.dw_1prod.find(ls_buscar,1,w_8productos.dw_1prod.rowcount())
if li_buscar=0 then
messagebox("Verifique","¡Registro no Existe!",Exclamation!)
sle_filpro.setfocus( )
sle_filpro.text = ""
return
else
w_8productos.dw_1prod.scrolltorow(li_buscar) //Mostramos los registros coincidentes
w_8productos.dw_1prod.setfilter(ls_buscar) //Filtramos los registros que coinciden
w_8productos.dw_1prod.filter()
w_8productos.dw_1prod.setsort("Producto a") //Ordenamos de forma ascendente
w_8productos.dw_1prod.sort( )
end if
else //Si no contiene desplegamos el siguiente mensaje
messagebox("Verifique","¡No Existen Registros!",Information!)
end if
2 Respuestas
Respuesta
1
Respuesta de Nestor Tirado Díaz
1