Discussion :

[Xanime]

Bonjour,

j'aimerais incrémenter automatiquement une valeur dans une table et qu'elle s'incrémente également dans une autre table.
Voici mon code actuel qui ne fonctionne pas:

les 2 première partie marche

/*Création d'une séquence d'auto incrémentation */
CREATE SEQUENCE seq_autoIncrementOrdeCadre
START WITH 1
MAXVALUE 999999999999999999999999
MINVALUE 1
NOCYCLE
NOCACHE
NOORDER;

/*Création d'un déclencheur */
CREATE TRIGGER autoIncrementOrdeCadre
BEFORE INSERT
ON cadre
FOR EACH ROW
BEGIN
SELECT seq_autoIncrementOrdeCadre.NEXTVAL
INTO :NEW.ordre_cadre
FROM dual;
END ;
/

j'ai une erreur à partir d'ici:

/*Création d'un déclencheur */
CREATE TRIGGER autoIncrementOrdeCadreLigne
BEFORE INSERT
ON cadre_ligne
FOR EACH ROW
BEGIN
SELECT seq_autoIncrementOrdeCadre.NEXTVAL
INTO :NEW.ordre_cadre
FROM dual;
END ;
/

[Nounoursonne]

mouais, ça doit venir de la ligne 12

[kalyparker]

Bonjour,

Quelle est l'erreur que tu as ?

Essaye de faire un curval avant de faire le nextval (pas sure que ça change quelques chose, mais juste pour voir)

voili, voilou

[deadoralive]

Bonsoir,

Tu dois récupérer la séquence dans une variable, puis utiliser cette variable.

Cdt

[deadoralive]

Bonjour,

J'ai retrouvé un script qui explicite la méthode

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
create or replace trigger TRG_TOTO before insert
on TOTO for each row
declare
    integrity_error  exception;
    errno            integer;
    errmsg           char(200);
    no	number;
begin
    select seq_toto.nextval into no from dual;
    :new.toto_id := no;
 
--  Traitement d'erreurs
exception
    when integrity_error then
       raise_application_error(errno, errmsg);
end;
/

Cdt

[Xanime]

Bonjour,

Je ne parvient pas à comprendre les lignes suivantes:
select seq_toto.nextval into no from dual;
:new.toto_id := no;

pouvez vous m'expliquer ce qu'elles font ?

[deadoralive]

au lieu de faire l'affectation directement dans la variable :new référencant la table

Code :

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

1
2
3
4
 
SELECT seq_autoIncrementOrdeCadre.NEXTVAL
INTO :NEW.ordre_cadre
from dual;

il faut passer par une variable intermédiaire

Code :

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

1
2
3
4
5
6
 
SELECT seq_autoIncrementOrdeCadre.NEXTVAL
INTO no
from dual;
 
:NEW.ordre_cadre := no;

je ne peux pas être plus clair, sinon il y a des cours de Plsql ...

Cdt

[McM]

(c'est l'icone # dans l'éditeur de message).

Tu dis avoir une erreur, mais on ne sait pas laquelle, à quel moment, etc..
Fais un Show_error; lorsque tu compiles tes triggers ou ta séquence.

[Xanime]

Bonjour,

SQL PLUS indique qu'il y a une erreur de compilation.

[plaineR]

Tu dis avoir une erreur, mais on ne sait pas laquelle, à quel moment, etc..
Fais un Show_error; lorsque tu compiles tes triggers ou ta séquence.

[deadoralive]

Essaye au moins les solutions que l'on te donne, je suis sûr que ça marche, car extrait d'une de mes applis.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
CREATE TRIGGER autoIncrementOrdeCadreLigne
BEFORE INSERT
ON cadre_ligne
FOR EACH ROW
DECLARE
no number; 
BEGIN
SELECT seq_autoIncrementOrdeCadre.NEXTVAL
INTO /*:NEW.ordre_cadre*/ no
FROM dual;
:NEW.ordre_cadre := no ;
END ;

[Xanime]

OK c'est bon ça fonctionne maintenant.
Merci