Discussion :

[cyril]

Bonjour,

J'ai déclaré un type record. un type is table of le nom du record.
Ensuite je voudrai faire un select des élements de ma table type record (de toutes les lignes).
mais je connais pas la synthaxe pour récupérer toutes les lignes de ma table of record.

Merci

Cyril

[SheikYerbouti]

Une table est parcourue par un indice.

Les bornes d'une telle table sont connues avec table.First et table.last

http://sheikyerbouti.developpez.com/pl_sql/?page=Chap5

[cyril]

Bonjour,

Merci de ta réponse. J'ai dû mal exprimer mon besoin.
Voici le code :
Je voudrais avoir tous les enregistrments de mon tableau en un seul select sans utiliser UNION comme dans mon exemple.

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
34
35
36
37
38
39
 
CREATE OR REPLACE PACKAGE PKG_TRYARRAYN
AS
  TYPE CursorType IS REF CURSOR;
  TYPE RecDetail IS RECORD (
       PROD_CIP                   NUMBER(7),
       PROD_CIPFORMAT             VARCHAR2(9) );
  TYPE TableRec     IS TABLE OF RecDetail INDEX BY BINARY_INTEGER;
  TYPE CursorRecTyp IS REF CURSOR RETURN RecDetail;
  PROCEDURE SELECTALL(oCursor OUT PKG_TRYARRAYN.CursorType);
END;
/
 
CREATE OR REPLACE package body PKG_TRYARRAYN as
  PROCEDURE SELECTALL(oCursor OUT PKG_TRYARRAYN.CursorType) as
    r_Rec PKG_TRYARRAYN.RecDetail;
    t_Rec PKG_TRYARRAYN.TableRec;
  BEGIN
      r_Rec.PROD_CIP       := 3213217;
      r_Rec.PROD_CIPFORMAT := '321 321-7';
      t_Rec(1)  := r_Rec;
      r_Rec.PROD_CIP       := 6546541;
      r_Rec.PROD_CIPFORMAT := '654 654-1';
      t_Rec(2) := r_Rec;
      open oCursor for
       select t_rec(1).PROD_CIP CIP,t_rec(1).PROD_CIPFORMAT CIPF from dual
       union
       select t_rec(2).PROD_CIP CIP,t_rec(2).PROD_CIPFORMAT CIPF from dual;
  END;
END PKG_TRYARRAYN;
/
alter package PKG_TRYARRAYN compile package;
show errors;
alter package PKG_TRYARRAYN compile body;
show errors;
 
var oCursor REFCURSOR;
exec pkg_tryarrayN.SELECTALL(:oCursor);
print oCursor;

Merci d'avance
Cyril

[McM]

Avec le pipelined (j'ai pas réussi à retrouver la doc dans les tuto, mais j'ai pas cherché longtemps)

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
CREATE OR REPLACE
TYPE TYP_REC_DETAIL AS OBJECT 
( 
	PROD_CIP        NUMBER(7),
    PROD_CIPFORMAT  VARCHAR2(9)
);
 
CREATE OR REPLACE
TYPE TYP_TAB_DETAIL AS TABLE OF TYP_REC_DETAIL;
 
CREATE OR REPLACE FUNCTION SELECTALL RETURN  TYP_TAB_DETAIL PIPELINED
AS
BEGIN
 
   PIPE ROW( TYP_REC_DETAIL (PROD_CIP => 3213217, PROD_CIPFORMAT => '321 321-7'));        
    PIPE ROW( TYP_REC_DETAIL (PROD_CIP => 6546541, PROD_CIPFORMAT => '654 654-1'));        
  RETURN;
END SELECTALL;
 
SELECT *
FROM TABLE (SELECTALL);
 
PROD_CIP	PROD_CIPFORMAT
3213217	321 321-7
6546541	654 654-1

[cyril]

Merci de ta réponse.

Je connais cette méthode que j'ai déjà utlisé.
mais cela ne resoud pas mon problème car je désirerai remplir un refcursor.
si cela est possible à partir de ma méthode.

[Wurlitzer]

J'arrive pas a le faire fonctionner dans ton exemple mais il me semblait qu'il existe une solution du genre

Code :

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

select * from table(cast(t_rec As PKG_TRYARRAYN.TableRec));

[cyril]

Merci,

Je viens de tester mais cela ne fonctionne pas même avec en modifiant la syntaxe.


A+

[maxikat]

Je fais la meme chose avec la syntaxe suivante :

select * from THE (select cast(in_list(i_annee) as mytableType) from dual)

Me demande pas pourquoi. Ca marche chez moi.

[remi4444]

Je crois que malheureusment, le pipeline ne fonctionne pas si on déclare comme retour un refcursor...