FB 2.5, comment empêcher les doublons par déclencheur ? [Résolu]

[Just-Soft]

Salut

sur une table qui n'a pas de clé primaire, je voudrais empêcher l'ajout de lignes en double alors j'ai pensé à contrôler ça dans le before insert et update de cette table. mon idée étant de parcourir la table en faisant une recherche sur 4 champs, si le nombre de lignes retournés et supérieur à 0 une exception est déclenchée.

voici le déclencheur responsable de cette manip :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
CREATE OR ALTER TRIGGER tb_frais_exploitations_bi0 FOR tb_frais_exploitations
active before INSERT position 0
AS
    declare variable date_m date;
    declare variable c_centre smallint;
    declare variable c_secteur smallint;
    declare variable c_sr smallint;
    declare variable c_step smallint;
 
begin
  /* sélectionner les champs qui ne peuvent être en double une fois réunis */
  SELECT date_mois, code_centre, code_secteur, code_sr, code_step
 
  FROM tb_frais_exploitations a
 
  WHERE (      a.date_mois = new.date_mois
        AND a.code_centre = new.code_centre
        AND a.code_step = new.code_step
        AND a.code_sr = new.code_sr
        AND a.code_secteur = new.code_secteur )
 
  INTO  :date_m,
        :c_centre,
        :c_secteur,
        :c_sr,
        :c_step;
 
  /* rechercher la ligne correspondante, si trouver alors générer l'exception */
  IF ( row_count > 0) then exception Ligne_En_double;
 
end

malheureusement je n'intercepte rien ! peut-être que row-count a des restrictions dont je connais pas ?

une idée, une piste .... merci par avance.

[SergioMaster]

Plutôt qu'un rowCount , un simple Count dans ta requête devrait suffire

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
CREATE OR ALTER TRIGGER tb_frais_exploitations_bi0 FOR tb_frais_exploitations
active before INSERT position 0
AS
    declare c Integer;
begin
  /* sélectionner les champs qui ne peuvent être en double une fois réunis */
  SELECT Count(*) AS C
 
  FROM tb_frais_exploitations a
 
  WHERE (      a.date_mois = new.date_mois
        AND a.code_centre = new.code_centre
        AND a.code_step = new.code_step
        AND a.code_sr = new.code_sr
        AND a.code_secteur = new.code_secteur )
 
  INTO  :C
  /* rechercher la ligne correspondante, si trouver alors générer l'exception */
  IF ( C > 0) then exception Ligne_En_double;
 
end

Ceci dit , pourquoi ne pas mettre un Index Unique ?

[Just-Soft]

Envoyé par SergioMaster

[/code]Ceci dit , pourquoi ne pas mettre un Index Unique ?

et dire qu'hier j'ai passé la journée toute entière à essayer la clé unique mais j'avais une erreur incompréhensible

merci serge, ça marche très bien avec cette fameuse clé unique