Unir dos consultas SQL

[Yulexis]

Les explico mejor.

Tengo la siguiente tabla en ACCESS:

Fecha | Importe | Entidad | Estado | Tipo_de_Moneda
1/2/2018 14.5 Cualquiera pagada CUC
2/2/2018 6.30 Otra pagada CUP
3/2/2018 8 Otra pagada CUC
4/2/2018 4 Otra pagada CUP

Lo que necesito es en una consulta obtener los siguientes datos:
Importe_CUP = 10.3
Importe_CUC = 22.5

Ya he intentado de todo pero nada.
Con las consultas del inicio funciona pero solo con un ADOQuery para cada una.

[Neftali [Germán.Estévez]]

Si utilizas un ADOQuery con la siguiente SQL deberían salir los datos que necesitas:

Código SQL [-]
Select TipoMoneda, SUM(Importe) from Tabla4 GROUP bY TipoMoneda

TipoMoneda   Importe
-----------------------
CUC              22,50
CUP              10,30

[Neftali [Germán.Estévez]]

Aunque no es lo que necesitas exactamente sí contesta a una cuestión que has planteado al principio.
Utilizando un único TADOquery SI hay la posibilidad de ejecutar varias consultas independientes y acceder a los resultados.

Es decir, podemos añadir a la propiedad SQL algo como esto:

Código SQL [-]
select * from TABLA1;
select * from TABLA2;
select * from TABLA3;

Y podemos recuperar los Datos en tres Recordset diferentes.

Si utilizamos en siguiente código:

Código Delphi [-]
var
  rs:_Recordset;
  i:OleVariant;
begin
  query.Close;
  query.Open;

  rs := query.Recordset;
  Memo1.Lines.Add('--------------------------');
  while Assigned(rs) do begin
    while (not rs.EOF) do begin
      Memo1.Lines.Add(rs.Fields[0].Value);
      rs.MoveNext;
    end;
    rs := query.Recordset.NextRecordset(i);
    Memo1.Lines.Add('--------------------------');
  end;

Podemos obtener todos los recordset de la query (las 3 tablas) y todos los registros de cada recordset (tabla)
Y el resultado en pantalla sería algo así:

--------------------------
Campo1 AAAAAA Tabla1
Campo1 BBBBBB Tabla1
--------------------------
Campo1 CCCCCC Tabla2     
Campo1 DDDDDD Tabla2
--------------------------
Campo1 EEEEEE Tabla3     
Campo1 FFFFFF Tabla3
--------------------------

[Yulexis]

Gracias mamcx y Neftali(La segunda ves que me ayudas hermano)


Resolví el problema con la siguiente SQL la cual armé luego de leer de que dentro de una llamada SQL se puede implementar un If...Then:

Código SQL [-]
SELECT
    Sum(iif(fact.Tipo_de_Moneda='CUP',fact.Importe, 0)) AS Importe_Total_CUP,
    Sum(iif(fact.Tipo_de_Moneda='CUC',fact.Importe, 0)) AS Importe_Total_CUC,
    Sum(iif(fact.Tipo_de_Moneda='CUP' AND fact.Estado='Facturada',fact.Importe, 0)) AS Importe_Sin_Pagar_CUP,
    Sum(iif(fact.Tipo_de_Moneda='CUC' AND fact.Estado='Facturada',fact.Importe, 0)) AS Importe_Sin_Pagar_CUC,
    Sum(iif(fact.Tipo_de_Moneda='CUP' AND fact.Estado='Pagada',fact.Importe, 0)) AS Importe_Pagado_CUP,
    Sum(iif(fact.Tipo_de_Moneda='CUC' AND fact.Estado='Pagada',fact.Importe, 0)) AS Importe_Pagado_CUC
FROM Facturas as fact

Esto me funciona perfectamente, se vinculan cada uno de los campos de la consulta con sus respectivas Label y listo (los muestro pero puedo hacer cualquier cosa con ellos).



Espero me den su opinión de si es o no una forma eficiente de realizarlo. Cómo será el consumo de recurso cuando tenga una gran cantidad de registros?

[Yulexis]

Así me ha quedado. En colores los datos que obtengo con la SQL.