Ver Mensaje Individual
  #10  
Antiguo 06-04-2005
Ulises Ulises is offline
Miembro
 
Registrado: may 2003
Ubicación: Santiago de Chile
Posts: 82
Reputación: 22
Ulises Va por buen camino
B.i.

Tienes razón, ahi van los detalles:

1.- Capa base de datos
En base de Datos tengo la sp que muestro a continuación al cual le paso el numero de empresa y un tipo, la ejecuto y me trae los resultados sin ningun problema:

Código:
CREATE PROCEDURE GRAFICO (
    NE INTEGER,
    TIPO INTEGER)
RETURNS (
    FECHA DATE,
    NOMBRE VARCHAR(50),
    NETO INTEGER,
    CANTIDAD INTEGER)
AS
begin

       for Select a.dc_fecdoc,
                  b.cp_nombre,
                  sum(a.dc_monto) as Neto,
                  count(a.dc_monto) as Cantidad
            From Detcom a inner join clipro b on a.dc_numrut = b.cp_numrut
            where a.ne = :ne and
                  a.dc_tipcom = :Tipo and
                  a.dc_debhab = 'H'
            group by a.dc_fecdoc, b.cp_nombre

            Into  :Fecha, :Nombre, :Neto, :Cantidad do
            begin
              suspend;
            end
end

2.- Capa Intermedia
o sea en la DLL, tengo un :

SQLConnection, obviamente conectado a la base de datos

una tsqlquery con su sql :

Select * From Grafico(:NE, :TIPO) order by Neto

y un datasetprovider que apunta a la tsqlquery anterior.

3.- Capa del Cliente
en un datamodulo tengo un tclientdataset que apunta al provider de la dll.

en la form donde esta el cubo tengo un Decisioncube, un Decisionsource, la DecisionGrid y la DecisionPivot.

El Decisioncube esta apuntando al tclientdataset, el cual cuando es llamada la form, le son entregados los parametros y procedo con la apertura de éste.

Aqui es donde me muestra dos registros de todos los seleccionados.

No se si queda mas clario, gracias de nuevo.
Responder Con Cita