Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Obtener una factura cuyos datos se encuentran en dos Tablas (https://www.clubdelphi.com/foros/showthread.php?t=38039)

maravert 30-11-2006 04:52:23

Obtener una factura cuyos datos se encuentran en dos Tablas
 
Hola a todos:

Espero alguien me ayude con esto, llevo varios días y no encuentro la forma :eek:

Manejo Delphi 7 y tablas paradox

Tengo una Tabla (Table1) con estos campos:

ClaveFactura
ClaveCliente
ClaveProducto
Cantidad
Precio

Otra tabla (Table2)

ClaveProducto
Descripcion
Existencias

Necesito imprimir la factura que el usuario quiera con solo proporcionar el numero de la factura.

Los campos que deberà de tener la factura son:
ClaveProducto (Table1)
Cantidad (Table1)
Descripcion (Table2)
Precio (Table1)


¿Còmo realizo la consulta de los datos de la segunnda tabla, con los datos de la primera ?

En otras palabras como "sacar" los datos de ambas tablas?


Gracias a todos de antemano.

Alejandro Maravert

roman 30-11-2006 05:42:10

Pudiera ser así:
Código SQL [-]
select
  Table1.ClaveProducto, Table1.Cantidad,
  Table2.Descripcion, Table1.Precio
from
  Table1,Table2
where
  Table1.ClaveProducto = Table2.ClaveProducto

// Saludos

Bender 30-11-2006 20:54:59

Código SQL [-]
select
  Table1.ClaveProducto, Table1.Cantidad,
  Table2.Descripcion, Table1.Precio
from Table1 inner join Table2 on
  Table1.ClaveProducto = Table2.ClaveProducto

maravert 02-12-2006 18:18:47

Muchas Gracias a los dos por esta aportación.

maravert 04-12-2006 23:41:53

Hola, como puede añadir a las instrucciones de arriba el numero de factura a imprimir, el numero de factura se da a traves de la variable

Código Delphi [-]
factura:string

Gracias

roman 05-12-2006 00:02:28

Pones tu consulta así:

Código SQL [-]
select
  Table1.ClaveProducto, Table1.Cantidad,
  Table2.Descripcion, Table1.Precio
from
  Table1,Table2
where
  Table1.ClaveProducto = Table2.ClaveProducto
  and
  Table1.ClaveFactura := :clave_factura

Observa los dos puntos : antes de clave_factura. Eso indica que clave_factura es un parámetro que debes llenar, y lo haces antes de ejecutar la consulta usando el método ParamByName del Query que estés usando:

Código Delphi [-]
Query.ParamByName('clave_factura').AsString := factura;
Query.Open;

clave_factura es un ejemplo, el parámetro puede llamarse como sea.

// Saludos


La franja horaria es GMT +2. Ahora son las 07:17:33.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi