Ver Mensaje Individual
  #1  
Antiguo 03-06-2003
judoboy judoboy is offline
Miembro
 
Registrado: may 2003
Ubicación: Valencia
Posts: 139
Reputación: 22
judoboy Va por buen camino
Sumar los Datos de un Report provenientes de una consulta

Sumar los Datos de un Report provenientes de una consulta.
Para esto he probado con varias cosas
una con un QRExprexion SUM(DIETAS)
y no me funciona otra mediante una consulta.

Código:
{DIETAS}
TRY
 SentenciaDietas:='SELECT SUM(LP.DIETAS) FROM 
LINEAS_PARTE_TRABAJO LP, PARTES_TRABAJO P '+
' WHERE LP.EMPLEADO="'+DBEditCodigo.Text+'" 
AND LP.CODIGO_PARTE=P.CODIGO ';

   {información sobre la fecha de los Partes}
     try
        begin    {FECHA PARTES}
             if EditDespuesDe.Text<>'' then
                SentenciaDietas:=SentenciaDietas+' AND
 P.FECHA>="'+FormatDateTime
                 ('mm/dd/yyyy',
StrToDate(EditDespuesDe.Text))+'"';
             if EditAntesDe.Text<>'' then
                SentenciaDietas:=SentenciaDietas+' AND
 P.FECHA<="'+FormatDateTime
                 ('mm/dd/yyyy',
StrToDate(EditAntesDe.Text))+'"';
        end;
      except
            on EConvertError do
               begin
                   Application.MessageBox('Error al 
                   introducir la fecha',
                   'ERROR',Mb_Ok+Mb_IconInformation);
                   FrmPartesTrabajoEmpleado.ModalResult:=0;
                   Exit;
               end;
      end;


     ConsultasDietas.Active:=false;
     ConsultasDietas.Sql.Clear;
     ConsultasDietas.Sql.Add(SentenciaDietas);
     ConsultasDietas.Active:=True;

 except
   Application.MessageBox('No se han podido
 calcular bien las dietas',
   'Imposible',Mb_IconInformation+Mb_Ok);


 end;

Haciendo lo anterior para otros dos campos de la tabla me funciona correctamente, pero para este no porque puede ser??

Última edición por judoboy fecha: 03-06-2003 a las 18:16:50.
Responder Con Cita