Ver Mensaje Individual
  #1  
Antiguo 10-03-2008
Avatar de MaMu
MaMu MaMu is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 863
Reputación: 19
MaMu Va por buen camino
Cambio de Moneda dentro de una consulta

(trabajo con Delphi 7, mySql 4.1 y Zeos)

Yo estoy haciendo una aplicación con una tabla contable DEBE, HABER y SALDO, sin problemas y ya solucionado los inconvenientes de la consulta,
como se puede leer y mi post sobre el asunto http://www.clubdelphi.com/foros/showthread.php?t=54058

Ahora bien, la consulta me ha quedado así, y funcionando perfectamente:

Código SQL [-]
select id_caja, fecha, concepto, cantidad, debe, haber, (debe - haber) as saldo, categoria,  
(
select sum(debe-haber) from caja t where t.fecha<= caja.fecha
) as acumulado
from caja
order by fecha

Pero... lo que quiciera hacer, es poder cambiar de moneda, por ejemplo a dolar.
Yo cuento con una variable tipo Currency o String (StrToCurr o CurrToStr, me da lo mismo) con el valor del cambio a dólar, pero no se como ingresarlo para calcularlo dentro de la consulta, por ejemplo y a groso modo (como para que se entienda la idea nomas...)

Código Delphi [-]
dolar:='2,5';
dolar_SQL:='
select id_caja, fecha, concepto, cantidad, debe, haber, (debe - haber) as saldo, categoria, (debe*'+dolar+') as ddebe, (haber*'+dolar+') as dhaber,
(
select sum((debe-haber) from caja t where t.fecha<= caja.fecha
) as acumulado, (acumulado*'+dolar+') as dacumulado
from caja
order by fecha';

Pero me tira un lindo error cuando paso el numero como variable:

si yo hago

Código Delphi [-]
((debe)*2.5) as dolar

me lo toma valido, pero si hago

Código Delphi [-]
((debe)*'+dolar+') as dolar

ahi me tira error. Porque?


Como puedo hacer para calcular esa consulta pasando DEBE, HABER y SALDO a dolar, desde mi moneda???

Saludos y gracias
__________________
Código Delphi [-]
 
try 
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;

Última edición por MaMu fecha: 10-03-2008 a las 03:53:02.
Responder Con Cita