Discussion :

[JamesP]

Bonjour,

Le titre est explicite, je souhaite passer un CURSOR en paramètre d'une procédure.

Je suis sous Oracle 10g.

J'ai écrit ce qui suit, mais j'ai un soucis de TYPE.
Quand je met "CURSOR" à la place de "SYS_REFCURSOR", ça ne marche pas non plus.

Le code en question :

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
SET serveroutput ON
 
DECLARE
 
  CURSOR INTERNAL_PATH_CURSOR IS
    Select 1 as id from dual
    union
    Select 10 from dual
  ; 
 
  myId INTEGER;
 
  PROCEDURE printRow( cur_lig IN SYS_REFCURSOR) IS
  BEGIN
     LOOP
       FETCH cur_lig INTO myId ;
       EXIT WHEN cur_lig%NOTFOUND ;
       dbms_output.put_line( 'Found : ' || myId ) ;
     END LOOP ;
  End;
 
BEGIN
 
  dbms_output.put_line( 'Trying procedure with cursor ...' ) ;
  printRow(INTERNAL_PATH_CURSOR);
 
END;
/

Merci à vous pour votre aide.

[mnitu]

Un curseur <> une variable curseur.

[JamesP]

Ok.

Merci pour l'info, mais je suis pas un expert PL/SQL, et malheureusement ça ne me fait pas avancer ...

Je cherche et teste, mais je sèche ...

[skuatamad]

Essaie comme ça :

Code :

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

printRow(cursor(select 1 as id from dual));

[JamesP]

Essaie comme ça :

Code :

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

printRow(cursor(select 1 as id from dual));

Le résultat :

Rapport d'erreur :
ORA-06550: Ligne 23, colonne 12 :
PLS-00405: sous-interrogation non autorisée dans ce contexte
ORA-06550: Ligne 23, colonne 3 :
PL/SQL: Statement ignored
06550. 00000 - "line %s, column %s:\n%s"
*Cause: Usually a PL/SQL compilation error.

[skuatamad]

Regarde sys_refcursor et essaie :

Code :

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

1
2
3
4
5
v_rc sys_refcursor;
...
 
open v_rc for INTERNAL_PATH_CURSOR;
printRow(v_rc);