Ayuda en busqueda de una palabra en un campo

[acmc]

Hola Foxeros,

Necesito hacer una busqueda en mi tabla de productos con una instrucción SQL, que el usuario pueda teclear el texto a buscar y me muestre solo aquellos que contengan el texto tecleado en la descripción y que tengan existencia, estuve haciendo pruebas pero no me da el resultado que necesito y no se porque, de hecho haciendo la busqueda del texto no me jala todos los que deberían de ser.

La consulta es la siguiente..

SELECT codigo,producto FROM produc WHERE producto LIKE '%'+'PELO'+'%'

En las imagenes anexas se puede ver el reporte de existencias que genero en excel y ahí aparece el código 0016799  con la descripción CUBRE PELO LAVABLE y en la otra imagen esta el resultado de la consulta donde aparecen otros 3 articulos pero no el que estoy buscando.

Utilizo tablas DBF alguna sugerencia??

Salu2!!

[Carlos X. Montes]

Intenta asi: SELECT codigo,producto FROM produc WHERE 'PELO' $ producto 

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/706aae8f-690d-4a15-9568-7ded3fcdf6e6n%40googlegroups.com.

[acmc]

Gracias... ya vi cual era el problema..  estaba jalando datos de la base de datos de mi Pc en vez del servidor  :( Upsss 

Caso resuelto!!!   

Salu2

[roberto martinez andrade]

Hola aca hay un código que utilizo en mis aplicaciones y que busca segmentos de cadenas dentro de un campo llamado RAZSOC de la tabla TB_MAECLIE. eSPERO TE SIRVA

SELECT codigo,;
rutper,;
digper,;
tipcli,;
razsoc,;
dirper,;
ciudad,;
fonper,;
giro;
FROM tb_maecli WHERE estado="1";
AND ALLTRIM(razsoc)) like "%"+ALLTRIM(UPPER(xcadena))+"%";
ORDER BY codigo;
INTO CURSOR curgrid

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/bc3a91f9-7b07-46b7-b7da-a123bd0fec1en%40googlegroups.com.

[jose daniel camilo ruiz]

Aqui una porcion de codigo que busca por porcion de palabra. hasta 10 porciones diferentes. cada porcion puedes darle a la barra espacioadora CCHR(32), 

SELECT (Thisform.TxTVentaName.Value)
DELETE ALL
DIMENSION Wtm[10]
STORE  SPACE(0) TO Wtm,WWChr
AA = 1

IF !EMPTY(Thisform.PageframeMenu.PageArticulos.TxTBusqueda.Value)  
   SqlStr = "Select Articulo,Detalle,Existencia From Articulo Where Detalle like ?Wtm[1] "
   FOR a = 1 TO LEN(ALLTRIM(Thisform.PageframeMenu.PageArticulos.TxTBusqueda.Value))
       IF SUBSTR(Thisform.PageframeMenu.PageArticulos.TxTBusqueda.Value,A,1) <> CHR(32)
          WWChr = WWChr + SUBSTR(Thisform.PageframeMenu.PageArticulos.TxTBusqueda.Value,A,1)
          Wtm[AA] = "%"+Alltrim(WWChr)+"%"
       ELSE
          IF !EMPTY(WWChr)
             STORE  SPACE(0) TO WWChr
             AA = AA + 1
             DO Case
                CASE AA = 2
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[2] "
                CASE AA = 3
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[3] "
                CASE AA = 4
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[4] "
                CASE AA = 5
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[5] "
                CASE AA = 6
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[6] "
                CASE AA = 7
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[7] "
                CASE AA = 8
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[8] "
                CASE AA = 9
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[9] "    
                CASE AA = 10
                     SqlStr = SqlStr + " And Detalle Like ?Wtm[10] "
             ENDCASE
          ENDIF          
       ENDIF
   ENDFOR
ELSE
   SqlStr = "SELECT * FROM Articulo Where Borrado = 'N' "
ENDIF
SqlStr = SqlStr + 'Order by Detalle '
= SQLEXEC(JJtrabajo,SqlStr,"ARTICULO") 

[Freddy Canchari Martinez]

espero te sirva , renombrar el archivo con la extension .rar

Busquedas.rar

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/CADxff04cPU7hRdAMREzgewLwuP_rSuf8uqGBAgZW_VwWhw_TCA%40mail.gmail.com.

[Angel Perez]

Gracias Jose Daniel!!

Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/zG1RIAtmAs4/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/96ed8c2f-c764-49dc-af49-979a1e64c355n%40googlegroups.com.

[HernanCano]

[Luis A. Francisco G.]

Debes crear una caja de texto y en InteractiveChange colocas lo escrito abajo, claro está que deberás colocar el nombre de tu tabla y sustituir los campos

que aparecen en el select. Espero te sirva

SELECT almacen1
Select cod_prd,nom_prd,des_prd,exialmbul,marca,modelo,fot_prd,referencia From almacen1 Where Upper(des_prd) Like "%"+m.lcSearch+"%" Or Upper(nom_prd) Like "%"+m.lcSearch+"%" Or Upper(marca) Like "%"+m.lcSearch+"%" Or Upper(referencia) Like "%"+m.lcSearch+"%" Or Upper(modelo) Like "%"+m.lcSearch+"%";
INTO Cursor "cur_presu"
If !Used("cur_presu")
    SELECT 0
Use  cur_presu exclu Again Alias cur_presu
Endif
Select cur_presu

El sáb, 20 ago 2022 a las 22:09, HernanCano (<jherna...@gmail.com>) escribió:

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/27bd92b2-4ca8-4839-b81e-2b7d04f3181an%40googlegroups.com.

--

Luis Francisco