Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 24-08-2016
ronimaxh ronimaxh is offline
Miembro
 
Registrado: jun 2003
Ubicación: Rep. Dominicana
Posts: 307
Poder: 23
ronimaxh Va por buen camino
Parece que no me di a entender bien, lo quiero saber es: registrar dolores o registrar euros aquí hay una diferencia en la forma como quedarían guardados, ejemplo 1,500.00 (dolares o pesos) y en euro seria 1.500,00 como se puede manejar eso.
__________________
ronimaxh
Rep. Dominicana
Responder Con Cita
  #2  
Antiguo 24-08-2016
Avatar de mamcx
mamcx mamcx is offline
Moderador
 
Registrado: sep 2004
Ubicación: Medellín - Colombia
Posts: 3.939
Poder: 27
mamcx Tiene un aura espectacularmamcx Tiene un aura espectacularmamcx Tiene un aura espectacular
Lo mas simple es crear una columna por cada denominacion, si tienes una lista fija. Si no, haces una relacion uno a muchos y creas una fila por cada denominacion
__________________
El malabarista.
Responder Con Cita
  #3  
Antiguo 24-08-2016
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Como te dije antes, no es Firebird quién debe encargarse de los formatos de presentación sino el lenguaje, revisa las variables globales:
Un ejemplo:
Código Delphi [-]

procedure SetMoney(Euro: Boolean = False);
begin
  if Euro then
  begin
    ThousandSeparator := '.';
    DecimalSeparator  := ',';
  end
  else
  begin
    ThousandSeparator := ',';
    DecimalSeparator  := '.';
  end;
end;

procedure TForm1.btnDolarClick(Sender: TObject);
begin
  SetMoney; // dolar-peso
end;

procedure TForm1.btnEuroClick(Sender: TObject);
begin
  SetMoney(True); // euro
end;

var
  Monto: Double = 1500.99;

procedure TForm1.btnShowClick(Sender: TObject);
begin
  ListBox1.Items.Add( FormatFloat(',0.00', Monto) );
end;
Podes asegurar que no se cambie el formato durante la ejecución mediante:
Código Delphi [-]
Application.UpdateFormatSettings := False;

También te va a resultar útil la informacion y consejos de este hilo: float con coma (,) o punto (.)

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #4  
Antiguo 24-08-2016
ronimaxh ronimaxh is offline
Miembro
 
Registrado: jun 2003
Ubicación: Rep. Dominicana
Posts: 307
Poder: 23
ronimaxh Va por buen camino
Gracias amigos ahora si tengo una idea clara.
__________________
ronimaxh
Rep. Dominicana
Responder Con Cita
  #5  
Antiguo 24-08-2016
Avatar de Ferrari
Ferrari Ferrari is offline
Miembro
 
Registrado: jun 2006
Ubicación: Torreón, México
Posts: 154
Poder: 20
Ferrari Va por buen camino
Wink Eficsa 4 President....

Coincido con eficsa.....!!!
Responder Con Cita
  #6  
Antiguo 24-08-2016
Avatar de AgustinOrtu
[AgustinOrtu] AgustinOrtu is offline
Miembro Premium
NULL
 
Registrado: ago 2013
Ubicación: Argentina
Posts: 1.858
Poder: 17
AgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en bruto
Estas a tiempo de no usar un valor primitivo para representar dinero.

Yo justamente por eso ahora tengo planeada una refactorizacion bastante grande. En la mayoría de los modelos, los tipos primitivos léase string, float, integer, etc, no son adecuados para representar objetos del modelo

Lo más adecuado es usar clases que encapsulen ese comportamiento. De esa manera vas a poder realizar conversiones desde hasta en cualquier momento y fácilmente

Acá se explica más detenidamente este "mal olor" o potencial problema conocido como "primitive obsession" o en español algo así como "abuso de tipos primitivos"

http://blog.ploeh.dk/2011/05/25/Desi...tiveObsession/

http://blog.ploeh.dk/2015/01/19/from...ain-modelling/

De esta forma centralizas: conversión a string, cambio de moneda, equivalencias, redondeo, validaciónes, parseo de string, etc
Responder Con Cita
  #7  
Antiguo 24-08-2016
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
En la base de datos, como te han indicado, un valor numérico decimal o currency, y la base de datos lo guardará como crea oportuno. Luego eres tú quien presentará en pantalla ese dato como más te convenga.
Date cuenta que tu pregunta es lo mismo que: quiero guardar cantidad de manzanas, peras y limones: 5 peras, 6 manzanas, 8 limones.
Tú guardarás directamente un número 5, 6, 8 o la cantidad que sea. Luego en pantalla mostrarás la descripción del producto: peras, manzanas, tomates o pimientos.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Problema con tipos numericos en FIREBIRD/ORACLE agidar Conexión con bases de datos 0 07-06-2011 16:51:38
Formato moneda Firebird 2.1 santiago14 Firebird e Interbase 18 27-03-2011 01:26:29
La moneda falsa Héctor Randolph Humor 8 25-11-2005 15:22:11
tipos en firebird Ivanzinho Firebird e Interbase 2 16-03-2005 10:11:49
campos moneda Giniromero Tablas planas 2 18-11-2003 12:08:15


La franja horaria es GMT +2. Ahora son las 11:00:38.


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