Ver Mensaje Individual
  #8  
Antiguo 07-05-2007
Avatar de carlosegs11
carlosegs11 carlosegs11 is offline
Miembro
 
Registrado: jul 2004
Posts: 41
Reputación: 0
carlosegs11 Va por buen camino
Muchas gracias por tu pronta respuesta.

Tipo de base de datos: tabla.dbf
Componentes que utilizo: TAdsQuery

Codigo de la consulta:

sqlFactura.SQL.Clear;
sqlFactura.SQL.Add('SELECT numefact AS Factura, sum(valor) AS Valor,
fechinivig AS Inicio_Vigencia, fechfinvig AS Fin_Vigencia');
sqlFactura.SQL.Add('FROM factura');
sqlFactura.SQL.Add('GROUP BY cedula, numefact, fechinivig, fechfinvig,
compania, producto');
sqlFactura.SQL.Add('HAVING ((cedula = :sCedula) and (sum(valor) <> 0) and (compania = :sCompania) and (producto = :sProducto))');
sqlFactura.SQL.Add('ORDER BY cedula, fechinivig');
sqlFactura.ParamByName('sCedula').AsString := F_Recaudos.eCedula.Text;
sqlFactura.ParamByName('sCompania').AsString := F_Recaudos.cbxCompania.Text;
sqlFactura.ParamByName('sProducto').AsString := F_Recaudos.cbxProducto.Text;
sqlFactura.Open;

Carlos E.
Responder Con Cita