Discussion :

[lina87]

bonjour tout le monde
J'ai un petit problème
J'ai une interface consulter commission
La commission est constituée de plusieurs membres
Je veux que l'utilisateur consulte une commission à partir d'un lov et il peut consulter seulement comme il peut modifier ou supprimer cette commission a partir de 2 boutons "supprimer" et "modifier "
lorsque il clique sur un bouton "choisir commission"
lov ,qui contient code commission et libellé commission, apparait
L'utilisateur choisit la commission le système affiche la commission dans un formulaire et les membres de cette commission dans un tabulaire
-J'ai fais une relation maitre detail et tous les champs basés mais ça sert à rien
-J'ai fais ce code dans le déclencheur when_boutton _pressed

Code :

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

1
2
3
4
enter_query();
if show_lov('lov_com') then
execute_query();
end if;

mais ça ne marche pas aussi il me dit voulez vous enregistrer les modification et ce n'est pas mon but,
-J'ai fais aussi 2 curseurs dans le même déclencheur mais il affiche seulement dans la première ligne le dernière membre peut être parce qu'il n'insert que dans la première ligne et il ne passe pas à la 2 em ligne je met ce code:

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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
declare
   cursor com is
		select code_commission,lib_commission,date_commission,code_type_commission
		from commission
		where code_commission= :COMMISSION.CODE_COMMISSION;		
 
	Cursor Mem is
		Select matricule,code_commission
		from membre
		where  code_commission= :COMMISSION.CODE_COMMISSION;
begin
if show_lov('lov_com') then
 
	open com;
		fetch com into :COMMISSION.CODE_COMMISSION,:COMMISSION.LIB_COMMISSION, 
                :COMMISSION.DATE_COMISSION,:COMMISSION.CODE_TYPE_COMMISSION;
	          if com%found then
		      open Mem;		
		          loop	
		               fetch Mem into :MEMBRE.MATRICULE,:MEMBRE.CODE_COMMISSION;	
 
		           Exit When Mem%NOTFOUND ;		
 
		         end loop;
 
	          end if;
 
        close com;
	Close Mem;
 
end if;
end;

j'ai pas trouvé comment passer vers next record pour insérer l'enregistrement suivant à fin d'afficher tous les membres.
j'ai essayé plusieurs fois mais je n'ai pas trouvé la solution
Je suis débutant avec oracle Forms
s'il vous plais j'ai besoin d'une solution au plus tôt possible
Merci d'avance.

[hdmea]

Bonjour,

Je vous propose d'ajouter un bouton "Consultation" avec les deux autres boutons "Suppression" et "Modification". Supprimer ENTER_QUERY du bouton lov, et le mettre dans le bouton consultation.