Ingreso y Búsqueda Múltiple en visual Fox

Buenas...
- Quisiera me pudieras ayudar en lo siguiente:
1- Tengo dos Tablas: productos_1 y productos_2
2-El siguiente código para realizar una búsqueda en tabla productos_1:
SELECT productos_1
SET ORDER TO codigo
SEEK intCodigo
IF FOUND()
  intCodigo=codigo
 strDescripcion=descripcion
ELSE
MESSAGEBOX('Código de Producto NO Existe', 16,'Búsqueda de Productos')
Endif
A- Cómo hago para que la búsqueda se realice también en la tabla: productos_2,
es decir que si la búsqueda NO encontró el código en la tabla productos_1, que la realice en la tabla productos_2 y que si no se encontraron registros en ninguna de las 2 tablas, entonces mandar el MESSAGEBOX.
B- Debo insertar código y descripción en la tabla productos_2, pero si el registro ya existe en la tabla productos_1 enviar MESSAGEBOX('Código de Producto ya Existe', 16,'Ingreso de Productos') y no debe insertar nada, de lo contrario insertar el registro en la tabla productos_2
Te agradezco por tu ayuda y por tu excelente disposición.

1 respuesta

Respuesta
1
A-
Select productos_1
Set Order To codigo
Seek intCodigo
If !Eof()
     intCodigo = codigo
     strDescripcion = descripcion
Else
     Select productos_2
     Set Order To codigo
     Seek intCodigo
     If !Eof()
          intCodigo = codigo
          strDescripcion = descripcion
     Else
          MessageBox('Código de Producto NO Existe',16,'Búsqueda de Productos')
     EndIf
EndIf
B-
Select productos_1
Set Order To codigo
Seek intCodigo
If !Eof()
     && Inserta registro
Else
     MessageBox('Código de Producto ya Existe', 16,'Ingreso de Productos')
EndIf
Mil Gracias..
- No lo indique anteriormente...
B- Al insertar un código nuevo, primero se debe verificar si el código existe tanto en la tabla: productos_1 como en la tabla: productos_2, si el registro ya existe en cualquiera de las 2 tablas no realizar la inserción y mandar mensaje de que ya existe..., por el contrario SOLO insertar el registro en la tabla: productos_2.
*/Todo esto debido a que ya existía la tabla: productos_1 y se quiere que todos los nuevos ingresos de productos se registren solamente en la tabla: productos_2 y dejar la tabla: productos_1 intacta(sin nuevos ingresos). Por el contrario si ya existía el código de alguno de los productos nuevos que se están ingresando en la tabla: productos_1, No ingresarlo en Ninguna de las 2 tablas.
Gracias por la colaboración y ayuda.
B-
Select productos_1
Set Order To codigo
Seek intCodigo
If Eof()
     Select productos_2
     Set Order To codigo
     Seek intCodigo
     If Eof()
          && Inserta registro en la tabla productos2
     Else
          MessageBox('Código de Producto ya Existe', 16,'Ingreso de Productos')
     EndIf
EndIf

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

No funciona el Insert Into Values

Estoy programando en Foxpro con BD en SQL, estoy agregando un registro a una tabla con el Insert Into Values, no me da error pero no me ingresa el registro en la tabla, quizás estoy haciendo algo mal, yo en ese Insert Into Values agrego valores que...
2 respuestas

Ejecucion de Menu

Amigos expertos tengo un problemilla. He creado un archivo de menu en visual fox, pero no puedo ejecutar este archivo supongo que se ejecuta con el comando DO MENU nombre. MNX pero me da error de sintaxis, igual he intentado que este menu se ejecute...
2 respuestas

Llevar datos de un grid a un formulario para modificarlos

Estoy aprendiendo a programar en foxpro 9 y tengo la siguiente duda:Tengo un grid que muestra la tabla cliente, a la cual esta conectada. Lo que quisiera hacer es:en el evento doble click sobre cualquiera de los clientes mostrados en el grid, este me...
2 respuestas

¿Cómo guardar un archivo PDF?

Tengo un formulario que piede cedula del cliente dirección y un documento a guardar en la DBF que es un examen en archivo PDF Como grabo el la tabla ese archivo, de manera que cuando consulte por cedeula A) Pueda abrir el archivo PDF en pantalla B)...
2 respuestas

Añadir registro a un grid que contiene datos pero en cualquier parte del grid

Tengo un form que tiene varios text y un grid el cual esta relacionado con una tabla y le voy agregando registro mediante un click en un botón . Hasta ahí todo de lujo ! El problema es que el usuario quiere agregar un registro en cualquier parte del...
4 respuestas

Sumar columna de un grid

Pues yo nuevamente. Como hago para sumar toda la columna de un grid Ejemplo Grid: Cantidad Precio Total 100 10 1,000 50 10 500 Total 1,500
3 respuestas

Capturar Imagen y Grabarlo en Vfp

Estimado amigo de nuevo molestándote esta vez quisiera que ayudes a realizar lo siguiente se desea que al momento que el personal digite su código de ingreso, en pantalla le visualice y a la vez grabe en una tabla sus Nombres, hora que marco y foto...
4 respuestas

Como agrupar registros

¿Quisiera saber como agrupar registro y sumarlos a lva ves que los veo en un reporte? Ejemplo Tengo una tabla llamada PEDIDOS en la cual almaceno los pedidos de las rutas para el día siguiente Ruta articulo cantidad fecha 1 2-02 11 21/02/11 1 3-02 2...
2 respuestas

Comparación de Huellas Digitales

Quería saber si me pueden pasar un ejemplo de comparación de huellas digitales con Digital Persona U.are.U 4000 Estuve viendo en esta misma pagina que había alguien que hablaba sobre esto. Pero no se completo el tema. Solo necesito un ejemplo de...
2 respuestas

Ayuda para poder manipula lector de huellas

Necesito ayuda con respecto a como poder controlar un lector de huellas digital (microsoft fingerprint reader), puesto que se me ha requerido crear un proyecto que permita controlar entradas y salidas de personal utilizando un lector de huellas...
2 respuestas