Bonjour Bernard Marcelly,

desole pour le manque d'info. je suis sous ubuntu hoary 5.04 avec la derniere update. OOo 1.1.3 est installe (je cherche une version stable). je dois avoir une 1.1.4 sur une knoppix dans le coin.

le probleme est general au passage de res. mysql aux vars OOBasic. pour l'instant, en passant par val(string), j'arrive tout juste a recuperer la "partie entiere", comme si j'avais accede au champ .Short!

d'autant plus que je ne peux pas faire confiance au calcul flottant.

le contournement a consiste a multiplier par 100...

decimal(12,2)

mysql Ver 12.22 Distrib 4.0.23, for pc-linux-gnu (i386)

oui, je suis en Option Explicit

tronquer au sens mathematique: 13.45 est une troncature de 13.4512. on appelle ca arrondi, aussi.

qu'a cela ne tienne!

=====mysql====== mysql> desc mouvements_clients; +-----------------------------------+------------------+------+-----+---------+----------------+ | Field | Type | Null | Key | Default | Extra | +-----------------------------------+------------------+------+-----+---------+----------------+ | idmouvements_clients | bigint(20) | | PRI | NULL | auto_increment | | responsabilites_idresponsabilites | bigint(20) | | MUL | 0 | | | clients_idclients | int(10) unsigned | | MUL | 0 | | | acompte | decimal(12,2) | YES | | NULL | | | debit | decimal(12,2) | YES | | NULL | | | credit | decimal(12,2) | YES | | NULL | | +-----------------------------------+------------------+------+-----+---------+----------------+ 6 rows in set (0.00 sec)

mysql> select * from mouvements_clients where responsabilites_idresponsabilites=7 and clients_idclients=1; +----------------------+-----------------------------------+-------------------+---------+----------+--------+ | idmouvements_clients | responsabilites_idresponsabilites | clients_idclients | acompte | debit | credit | +----------------------+-----------------------------------+-------------------+---------+----------+--------+ | 40 | 7 | 1 | 0.00 | 145.75 | 0.00 | | 41 | 7 | 1 | 0.00 | 15000.90 | 0.00 | +----------------------+-----------------------------------+-------------------+---------+----------+--------+ 2 rows in set (0.01 sec)

mysql> select (sum(acompte)-sum(debit)+sum(credit)) from mouvements_clients where mouvements_clients.responsabilites_idresponsabilites=7 and clients_idclients=1; +---------------------------------------+ | (sum(acompte)-sum(debit)+sum(credit)) | +---------------------------------------+ | -15146.65 | +---------------------------------------+ 1 row in set (0.00 sec)

=====mysql======

===mysqldump=== DROP TABLE IF EXISTS `mouvements_clients`; CREATE TABLE `mouvements_clients` ( `idmouvements_clients` bigint(20) NOT NULL auto_increment, `responsabilites_idresponsabilites` bigint(20) NOT NULL default '0', `clients_idclients` int(10) unsigned NOT NULL default '0', `acompte` decimal(12,2) default NULL, `debit` decimal(12,2) default NULL, `credit` decimal(12,2) default NULL, PRIMARY KEY (`idmouvements_clients`), KEY `mouvements_clients_FKIndex1` (`clients_idclients`), KEY `mouvements_clients_FKIndex2` (`responsabilites_idresponsabilites`) ) TYPE=MyISAM;

INSERT INTO `mouvements_clients` VALUES (40,7,1,'0.00','145.75','0.00'); INSERT INTO `mouvements_clients` VALUES (41,7,1,'0.00','15000.90','0.00'); ===mysqldump===

on pourra enlever les lignes contenant les cles etrangeres.

on voit bien que le probleme est externe a mysql.

maintenant le code Basic:

================ Public maConnexion

Dim maRequete As Object Dim res as Object Dim sSQL As String,sSQL100 As String Dim str_solde As String, str_solde100 As String Dim solde As Currency, solde100 As Currency

ConnecterSource()

sSQL="select (sum(acompte)-sum(debit)+sum(credit)) from mouvements_clients where mouvements_clients.responsabilites_idresponsabilites=7 and clients_idclients=1" sSQL100="select (sum(acompte)-sum(debit)+sum(credit))*100 from mouvements_clients where mouvements_clients.responsabilites_idresponsabilites=7 and clients_idclients=1"

maRequete = maConnexion.createStatement() res=maRequete.executeQuery(sSQL) res.next

str_solde=res.Columns(0).String solde=val(str_solde)

maRequete = maConnexion.createStatement() res=maRequete.executeQuery(sSQL100) res.next

str_solde100=res.Columns(0).String solde100=val(str_solde100)/100

msgbox "str_solde=" & str_solde & chr(13) & "solde=" & solde & chr(13) & chr(13) & "str_solde100=" & str_solde100 & chr(13) & "solde100=" & solde100 ' str_solde="-15146", solde=-15146.0000, str_solde100="-1514665", solde100=-15146.6500 ================

peut-etre, mais la conversion us->fr se passe correctement. (les points sont convertis en virgules)

vrai

si, justement. un Int, Short ou Long ne garderont que la "partie entiere" (environ...) un Double pourrait etre imprecis pour le stockage d'un nombre a decimales.

__________________________________________________________

vrai, mais le code montre le lien.

hum, 1.1.3

le probleme est que le double perd deja l'information (cf la norme ieee du codage de flottant). c'est pour ca, que je ne veux pas passer par le calcul flottant.

je prends note.

est-ce qu'il y a une doc ou je pourrais evaluer le travail de migration 1.1.(3|4) -> 1.9 ?

j'ai vu ca. ;)

ou en est justement le statut de python pour OOo? j'imagine que java est pret depuis longtemps pour la production. je serais interesse de passer a ces deux langages, vu toutes les complications qu'on a eues a developper cette appli.

Ouf! c'etait un peu long.

merci beaucoup, snopie