Ver Mensaje Individual
  #4  
Antiguo 01-09-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Un query lo cargas con la sentencia

Código SQL [-]
select sum(total_venta) from tabla

y ejecutas la consulta con el método Open o poniendo Active := true;

Obtienes el valor resultante con Query.Fields[0].AsInteger (o AsFloat dependiendo del tipo de datos del campo).

Lo de pasarlo a la otra tabla depende de si te refieres a modificar el valor de un registro ya existente o insertar un nuevo registro. En el primer caso usarás UPDATE y en el segundo INSERT como ya te indicaron. Pero los pasos son semejantes: llenas la consulta en el query y la ejecutas. Sólo que en este caso usará muy posiblemente (no conozco FibPlus) algún método como ExecSQL en lugar de Open. Esto es así porque la segunda consulta no devuelve resultados.

De cualquier forma te recomiendo que leas no sólo de SQL sino del uso de componentes de bases de datos, y el capítulo "Developing Database Applications" de la ayuda de Delphi es un muy buen primer paso.

// Saludos
Responder Con Cita