Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-08-2008
radge radge is offline
Miembro
 
Registrado: may 2008
Posts: 147
Poder: 16
radge Va por buen camino
Obtener resultado de una suma (SQL)

Código Delphi [-]
   cadenaSQL := 'Select sum(total) from Albaran';
   qry_total.SQL.add(cadenaSQL);
   qry_total.open;
   TotalAlbara := qry_total.FieldByName('sum(Total)').asString;
   Qry_total.Close;


Buenas tengo este codigo que intengo obtener la suma de una sql , hago el sql pero despues intento recuperarlo de esta forma y no me deja se os ocurre alguna forma ?¿

gracias , radge
Responder Con Cita
  #2  
Antiguo 18-08-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
Hola radge, puedes darle un alias a tu sum y recuperar por ese alias o utilizar Fields en vez de FieldByName.

Código Delphi [-]
  cadenaSQL := 'Select sum(total) as suma from Albaran';

  TotalAlbara := qry_total.FieldByName('suma').asString;
  //o
  TotalAlbara := qry_total.Fields[0].asString;

Slauditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #3  
Antiguo 18-08-2008
radge radge is offline
Miembro
 
Registrado: may 2008
Posts: 147
Poder: 16
radge Va por buen camino
Eso tbien lo habia probado , disculpa por no haver lo dicho .
La variabla "totalalbara" la tengo del tipo string que no lo havia dicho tampoco.


Y me da el siguiente error

Invalid Use of Keyword.
Token : select
Line number : 6
Responder Con Cita
  #4  
Antiguo 18-08-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
Hola de nuevo radge, no hay problema si lo recuperas como cadena, estas seguro que la consulta que le pasas esta bien, porque de ambas formas si funciona, en tu codigo veo que añades la consulta con Add, deberías limpiar tu propiedad SQL cada vez que ejecutes tu consulta. Has probado la segunda forma, puedes hacer la prueba de colocar tu consulta sin ningun alias y recuperarlo con Fields.

Código Delphi [-]
 qry_total.SQL.Clear;
 cadenaSQL := 'Select sum(total) from Albaran';
 qry_total.SQL.add(cadenaSQL);
 qry_total.open;
 TotalAlbara := qry_total.Fields[0].asString;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #5  
Antiguo 18-08-2008
radge radge is offline
Miembro
 
Registrado: may 2008
Posts: 147
Poder: 16
radge Va por buen camino



Eso he probado ... pero entonces me dice esto que raro....

Lo raro es que cojo el SQL lo pasteo en la sybase y lo ejecuta perfectamente.
Responder Con Cita
  #6  
Antiguo 18-08-2008
Avatar de look
look look is offline
Miembro
 
Registrado: sep 2007
Ubicación: The Shire
Posts: 656
Poder: 17
look Va camino a la fama
Cita:
Empezado por radge Ver Mensaje



Eso he probado ... pero entonces me dice esto que raro....

Lo raro es que cojo el SQL lo pasteo en la sybase y lo ejecuta perfectamente.
no se si sea el problema, pero pareciera que no le asignaste la base de datos a la query en la propiedad databasename, no mas digo..
__________________
all your base are belong to us
Responder Con Cita
  #7  
Antiguo 18-08-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
Como dice look ese error te da porque no te estas conectando a tu Base de Datos (propiedad DataBaseName), supongo que estas utilizando los componentes de la paleta BDE. Pero no entiendo, en el otro error que te daba, parecia que si te conectabas y había algun error en la consulta.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #8  
Antiguo 19-08-2008
radge radge is offline
Miembro
 
Registrado: may 2008
Posts: 147
Poder: 16
radge Va por buen camino
Gracias por los mensajes anteriores al final lo arreglé.

Muchas gracias ,

radge

Última edición por radge fecha: 19-08-2008 a las 12:20:55.
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
Como obtener éste resultado Gaim2205 SQL 1 19-02-2008 22:52:23
obtener el ultimo registro resultado de una comparacion Gaim2205 Varios 2 11-09-2007 18:27:40
obtener el resultado de un QRExpr thorv Impresión 2 14-02-2007 20:58:53
Obtener el resultado de una consulta zurech MySQL 3 13-07-2005 11:33:11
como obtener la suma de un importe en paradox? viajero2015 Conexión con bases de datos 4 23-02-2004 16:00:52


La franja horaria es GMT +2. Ahora son las 01:05:41.


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