Problème avec AsInteger sur appel de procédure stockée

Bonjour à tous,

j'utilise Delphi 6 avec Oracle 9.2 et mon code retourne des erreurs lors d'appel de procédures stockées avec le composant TSqlStoredProc (sp).

Précisément, Delphi retourne une exception "EBcdOverflowException", lorsque j'utilise l'un des codes suivants

Code:

---

1 2	sp.params[0].AsInteger := IntVal; (valeur integer) sp.execproc; ---> error

---

ou

Code:

---

1 2 3

Params[0].DataType := ftInteger; sp.params[0].Value := IntVal; sp.execproc; ---> error

---

ou

Code:

---

1 2	sp.parambyname('xxx').AsInteger := IntVal; sp.execproc; ---> error

---

Par contre, je n'ai pas d'erreur avec le code suivant

Code:

---

1 2	sp.params[0].Value := IntVal; (valeur integer) sp.execproc; ---> OK

---

ou

Code:

---

1 2	sp.params[0].AsString := StrVal; (valeur string) sp.execproc; ---> OK

---

Selon vous, pourquoi mon code ne marche-t-il pas avec AsInteger ?


Remarques:
1- sp.params[0].Value := IntVal;
sp.execproc;

ne retourne pas d'erreur pour des valeurs IntVal allant de 1 à 5
et retourne une erreur pour des valeurs > 5

2- ce même code (càd sp.params[0].AsInteger := IntVal) marche avec une base Interbase


Merci de votre aide

En poursuivant mes recherches et avec l'aide d'autres forums, je progresse...

Le problème vient du fait que le DataType du paramètre Params[0] est ftBCD.
En faisant params[0].AsInteger, le DataType est changé ce qui provoque une exception.

Mais je ne comprend toujours pas pourquoi params[0].Value marche sans exception.

Ceci dit, la vrai solution à mon problème serait de pouvoir utiliser params[0].AsInteger et donc d'avoir le son DataType à ftInteger.

Avez-vous une solution ?

Encore de votre aide.