Discussion :

[akli_agha]

Bonjour à tous,

Il m'est arrivé une bizarrerie à laquelle je n'ai rien compris !

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
           SQL.Text := 'INSERT INTO T_STK_INIT '+
                       '      (ID_ART, ID_DEPOT, DLC, '+
                       '       DATE_SLD, QTE, P_UNIT) '+
                       'VALUES(:ID_ART, :ID_DEPOT, :DLC, '+
                       '       :DATE_SLD, :QTE, :P_UNIT)';
 
            ParamByName('ID_ART').AsInteger      := 1323;
            ParamByName('ID_DEPOT').AsInteger  := -1;
            ParamByName('QTE').AsCurrency        := 12;
            ParamByName('P_UNIT').AsCurrency     := 84;
            ParamByName('DATE_SLD').AsDateTime := StrToDate('01/01/2023');
            ParamByName('DLC').Clear;
            ExecSQL;

Cette requête ne m'insère pas l'enregistrement dans ma base de données alors qu'il s'insère très bien dans une autre base, de même description !!

Une idée ??

Win 10, D7, FB 2.5, Zeos 7.2

[SergioMaster]

Une contrainte quelconque qui n'est pas respectée (clé en double etc...)

[al1_24]

Bonjour,

Toute requête qui ne se termine pas correctement émet un message d'erreur.
Il est important de le récupérer pour pouvoir comprendre l'anomalie et envisager sa correction.

[akli_agha]

J'essaie d'insérer un seul record et je n'ai aucun message d'erreur !!

[SergioMaster]

Il serait quand même simple de faire le test via un GUI quelconque, ou de vérifier que l'enregistrement n'existe pas déjà dans la BDD mais aussi de vérifier l'état de santé de la base de données "fautive"

[akli_agha]

Merci Sergio.

Evidemment que j'ai essayé avec Flame Robin et c'est pareil !!! La base vient d'être créée !