Discussion :

[draudrau]

Bonjour à tous,

J'ai une procédure stockée qui retourne comme résultat un curseur.
Voici la spec :
PROCEDURE R01DataRow (
Contrat IN VARCHAR,
Compte IN VARCHAR,
Chaine_Cpt IN VARCHAR,
Date_Debut IN String,
Date_Fin IN String,
Cursor_Row OUT Cur_R01DATA)

J'ai besoin de créer un script sql (appelé via sqlplus) qui exécute cette procédure, récupère le curseur et effectue une boucle sur ce curseur pour lire les données et les afficher (avec un dbms_output par exemple).

Je n'arrive pas à construire un script qui fasse cela.

Quelqu'un a-t'il une idée ?

Cordialement.

[philcero]

Pour ma part je ferais une procédure métier intermédiaire en PL/SQL qui fait l'appel, récupère le curseur et se charge de la sortie sur le dbms_output.

ensuite il n'y a plus qu'à appeler la procédure en ligne...

[rvfranck]

Salut,
Je ne comprends pas trop ce que tu fais. Tu utilises bien une procédure!!!
c'est quoi ce paramètre Cursor_Row? c'est lui qui contiendra les données que tu veux tourner en boucle dans ton script sql?

Pourquoi tu n'utilises pas une fonction qui va faire un "return ton_curseur" et après tu pourras faire comme ce qu'a proposé Philcero
a+

[draudrau]

En fait, la procédure stockée, c'est de l'existant.
J'en ai un paquet de procédures conçues comme ça (une quarantaine) qui ont toutes un paramètre de type OUT qui retourne un curseur.
Je ne dois pas toucher à ces procédures car elles sont exploitées par un progiciel.

J'ai besoin de récupérer le retour de ces procédures dans des fichiers plats.
C'est pour cela que je pensais faire un script sql.

Le paramètre Cursor_Row est de type REF CURSOR et permet de récupérer un curseur qui est créé par la procédure.

J'ai écris ce script mais syntaxiquement cela ne plait pas à oracle :
BEGIN
DECLARE
TYPE return_curs IS REF CURSOR
p_curs return_curs
BEGIN
R01.R01datarow('12345678','','','01/02/2008','',p_curs)
FOR curs_row IN p_curs
LOOP
DBMS_OUTPU.PUT_LINE(curs_row.type || ';' ||
curs_row.numcol || ',' ||
curs_row.libelle || ';' ||
curs_row.nba || ';' ||
curs_row.duree);
END LOOP;
END;
END;


J'ai le message d'erreur suivant :
FOR curs_row IN p_curs
ERROR at line 7:
ORA-06550: line 7, column 19:
PLS-00221: 'P_CURS' is not a procedure or is undefined
ORA-06550: line 7, column 3:
PL/SQL: Statement ignored

[draudrau]

J'ai trouvé !

Voici la solution.
Je suis obligé de connaître à l'avance la structure de mon record (ça parait logique).

sqlplus -S -L $USER/$PWD@$SID <<ENDSQL
set serveroutput on
BEGIN
DECLARE
TYPE t_rec IS RECORD (a CHAR(1), b NUMBER, c VARCHAR2(80), d NUMBER, e NUMBER, f NUMBER);
p_curs SYS_REFCURSOR;
curs_row t_rec;
BEGIN
C0.C0datarow('05061011','','','01/10/2007','31/10/2007','', p_curs);
LOOP
FETCH p_curs INTO curs_row;
EXIT WHEN p_curs%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(curs_row.a || ';' || curs_row.b || ';' || curs_row.c);
END LOOP;
END;
END;
/
quit;
ENDSQL

[rvfranck]

C'est bon alors!!!
mais il faut utiliser les balises "code" pour que ton post soit plus lisible.