Discussion :

[Lung]

A l'intérieur d'une boucle for, je fais appel à une TStoredProc pour exécuter une procédure stockée Oracle.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
      for i:=0 to Pred(ListeImportInventaire.Count) do
      begin
...
               try
...
                  StoredProcCorrectionInventaire.ParamByName('Ope').AsString := MainFormStocks._szUtilisateur;  
                  StoredProcCorrectionInventaire.ExecProc;
               except
                  on E: Exception do
                  begin
                     MainFormStocks.Database.Rollback;
                     Application.MessageBox(PChar('.Erreur :  la correction d''inventaire du produit dans le contenant a échoué !' + #13#10 + E.Message), PChar(Caption + ' - erreur'), MB_ICONERROR + MB_OK);
                     Exit;
                  end;
               end;
...
      end;

A un moment donné dans la boucle, j'obtiens l'erreur BDE suivante :

En fin de table

Je ne pense pas que le problème vienne de ma procédure stockée, car elle fonctionne bien (elle est utilisée ailleur sans problème), et Oracle ne me renvoit aucune erreur.

Google ne m'a pas trouvé d'explication pour cette erreur.

Quelqu'un a t'il déjà rencontré le problème ?

[TryExceptEnd]

C'est quant es tu débute ta transaction et quant es tu la commit ?

[SergioMaster]

je ne sais pas ce qu'est ListeImportInventaire ni Pred() d'ailleurs

mais en général dans une boucle du type for i=0 to qqchose.count c'est souvent .Count-1

[Lung]

C'est quant es tu débute ta transaction et quant es tu la commit ?

Je démarre ma transaction bien avant, et je la commit après le for.

je ne sais pas ce qu'est ListeImportInventaire ni Pred() d'ailleurs

mais en général dans une boucle du type for i=0 to qqchose.count c'est souvent .Count-1

ListeImportInventaire est une TObjectList.
Pred(UneListe.Count) (UneListe - 1)

Renvoie le prédécesseur de l'argument.

Unité

System

Catégorie

routines ordinales

function Pred(X);

Description

X est une expression de type ordinal (Int64 inclus). Le résultat, de même type que X, est le prédécesseur de X. N'utilisez pas Pred sur les propriétés de type ordinal si la propriété utilise une procédure Write.

Pred sert à la même chose.

[SergioMaster]

toutes mes excuses, je ne connaissais pas pred() , dommage c'était trop simple

[Rayek]

A l'intérieur d'une boucle for, je fais appel à une TStoredProc pour exécuter une procédure stockée Oracle.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
      for i:=0 to Pred(ListeImportInventaire.Count) do
      begin
...
               try
...
                  StoredProcCorrectionInventaire.ParamByName('Ope').AsString := MainFormStocks._szUtilisateur;  
                  StoredProcCorrectionInventaire.ExecProc;
               except
                  on E: Exception do
                  begin
                     MainFormStocks.Database.Rollback;
                     Application.MessageBox(PChar('.Erreur :  la correction d''inventaire du produit dans le contenant a échoué !' + #13#10 + E.Message), PChar(Caption + ' - erreur'), MB_ICONERROR + MB_OK);
                     Exit;
                  end;
               end;
...
      end;

A un moment donné dans la boucle, j'obtiens l'erreur BDE suivante :

Je ne pense pas que le problème vienne de ma procédure stockée, car elle fonctionne bien (elle est utilisée ailleur sans problème), et Oracle ne me renvoit aucune erreur.

Google ne m'a pas trouvé d'explication pour cette erreur.

Quelqu'un a t'il déjà rencontré le problème ?

Ne serait il pas mieux de fermer la procédure stockée avant de la relancer ?

Code :

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

1
2
3
4
5
6
7
 
 try
...
                  StoredProcCorrectionInventaire.Close;
                  StoredProcCorrectionInventaire.ParamByName('Ope').AsString := MainFormStocks._szUtilisateur;  
                  StoredProcCorrectionInventaire.ExecProc;
               except

Sinon, qu'est ce que te renvoi cette procédure stockée ?

[TryExceptEnd]

Si ça peut t'aider, l'erreur est de cette catégorie :

Object of Interest not Found

8705 : $2201 : At beginning of table.
8706 : $2202 : At end of table.

Essai de compter le nombre de fois que la procédure stockée est exécutée avant l'erreur, il se peut que soit un overflow en quelque sorte.

[Lung]

Ne serait il pas mieux de fermer la procédure stockée avant de la relancer ?

J'ai testé, mais ca ne change rien.

Sinon, qu'est ce que te renvoi cette procédure stockée ?

Elle fait appel à une autre procédure stockée qui remplie des tables.

[Lung]

Si ça peut t'aider, l'erreur est de cette catégorie :
Essai de compter le nombre de fois que la procédure stockée est exécutée avant l'erreur, il se peut que soit un overflow en quelque sorte.

C'est ce que je me suis dit aussi.

Et en fait, non. J'ai trouvé.
C'est fourbe comme erreur.

En fait, dans une sous-procédure Oracle, j'avais un petit select qui ne trouvait rien (dans un certain cas). Et comme je n'avais pas de test NO_DATA_FOUND dessus, je n'avais aucun message d'erreur Oracle.




Merci de vous être penché sur mon problème.

[javafr]

enfin j ai trouver la solution .. c 1 problème d indexation ..
vous devez spécifier un index correct .. pour moi j ai ajouter un champ num + et c tt..
bonne chance ...

[Papy214]

toutes mes excuses, je ne connaissais pas pred() , dommage c'était trop simple

J'en suis pas revenu
Toi un spécialiste de haut niveau ici ....
Il existe aussi Succ() qui renvoie le Succ(esseur)

ps: je me moque pas du tout .... je suis vraiment étonné

[SergioMaster]

J'en suis pas revenu

comme quoi tout arrive

Toi un spécialiste de haut niveau ici ....

si c'est ce que les lecteurs pensent détromper les ! je suis comme tout le monde avec beaucoup de doutes et de failles (plus profondes que des lacunes).Par exemple : Ne me demandez pas de jouer avec de pointeurs j'ai oublié de puis longtemps comment ça fonctionne.
Mon cerf-volant sans sa dose matinale de caféine est le pire (heureusement qu'il y a la touche F1 et ce forum, le pire c'est que quelques-fois ce sont mes propres réponses qui me donnent la solution )

Il existe aussi Succ() qui renvoie le Succ(esseur)
ps: je me moque pas du tout .... je suis vraiment étonné

j'ai découvert ça en 2008

en fait je ne comprend pas ce que vient faire le post de javafr qui a remonté ce post résolu ! j'ai l'impression que sa réponse n'est pas ua bon endroit