bonjour tout le monde,
j'ai un petit probleme avec un curseur, tout d'abord je vous explique la situtation, je realise une application de gestion d'une bibliotheque numérique et lorsqu'un utilisateur souhaite consulter un document il il dois etablir une demande qui sera par la suite stocké dans une table ACCES(nom,prenom,code_document,titre_document, decision ), et moi en tant que responsable je dois lui autorisé l'accès dans le champs décision, donc je lui met (O) pour OUI, qui été par défaut (I) pour INSTANCE.
le problème se pose dans le bouton d'ouverture qui contient un code pour tester le champs décision avec un curseur parametré( nom,prenom,code_document) car le document ne s'ouvre pas, voila la partie de code et merci j'attend avec impatience votre aide.
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
33
DECLARE
   	  v_decision   acces.decision%type; 	  
 	    a varchar2(100);	   	
	    b varchar2(100);
   cursor couper_cursor is
	 	  select decision
	 	  from   acces
	 	  where :global.nom=nom and  :global.prenom=prenom and :B2.code=code;
BEGIN
			open couper_cursor;
		 	 loop
			    fetch couper_cursor into v_decision;
			    exit when couper_cursor%notfound;
		 	 end loop;
		 	 close couper_cursor;
			 	b := user;
	  if b='SPECIAL' then v_decision := 'O';
	  end if;
	  	if v_decision = 'I' then
			 	message('VOTRE DEMANDE EST EN INSTANCE' );
			 	message('VOTRE DEMANDE EST EN INSTANCE' );
			elsif v_decision = 'N'then
				  message('VOTRE DEMANDE A ETE REFUSEE ' );
				 	message('VOTRE DEMANDE A ETE REFUSEE' );
		  elsif v_decision = 'O'then		  	 
					a:='cmd /C start'||:B2.dossier||:B2.fichier;
					host(a);
		   else 
        	insert into acces(nom,prenom,grade,unite,service,code_document,decision) 
        	values(:global.nom,:global.prenom,:global.grade,:global.unite,:global.service,:B2.code,'I');
	          commit;
		  end if;		   
END;