unir dos tablas

[djanp]

mmm no se si conseguire explicarme,
primero hola a todos y gracias por ayudar

estoy haciendo un programa de facturacion en delphi, sobre access
tengo un form con un pagecontrol, y 2 pestañas
la 1ª es una tabla con las facturas del año
la 2ª es con los datos de la factura elegida antes y otra tabla sobre los articulos vendidos en esa factura

pues mi duda es como accedo al valor actual del registro de la tabla de facturas, para utilizarlo en la busqueda de los articulos de esa factura
alguien sabe el codigo a usar?
me explique o es un caos??

[[duilioisola]]

Creo que lo que necesitas es unir los DataSets a travez del DataSource.

- Supongamos que la cabecera tiene un campo ID_CABECERA que identifica a cada registro.
- Supongamos que el detalle de la factura tiene un campo ID_CABECERA en el que guarda cual es la cabecera a la que corresponde.

TCabecera - Tabla cabecera. Es un DataSet, TTable
SQL='SELECT ID_CABECERA,NOMBRE,DIRECCION,IMPORTE,... FROM CABECERA_FACTURA'

DSCabecera - DataSource
DataSet=TCabecera

TDetalle - Tabla detalle. Es un DataSet, TTable
SQL='SELECT ARTICULO,CANTIDAD,IMPORTE,... FROM DETALLE_FACTURA WHERE ID_CABECERA=?ID_CABECERA'
DataSource=DSCabecera

DSDetalle - DataSource de TDetalle
DataSet=TDetalle

De este modo, cuando te muevas a la siguiente cabecera, automaticamente se moverá la tabla de detalle, mostrándote los detalles de esa factura.
Nota: El parámetro ?ID_CABECERA se debe llamar igual que el campo en la cabecera.

De todos modos, si quieres acceder a los datos de la tabla de facturas solo debes ver que es lo que tiene TCabecera.
TCabecera.FieldByName('NOMBRE').AsString, por ejemplo.

[djanp]

No se si es q no me entero o q no me sale


a ver, yo tengo una tabla "Cabecera Facturacion"(que seria tcabecera en tu ejemplo)
doy por hecho, que este hace su propia sql, dado que lo saca solo, no me molesto en hacerlo

de ahi, lo llevo a un DataSource DStabla

por otro lado esta Query "Lineas Facturacion"(esta la tengo como una Query, dado q quiero sacar solo los que cumplen una condicion)

select * from "Lineas Facturacion" L
where L.Numero = ?Numero

y una Datasource DSquery
por ultimo un dbgrid que coge info de DSquery

Pues me da error al poner esa consulta en el query Parameter not set in query string.

probe ha poner otra Query en vez de la tabla, pero aun asi da el mismo error, y ni idea de porque

[[Lepe]]

No sé si me estoy perdiendo algo, pero en un SQL, un parámetro se especifica mendiante los dos puntos seguido de un nombre, ustedes usan el carácter interrogación

Código Delphi [-]
query1.sql.text := 'select * from "Lineas Facturacion" L where L.Numero = :Numero';
query1.Parambyname('Numero').asinteger := 3;  // **ver abajo
query1.Open;

** En caso de usar relaciones Maestro detalle en 2 consultas, puede omitirse esa línea, siempre y cuando la consulta maestra tenga el mismo nombre para ese campo.

Saludos

[djanp]

si ahora q lo dices yo he visto por ahi q se utilizan los 2 puntos, pero di por hecho q sabiais mas que yo y seria una forma de hacerlo

acabo de resolver el problema de esta forma

2 tablas: 1 sobre cabeceras
otra sobre detalles
en la segunda puse como dijo lepe relaciones Maestro...o como se diga, la cosa es q he conseguido q se haga un join por el campo numero y ya me aparece bien, gracias a los 2 por la ayuda, veamos si no me vuelve a asaltar la duda

[[duilioisola]]

Perdón por liarte con el tema del interrogante en los parámetros.
Yo trabajo con Firebird y los componentes FreeIB y utilizo este símbolo.
De todos modos, creo que también funciona con "dos puntos".

Felicitaciones por haberlo solucionado!