Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-03-2008
pabloparra pabloparra is offline
Registrado
 
Registrado: feb 2008
Posts: 5
Poder: 0
pabloparra Va por buen camino
suma de campos calculados

Hola a Todos,

Necesito sumar unos campos calculados de una tabla detalle, para lograrlo sumo los campos en el evento afterscroll del query maestro empleando el siguiente procedimiento sumartotal. Además empleo una grilla SMDBGrid la cual tiene un footer que me permite visulializar los resultados de una manera muy presentable.

Código Delphi [-]
procedure TDtmMezcla.sumartotal();  //Procedimiento para sumar campos 
var    i:Integer;    
       SavePlace: TBookmark;
      sumcstoouble;
begin     
with Querydetficha do begin     
SavePlace := GetBookmark;    
Disablecontrols;     
try     
sumcsto:=0;  //inicializo el acumulador
    pesoxtan:=sumcspt;
    First;
    while not eof do    
    begin       
     sumcsto:= Round_nDec(sumcsto+QuerydetfichaDET_CANT.Value,3);        //otras operaciones
    next;
    end;
    finally     
   GotoBookmark(SavePlace);     
    FreeBookmark(SavePlace);     
   Enablecontrols;     
  for i := 0 to FrmTabla2.DBGficha.Columns.Count-1 do     
  begin         
       with FrmTabla2.DBGficha.Columns[i]  do         
       begin         
          if (FieldName = 'DET_CANT') then 
             FooterValue := FloatToStrF(sumcsto, ffNumber, 6,3);   
       end;
  end;
 end;
end;

el problema es que necesito generar otro campo calculado el cual realiza los cálculos a partir de la suma del primer campo(sumcsto), los valores de este nuevo campo me dan bien pero no consigo aún sumar los datos de este nuevo campo porque no se que evento invocar ya que el debe primero sumar todos los campos calculados del primero y con este dato calcular el otro campo.

La grilla SMDBGrid en la editor de campos tiene unas propiedades relacionadas con el footer tales como footertype(suma,promedio,ect)
y footertext pero al emplearlas ella no me hace la suma automática, motivo por el cual utilizo el anterior procedimiento. Podría alguien colaborarme para lograr el sumar este nuevo campo, o si la grilla lo hace automáticamente podrían indicarme como?.

Gracias ;

Última edición por pabloparra fecha: 12-03-2008 a las 22:18:45.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Campos Calculados Kaller Tablas planas 1 12-12-2006 00:11:13
campos calculados Nelly SQL 2 07-10-2005 18:13:51
Campos Calculados jonny0157 C++ Builder 1 10-08-2005 11:00:44
CAmpos calculados? cmena Conexión con bases de datos 4 17-06-2004 11:54:51
Campos Calculados UTECYBER OOP 2 17-11-2003 14:00:27


La franja horaria es GMT +2. Ahora son las 05:13:47.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi