Bonjour,
Je souhaite créer un Package dans lequel une fonction renvoie un tableau. Le tableau serait alimenté par les valeurs retournées par un SELECT.
Voilà ce que j'ai écris :
CREATE TYPE LIG_ING AS OBJECT (JOUR DATE,PTG CHAR(5),LIGNE CHAR(3),LIB_LIGNE VARCHAR2(30),PLAN CHAR(3),LIB_PLAN VARCHAR2(30),FONCTION CHAR(3),LIB_FONCTION VARCHAR2(30),OPERATION CHAR(4),LIB_OPERATION VARCHAR2(30),O_F VARCHAR2(10),TEMPS NUMBER(7,4));
/
CREATE TYPE TAB_ING AS TABLE OF LIG_ING;
/
CREATE OR REPLACE PACKAGE Ing_pack AS
FUNCTION PtgSem(cIdPerso CHAR, cDebut CHAR, cFin CHAR) RETURN TAB_ING;
END Ing_pack;
/
CREATE OR REPLACE PACKAGE BODY Ing_pack AS
FUNCTION PtgSem(cIdPerso CHAR, cDebut CHAR, cFin CHAR) RETURN TAB_ING IS
CURSOR CPtg IS
SELECT P.jour,P.id_perso,P.id_ligne,A.lib_ligne,P.id_plan,A.lib_plan,P.id_fonction,A.lib_fonction,P.id_operation,A.lib_operation,P.ofs_cpt,P.temps
FROM Ptg_pers P, Vue_activite_geo A
WHERE (P.jour>=TO_DATE(cDebut,'YYYYMMDD') AND P.jour<=TO_DATE(cFin,'YYYYMMDD'))
AND P.id_perso=cIdPerso
AND P.id_ligne=A.id_ligne
AND P.id_plan=A.id_plan
AND P.id_fonction=A.id_fonction
AND P.id_operation=A.id_operation;
tTab TAB_ING;
BEGIN
?????
?????
END PtgSem;
END Ing_pack;
Comment faire pour mettre le contenu de mon curseur dans mon tableau ?
Merci de votre aide.
Partager