pls-00382 [message #697] |
Wed, 27 February 2002 05:54 |
monir
Messages: 22 Registered: February 2002
|
Junior Member |
|
|
any one can tell me what is my mistake in the following package.
because i have the error pls-00382 after i want to create it
CREATE OR REPLACE PACKAGE qGet_DosSemaineJuge_DDFB
IS
CURSOR C1 IS
Select DOSSIER, SEQ, DATE_ROLE, DATE_DEBUT, SEQDATE, DUREE, TYPE_DUREE, DATE_CREATION,
COMMENTAIRE from roles;
TYPE P_CUR IS REF CURSOR RETURN C1%ROWTYPE;
PROCEDURE qGet_DosSemaineJuge_DDFB_PROC
(
pNumeroJuge IN NUMBER,
pDateDebut IN DATE,
pDateFin IN DATE,
P_CURSOR IN OUT P_CUR
);
END qGet_DosSemaineJuge_DDFB;
/
CREATE OR REPLACE PACKAGE BODY qGet_DosSemaineJuge_DDFB
IS
PROCEDURE qGet_DosSemaineJuge_DDFB_PROC
(
pNumeroJuge IN NUMBER,
pDateDebut IN DATE,
pDateFin IN DATE,
P_CURSOR IN OUT P_CUR
)
is
BEGIN
open P_CURSOR for
SELECT ReqA.*, ROLES.DUREE, ROLES.TYPE_DUREE, ROLES.COMMENTAIRE
FROM ROLES,
(
SELECT DISTINCT ROLES.DOSSIER, ROLES.SEQ, ROLES.DATE_DEBUT,
DECODE(dossiers.cause_designe ,pNumeroJuge,DECODE(dossiers.cause_continue ,pNumeroJuge,'Continuée et désignée','Désignée'),
DECODE(dossiers.cause_continue ,pNumeroJuge,'Continuée','')) AS StatutDossier
FROM ROLES, DOSSIERS
WHERE ((ROLES.DATE_ROLE) Between pDateDebut And pDateFin) AND ( (ROLES.DOSSIER)=DOSSIERS.DOSSIER)
And ( (ROLES.DOSSIER) In (SELECT DOSSIER FROM DOSSIERS WHERE DOSSIERS.cause_designe=pNumeroJuge
OR DOSSIERS.cause_continue=pNumeroJuge))
ORDER BY ROLES.DOSSIER
) ReqA
WHERE ReqA.DOSSIER = ROLES.DOSSIER AND ReqA.DATE_DEBUT = ROLES.DATE_ROLE;
END qGet_DosSemaineJuge_DDFB_PROC;
END qGet_DosSemaineJuge_DDFB;
/
pls help me thanks
monir
|
|
|
Re: pls-00382 [message #700 is a reply to message #697] |
Wed, 27 February 2002 06:56 |
pratap kumar tripathy
Messages: 660 Registered: January 2002
|
Senior Member |
|
|
you have defined
--
TYPE P_CUR IS REF CURSOR RETURN C1%ROWTYPE;
--
and the
---
open P_CURSOR for
SELECT ReqA.*, ROLES.DUREE, ROLES.TYPE_DUREE, ROLES.COMMENTAIRE
FROM ROLES,...............
--
does not return the same type
so use
TYPE P_CUR IS REF CURSOR ;
|
|
|
|