Hola.
Si realizo la siguiente consulta en la base de datos MySql obtengo un valor double con enteros y decimales. (91,20 y 110,70)
SELECT sum(`ING`) as Ing, sum(`GTO`) as Gto FROM `caja` where.....
Pero en el recordset solo hay enteros y no hay decimales (91, 110,)
¿ porqué puede ser ?
.IntegerValue = no decimales
DatabaseField.DoubleValue ?
Si
[code]
dim rs as RecordSet = DBcaja.cajaSumaEnti1(idSel)
dim d As Double
if rs <> nil then
d = rs.field(“Ing”).DoubleValue
tfIng.Text = format(d, “#####0.00 \”)
d = rs.field(“Gto”).DoubleValue
tfGto.Text = format(d, “#####0.00 \”)
tfSaldo.Text = format(rs.field("Ing").DoubleValue - rs.field("Gto").DoubleValue, "#####0.00 \\")
end if[/code]
La variable d la uso solo para debugear y ver lo que contiene. Sino udaria el rs directamente en el format.
Tanto en rs como en d no hay decimales.
Yo uso el traductor de google (translate.google.com): No estoy hablando espahnol.
No entiendo por qu.
Trate de usar d1 y d2, a continuacin, muestra estos valores en un MsgBox (Format) para verificar que el debuger da buenos valores.
Cules son los valores que se muestran en el campo de texto (TextFields: tfIng & tfGto)?
SQLite?
Hola Cecilio,
¿Cómo están definidas las columnas de la base de datos MySQL? ¿Cual es la sentencia SQL para obtener el RecordSet?
Saludos,
Javier
Tanto Ing como Gto son de tipo Double en MySql.
Y la consulta es:
dim sql As String = “SELECT sum(ING
) as Ing, sum(GTO
) as Gto FROM caja
where paciente_id = 1”
return App.db.SQLselect(sql)
No uso PreparedStatement porque la id nunca la proporciona un usuario.
Saludos
CREATE TABLE <TABLE_Name>(Ing DOUBLE,
?
CREATE TABLE caja
(
id
Smallint( 10 ) AUTO_INCREMENT NOT NULL,
Fecha
Date NOT NULL,
Descripcion
VarChar( 80 ),
ING
Double( 10, 2 ) NOT NULL DEFAULT ‘0.00’,
GTO
Double( 10, 2 ) NOT NULL DEFAULT ‘0.00’,