Discussion :

[enjoy]

Bonjour à tous,

j'ai un problème avec forms et j'aurais besoin d'aide

Mon problème est le suivant:

J'ai une table PROJETS dont la clé primaire est ID_PROJET
J'utilise FORMS afin de pouvoir saisir des données dans cette table.
Or je souhaite que lors de la saisie, on ait pas besoin d'entrer ID_PROJET et que cette clé s'incrémente automatiquement.

Je valide la saisie via un bouton OK.
J'ai donc cherché à mettre un trigger when button pressed:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
declare 
 
n number;
 
Begin
select max(ID_PROJET) into n from projets;
insert into projets 
(ID_PROJET,NUM_PROJET,ANNEE,NB_MAX_GROUPES)
values(n,:num_projet,:annee,:nb_max_groupes);
commit;
end;

Cependant cela ne marche pas...
Si quelqu'un pouvait m'aider...
Merci

[SheikYerbouti]

Créez une séquence et utilisez-la dans le trigger PRE-INSERT de votre bloc.

Code :

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

CREATE SEQUENCE ma_sequence ;

Trigger PRE-INSERT:

Code :

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

Select ma_sequence.nextval Into :mon_bloc.ma_colonne_pk ;

[Donaldo]

Bizarre je fais exatement ça sur Forms 10g et ça ne fonctionne pas du tout.
Quand je veux enregistrer il me dit erreur aucun numero de saisi.

Donaldo

[e77em]

je pense que tu a oublié de mettre max +1

Code :

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

1
2
3
4
5
6
7
8
9
10
11
declare
 
n number;
 
Begin
select max(ID_PROJET) +1 into n from projets;
insert into projets
(ID_PROJET,NUM_PROJET,ANNEE,NB_MAX_GROUPES)
values(n,:num_projet,:annee,:nb_max_groupes);
commit;
end;

[plaineR]

Cependant cela ne marche pas...

Eh bien nous voilà bien avancé... Il n'y a pas une erreur ? Sinon qu'entends tu par "ça ne marche pas" ?

Enfin le select max est quand même à éviter sur un trigger PRE-INSERT, car ce trigger est exécuté pour chaque ligne insérée et si ta table projets a un volume important, les perf. ne vont pas être terribles.

Comme te l'a suggéré SheikYerbouti, utilise plutôt une séquence si la numérotation peut comporter des trous.

[Donaldo]

Tout simplement quand je saisie une fiche, le numéro qui doit se mettre automatiquement ne se met pas.
J'ai suivi ce que SheikYerbouti a fait.

Donaldo

[salim11]

Bonjour ,

J'ai essayé ce code est ca marche bien , mais il faut utiliser forms_ddl pour effectuer l'insert et le commit au niveau de la base
when new_record_instance ou tu peux utiliser le pre_insert comme il a mentionné Mr Sheik Yerbouti avec une séquence

Code :

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

1
2
3
4
5
6
7
8
9
 
declare 
n number:=0;
Begin
if :system.record_status in ('INSERT','NEW') THEN 
	SELECT max(ID_PROJET) +1 INTO n FROM projets;
	:ID_PROJET:=N;
END IF;
END ;

et dans le when_button_presse

Code :

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

1
2
3
4
5
6
7
8
9
 
Begin
FORMS_DDL('INSERT INTO projets (ID_PROJET,NUM_PROJET,ANNEE,NB_MAX_GROUPES)
         VALUES(:ID_PROJET,:num_projet,:annee,:nb_max_groupes)';
FORMS_DDL('commit');
COMMIT_FORM;
 
end;
end;

[salim11]

Bonjour ,

mais tu peux mettre tout le code dans le when-button-pressed mais tu vois le numero de ID_PROJET uniquement quand tu presses sur le boutton OK

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
declare 
n number:=0;
Begin
	SELECT max(ID_PROJET) +1 INTO n FROM projets;
:ID_PROJET:=N;
FORMS_DDL('INSERT INTO projets
              (ID_PROJET,NUM_PROJET,ANNEE,NB_MAX_GROUPES)
             VALUES(:ID_PROJET,:num_projet,:annee,:nb_max_groupes)');
FORMS_DDL('commit');
COMMIT_FORM;
end;