Discussion :

[obione]

Bonjour,

j'ai un progiciel client / serveur écrit sous delphi, utilisant firebird 1.5

Dans une procédure stockée, j'utilise la fonction round qui est incluse dans sous dossier UDF de firebird sur mon serveur (c:\MonAppliServeur\firebird_1_5\UDF).

c:\MonAppliServeur est partagé.
La base est stockée dans c:\MonAppliServeur\données\mabase.gdb

Quand je lance mon aplli sur le serveur, pas de soucis, ma procédure stocké, avec ma fonction UDF passe bien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT round(((CRT_NB - COALESCE(CRT_NB_GRATUIT,0)) * CRT_PRIX),2) MONTANT FROM CARTE_CRT ....

J'ai un poste client, dont mon exécutable ( le même que sur le serveur) est installé dans un dossier c:\MonAppliClient, accompagné de fbclient.dll, qui se connect avec les bons chemins sur mon serveur.
La connection à base de données est ok, mon logiel fonctionne correctement et execute mes ordres SQL sans soucis, SAUF ma procédure stocker qui me renvoi le message habituel de la fonction UDF non trouvé :

invalid request BLR at offset 553 : function ROUND is not defined. module name or entrypoint could not be found.

Evidemment, quand je regarde dans ma BDD, la fonction ROUND existe bien (en plus, elle marche sur le serveur).

J'ai ce pb chez plusieurs de nos clients, alors que la même installation fonctionne chez d'autres clients (et dans nos bureau evidemment)

je ne sais plus trop ou regarder !

Cordialement

[makowski]

il doit manquer des runtimes C++

[obione]

Bonjour,

c'est a dire ?

j'ai peut être une info de plus, le serveur est un windows 7, pas le poste client ....

Cordialement

[makowski]

c:\MonAppliServeur est partagé.

quelle idée !
surtout pas partager le répertoire où se trouve la base

J'ai un poste client, dont mon exécutable ( le même que sur le serveur) est installé dans un dossier c:\MonAppliClient, accompagné de fbclient.dll, qui se connect avec les bons chemins sur mon serveur.

cad, c'est quoi tes chaines de connection ?

[obione]

1> permet de lancer un executable sur le serveur a partir du poste client qui installe automatiquement le poste client !


2> sur le serveur :
dans un c:\installserveur,

- mon appli
- un param.ini avec les chemin d'accès a la base
- un sous répertoire firebird_1_5 avec l'install de firebird, avec des sous répertoires UDF .....
- un sous répertoires donnée avec ma GDB
- fbclient.dll
- firebird.msg
- gds32.dll (copie de fbclient.dll) dans c:\windows\system32
- msvcr71.dll
...

-> L'appli fonctionne correctement sur le serveur

sur mon client:
dans un c:\installclient,

- mon appli
- un param.ini avec les chemin d'accès a la base (\\MonServeur\C:\installserveur\donnees\)
- fbclient.dll
- firebird.msg
- gds32.dll (copie de fbclient.dll) dans c:\windows\system32
- msvcr71.dll
...

-> L'appli fonctionne correctement sur le client dans tous les cas, et mes fonctions UDF dans 98% des cas. reste les 2 % ou j'ai le message de ma fonction UDF non trouvée !
si je rappatrie la base sur une autre installation, c'est ok

[makowski]

un param.ini avec les chemin d'accès a la base (\\MonServeur\C:\installserveur\donnees\)

mon dieu quelle horreur

ta chaine de connexion DOIT être SERVEUR:base
avec serveur le nom de la machine ou son adresse ip
donc : MonServeur:C:\installserveur\donnees\mabase.fdb

utilise TCP/IP, tu ne t'en portera que mieux

[obione]

Je me connecte via delphi et les composant TSQLConnexion et le chemin a fournir est bein du type \\MonServeur\C:\installserveur\donnees\mabase.gdb !

Je n'arrive d'ailleurs pas a me connecter en tuilisant votre notation

[makowski]

ben avec Delphi 6 le code suivant est sans problème

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 SQLConnection1.Params.Values['Database'] := 'localhost:employee';
 SQLConnection1.Connected:=true;
 SQLConnection1.Connected:=false;
 SQLConnection1.Params.Values['Database'] := '127.0.0.1:employee';
 SQLConnection1.Connected:=true;
 SQLConnection1.Connected:=false;
 SQLConnection1.Params.Values['Database'] := '127.0.0.1:C:\FB21\examples\empbuild\employee.fdb';
 SQLConnection1.Connected:=true;
 SQLConnection1.Params.Values['Database'] := 'monserveur:C:\FB21\examples\empbuild\employee.fdb';
 SQLConnection1.Connected:=true;

avec bien sur les dns correctement configuré, c'est à dire qu'un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 ping monserveur

réponde correctement

[obione]

Le ping fonctionne bien, mais je ne me connecte pas avec votre solution, c'est dingue ça :

dbmain.ConnectionName:= 'IBConnection';
dbmain.DriverName:= 'Interbase';
dbmain.GetDriverFunc:='getSQLDriverINTERBASE';
dbmain.LibraryName:='dbxint30.dll';
dbmain.VendorLib := 'FBCLIENT.DLL'

dbMain.Params.Values['Database'] := '\\MonServeur\C:\installserveur\donnees\mabase.gdb';
dbmain.Params.Values['USER NAME'] := 'SYSDBA';
dbmain.Params.Values['PASSWORD'] := 'masterkey';
dbmain.Params.Values['SQLPASSTHRU MODE'] := 'SHARED AUTOCOMMIT';
dbmain.Params.Values['SQLDIALECT'] := '3';

ça ne fonctionne que comme ça ...

[makowski]

hum
tu utilise bien un serveur Firebird, pas la version embeded ?

[obione]

oui, d'ailleurs, je ne connaissais pas, je l'ai découvert en fouillant sur le net pour réoudre mon pb.
C'est une installation classique de firebird, si ce n'est que je l'execute avec l'option silencieuse puisqu'elle est intégrée au reste de l'installation de mon appli via istool !

Mais bon, vu que ça commence a me saouler, je pense que je vais laisser la fonction UDF Round de coté dans ma procédure stocké, et passer par un bon vieux cast qui me donnera le même résultat pour mon besoin !

merci de m'avoir aider a chercher en tout cas

[makowski]

o
Mais bon, vu que ça commence a me saouler, je pense que je vais laisser la fonction UDF Round de coté dans ma procédure stocké, et passer par un bon vieux cast qui me donnera le même résultat pour mon besoin !

et ce sera bien plus efficace en terme de ressources utilisées

[obione]

tant mieux !

merci pour tout