1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
|
create or replace
PROCEDURE "PAR_SER_PRIX_SELECT_ABONNEMENT"
(
idtService IN NUMBER
, idPack IN NUMBER
, codeClient IN VARCHAR2
, idtEntite IN NUMBER
, nbAchat IN NUMBER
, curseur OUT SYS_REFCURSOR
) AS
CURSOR C_EMP(idtService NUMBER, idPack NUMBER, codeClient VARCHAR2, idtEntite NUMBER, nbAchat NUMBER) IS
SELECT *
FROM PAR_SER_PRIX
WHERE SPX_IDTSPX = GET_TARIF(idtService, idPack, codeClient, idtEntite, nbAchat);
LR$C_emp C_EMP%ROWTYPE ;
BEGIN
OPEN C_EMP(idtService, idPack, codeClient, idtEntite, nbAchat);
FETCH C_EMP Into LR$C_emp;
CLOSE C_EMP;
END PAR_SER_PRIX_SELECT_ABONNEMENT; |
Partager