Consultas SQL en VFP

Hola davsoft, ¿Cómo has estado?
Tengo un pequeño problema con unas tablas.
Tengo las tablas de palabras, relación y de productos.
El fin de la tabla palabras es simplemente contener todas las palabras que puede haber en los registros de productos y se relacionan entre si por la tabla de relación quien contiene el Id de Palabra y el Id de producto. Un ejemplo:
Si tengo un registro de producto, que contiene el nombre de: Refresco de dieta marca tal con un Id 2
La tabla de palabras debe contener 5 registros, de : refresco, de, dieta, marca, tal. Cada registro tiene un campo de ID único.
Por el modo en que programe la captura, se utiliza los procedimientos almacenados, con el trigger insert y update, el cual al estar escribiendo la palabra refresco me genera los siguientes registros : Re, Ref, Refr, Refre, Refrec y Refreco. En otras palabras, me genera basura. Ya hice una función Sql la cual es:
SELECT palabra.clave, palabra.palabra FROM palabra, relación WHERE palabra.clave  = relacion.Key_palabra INTO CURSOR tem ORDER BY palabra.clave                       
Luego hago un:
count all to reg
dimension registro(reg,2)
copy to array registro
SELECT palabra
delete all
for i=1 to reg
     insert into palabra (llave,palabra) values (registro(i,1),registro(i,2))
next
Y si funciona.
El problema es que cuando sean miles de registros. Esto haría lento al entrar al sistema, y como uso las tablas para la búsqueda de artículos, tampoco se puede hacer la depuración mientras realiza la búsqueda.
Había pensado utilizar en la instrucción Sql un INTO TABLE PALABRAS pero no me funciona.
¿Hay alguna manera de hacer la depuración rápida en esas tablas por medio de instrucciones SQL?
Gracias.
Respuesta
1
Intentaré acortar el problema primeramente adentrándome a tu problema, ¿cuál es el objetivo principal de esta tarea?, ¿Buscar productos?, por que yo tengo consultas hechas mediante fox a mysql que encuentra cualquier palabra dentro de la tabla productos sin la necesidad de crear una tabla palabras, eso si entendí el objetivo que tienes, por que de esta manera me imagino que es complicado mantener la tabla palabras, imagínate si un usuario entra a modificar alguna letra en la tabla de productos, ¿debes regenerar todos los registros?, si entendí tu pregunta me dices así te escribo aquí mi código, te va servir mucho para encontrar los productos escribiendo cualquiera de las palabras que contenga la tabla.
Hola, Si me puedes enviar el código a mi correo te lo agradecería:
[email protected]
Gracias
Disculpa la demora, aquí te pego el código que es muy sencillo, es una función sencilla a la que envías la cadena a buscar, por ejemplo "gaseosa coca cola", LUEGO la tabla or ej "productos" y luego el campo en donde esta el nombre a buscar, por ejemplo "descripcion", por ejemplo así
xSql = xSqlBusqueda("gaseosa coca","productos","nombre")
La función te rotorna a partir del like, pero tu puedes ya ponerle la primera parte del select, te recomiendo copiarlo y probarlo antes que nada, aquí va la función
function  xSqlBusqueda( xCadena,xTabla,xCampo)
if empty(xCadena)
xCadena='vacio'
endif
dime palabras(20,1)
xRes = 1
xPalabras= 1
x_cadena = alltr(xCadena)+' '
x_resto = substr(xCadena , 1 ,at(chr(32) , xCadena)-1)
Palabras(xPalabras,1) = x_resto
do while at(chr(32),x_cadena)>0
x_resto = substr(x_cadena , 1 ,at(chr(32) , x_cadena)-1)
x_cadena = substr(x_cadena , at(chr(32) , x_cadena)+1,60)
Palabras(xPalabras,1) = x_resto
xPalabras= xPalabras+ 1
enddo
x_resto = substr(x_cadena , 1 ,at(chr(32) , x_cadena)-1)
Palabras(xPalabras,1) = x_resto
xSqlBus = " "
do case
case xPalabras-1 = 2
xSqlBus = xSqlBus + " like '%"+alltr(palabras(1,1))+"%' and "+xCampo+" like '%"+alltr(palabras(2,1))+"%' order by "+xCampo+" "
case xPalabras-1 = 3
xSqlBus = xSqlBus + " LIKE '%"+alltr(palabras(1,1))+"%' and "+xCampo+" like '%"+alltr(palabras(2,1))+"%' and "
xSqlBus = xSqlBus + " "+xCampo+" LIKE '%"+alltr(palabras(3,1))+"%' Order by "+xCampo+""
case xPalabras-1 = 4
xSqlBus = xSqlBus + " like '%"+alltr(palabras(1,1))+"%' and "+xCampo+" like '%"+alltr(palabras(2,1))+"%' and "+xCampo+" like '%"+alltr(palabras(3,1))+"%' and "+xCampo+" like '%"+alltr(palabras(4,1))+"%' order by "+xCampo+""
case xPalabras-1 = 5
xSqlBus = xSqlBus + " like '%"+alltr(palabras(1,1))+"%' and "+xCampo+" like '%"+alltr(palabras(2,1))+"%' and "+xCampo+" like '%"+alltr(palabras(3,1))+"%' and "+xCampo+" like '%"+alltr(palabras(4,1))+"%' and "+xCampo+" like '%"+alltr(palabras(5,1))+"%' order by "+xCampo+""
case xPalabras-1 = 6
xSqlBus = xSqlBus + " like '%"+alltr(palabras(1,1))+"%' and "+xCampo+" like '%"+alltr(palabras(2,1))+"%' and "+xCampo+" like '%"+alltr(palabras(3,1))+"%' and "+xCampo+" like '%"+alltr(palabras(4,1))+"%' and "+xCampo+" like '%"+alltr(palabras(5,1))+"%' and "+xCampo+" like '%"+alltr(palabras(6,1))+"%' order by "+xCampo+""
case xPalabras-1 = 7
xSqlBus = xSqlBus + " like '%"+alltr(palabras(1,1))+"%' and "+xCampo+" like '%"+alltr(palabras(2,1))+"%' and "+xCampo+" like '%"+alltr(palabras(3,1))+"%' and "+xCampo+" like '%"+alltr(palabras(4,1))+"%' and "+xCampo+" like '%"+alltr(palabras(5,1))+"%' and "+xCampo+" like '%"+alltr(palabras(6,1))+"%' and "+xCampo+" like '%"+alltr(palabras(7,1))+"%' order by "+xCampo+""
otherwise
xSqlBus = xSqlBus + " like '%"+alltr(xCadena)+"%' order by "+xCampo+""
endcase
return(xSqlBus)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Capturar imagenes desde una webcam a VFP

Se que se ha formulado muchas veces, pero después de mucho google, solo encuentro referencias a un ocx de Kodak que no está disponible y una enorme lista de enlaces que vienen a parar a esta web, donde la respuesta se envía por correo al solicitante....
1 respuesta

No se si utilizar replace o decode, substr, instr

Mi pregunta es algo complicada, al menos para mi que estoy aprendiendo SQL actualmente, bien, veamos.. He de seleccionar de la tabla emple para cada empleado cuyo apellido (columna apellido), contenga una N queremos que nos devuelva nnn pero solo...
2 respuestas

Exportacion a excel

Tengo un problema con exportar un reporte a excel, quiero que contenga un logo y controlar el ancho de cada columna, colores y demás, ¿Cua les la mejor forma?, ¿Tienes algo que haga eso? Y que una vez generado el archivo excel me salga una pantalla...
2 respuestas

Fotos en visual basic

Podrías ayudarme con un programa que tome fotos y las guarde con nombre, ¿Fecha y hora?
1 respuesta

Encriptar claves en Base Datos

Estimado amigo una vez más molestando dime no se si tendrás algún programa que me permita que se Guarda en una base de datos las claves de acceso al sistema pero encriptadas (ya sea que cuando el usuario digite letras y números se encripte) te voy a...
1 respuesta

Mostrar registros con un parámetro y agruparlos

Gracias por la ayuda en el otro caso al final utilice un top, pero necesito que me apoyes experto, tengo un script en el cual tengo que mostrar los registros agrupados por agencia, por producto, y por moneda segun la cantidad que yo ingrese esa sera...
1 respuesta

MYSQL consulta muy complicada (para búsquedas)

Tengo esta consulta SQL original que devuelve los resultados de una búsqueda: SELECT DISTINCT p.products_image, p.products_id, pd.products_name, p.products_price, p.products_tax_class_id, IF(s.status, s.specials_new_products_price, NULL) AS...
1 respuesta

Fondo de Visual FoxPro

Quisiera me ayudara a crear un fondo personalizado y permanente a mi aplicación creada en Visual Foxpro; como ejemplo el logotipo o nombre de mi compañía. Esto para darle un toque personalizado a mi aplicación.
1 respuesta

Determinar la distribuciñon de probabilidad multivariable y bivariable.

3. En una empresa hay nueve ejecutivos, de los cuales cuatro están casados, tres son solteros y dos son divorciados. Tres de ellos serán seleccionados al azar para un ascenso. Si Y1 es el número de ejecutivos casados y Y2 el de ejecutivos solteros...
1 respuesta

Buscar registros diferentes del buscador

Tengo un buscador con dos input text de nombre fecha_1 y fecha_2 Las tablas a buscar son ficha y diasreservados esta última con la misma id para todos los registros de fechas ocupadas que la tabla ficha donde está el apartamento. Mi consulta es:...
1 respuesta