Ver Mensaje Individual
  #4  
Antiguo 13-12-2007
Avatar de jzginez
jzginez jzginez is offline
Miembro
 
Registrado: sep 2003
Ubicación: Puebla, México
Posts: 247
Reputación: 23
jzginez Va por buen camino
Hola gracias por las respuestas pero intentare explicarme mejor a ver si así me entienden.

Tengo un pFIBDataSet (pFIBDetalleCompra) con la siguiente sentencia select:
Código SQL [-]
SELECT
    DETALLECOMPRAS.ID_COMPRA,
    DETALLECOMPRAS.ORDEN,
    DETALLECOMPRAS.CANTIDAD,
    DETALLECOMPRAS.ID_PRODUCTO,
    productos.descripcion,
    (DETALLECOMPRAS.ID_PRODUCTO||' '||productos.descripcion) descripcion2,
    DETALLECOMPRAS.PRECIO,
    DETALLECOMPRAS.TOTAL,
    DETALLECOMPRAS.ID_UNIMED
FROM
    DETALLECOMPRAS 
    left join productos on (DETALLECOMPRAS.id_producto = productos.id)
where DETALLECOMPRAS.ID_COMPRA = :ID

Esta me muestra el detalla de alguna compra sobre la que quiero hacer la devolución.

y tengo otra pFIBDataSet (pFIBDetalle) para el detalle de la devolución
Código SQL [-]
SELECT
    ID_DEVOLUCION,
    ORDEN,
    ID_PRODUCTO,
    CANTIDAD,
    PRECIO,
    TOTAL,
    ID_UNIMED
FROM
    DETALLEDEVOLUCION 
where id_devolucion = :id

En este segundo pFIBDataSet en el editor de campos agrego un campo calculado del tipo lookup con las siguentes propiedades:
Código Delphi [-]
Name:= pFIBDetalleDescripcion;
LookupDataSet:= pFIBDetalleCompra;
LookupKeyField:= ID_PRODUCTO;
KeyField:= ID_PRODUCTO
cuando pongo un dbgrid para este dataset en el campo descripción se activa un tipo bdlookupcombobox de forma automática, de este es del que intento controlar los eventos.

Espero halla quedado un poco mas claro. gracias
__________________
Espero poder seguir exprimiéndote el cerebro 8)
Jorge Zamora Ginez
Puebla, Pue. México
Responder Con Cita