Discussion :

[Devarion]

Bonjour à tous, dans le cadre d'un projet, je dois réaliser une procédure en PL/SQL sous oracle permettant d'afficher la liste des factures impayées depuis plus de deux mois.
J'ai donc réalisé la commande suivante :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
CREATE OR REPLACE PROCEDURE fact_imp
(
mailc OUT client.mail_client%type
)
AS
BEGIN
	SELECT mail_client into mailc
	FROM COMMANDE, COMMANDE_PRODUIT, CLIENT
	WHERE to_char(to_date(sysdate) - to_date(date_commande)) > 70
	AND commande.id_commande = commande_produit.id_commande
	AND commande.id_client = client.id_client
	AND bool_produit_regle = 1;
END;
/

Il m'annonce que la procédure a été créée avec succès mais une fois que j'essaie de l’exécuter j’obtiens l'erreur :

BEGIN fact_imp; END;
*
Erreur à la ligne 1
ORA-06550 : Ligne 1,colonne 7
PLS-00306 : numéro ou type d'arguments erronés dans l'appel à fact_imp
ORA-06550 : Ligne 1, colonne 7:
PL-SQL : statement ignored

Pouvez vous m'aider ?

[al1_24]

Tu as déclaré ta procédure avec un argument, il faut donc l'appeler en précisant cet argument

[Devarion]

Oui mais moi je veux que ce soit juste une liste des commandes non payés, mais comme il faut INTO lors d'un SELECT dans une procedure, je n'ai pas eu le choix.
En effet, tous les clients qui ont une commande dite impayée, on verra alors la liste de leurs adresses mail.

Comment dois je faire alors ?

[mnitu]

Utilisez un ref curseur

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
 
Connected to Oracle Database 10g Enterprise Edition Release 10.2.0.4.0 
Connected as mni
 
SQL> 
SQL> Create Or Replace procedure fact_imp
  2  (
  3    rc OUT sys_refcursor
  4  )
  5  Is
  6  Begin
  7    Open rc for
  8        Select e.email
  9          FROM hr.employees e
 10         Where sysdate - to_date(e.hire_date) > 70
 11           And e.department_id = 20;
 12  End;
 13  /
 
Procedure created
 
SQL> variable rc refcursor
SQL> exec fact_imp(:rc)
 
Procédure PL/SQL terminée avec succès.
 
SQL> print rc
 
EMAIL
-------------------------
MHARTSTE
PFAY