Bonjour tous le monde
J’ai un problème avec un champs incrémentable sur BDD InterBase
J’ai suivi exactement un tutoriel trouvé Dans le site de Développez mais sa marche pas.
Voilà ma procédure
Code SQL : 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
18
19
20 /* Stored procedures */ CREATE PROCEDURE "PR_CHAUFEUR" ( "AVALUE" INTEGER ) AS BEGIN EXIT; END ^ ALTER PROCEDURE "PR_CHAUFEUR" ( "AVALUE" INTEGER ) AS Begin avalue=Gen_Id(GN_CHAUFEUR,0); end ^ SET TERM ; ^ COMMIT WORK; SET AUTODDL ON;
Code delphi : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 procedure TMDD.IB_ChauffeurBeforePost(DataSet: TDataSet); begin if (IB_Chauffeur.State=dsInsert) then Begin IBStoredProc1.ExecProc; IB_Chauffeur.FieldByName('NumChauf').AsInteger:=IBStoredProc1.FieldByName('AVALUE').AsInteger; end; end;
L’erreur qui m’affiche est comme suit :
Champ Avalue non trouvé
Ya t’il un problème sur ce que j’ai fait
Partager