| 221 |
vnguyen |
1 |
CREATE PROCEDURE "RELEASE_MANAGER"."UNRIPPLE_PACKAGE" (
|
|
|
2 |
sPvIdList IN VARCHAR2,
|
|
|
3 |
nRtagId IN RELEASE_TAGS.RTAG_ID%TYPE,
|
|
|
4 |
nUserId IN NUMBER
|
|
|
5 |
) IS
|
|
|
6 |
/* ---------------------------------------------------------------------------
|
|
|
7 |
Version: 4.1
|
|
|
8 |
--------------------------------------------------------------------------- */
|
|
|
9 |
|
|
|
10 |
oPvIdCollector RELMGR_NUMBER_TAB_t := RELMGR_NUMBER_TAB_t();
|
|
|
11 |
|
|
|
12 |
BEGIN
|
|
|
13 |
|
|
|
14 |
IF (sPvIdList IS NULL) THEN
|
|
|
15 |
RAISE_APPLICATION_ERROR (-20000, 'Please select at least one package.' );
|
|
|
16 |
END IF;
|
|
|
17 |
|
|
|
18 |
oPvIdCollector := IN_LIST_NUMBER ( sPvIdList );
|
|
|
19 |
|
|
|
20 |
-- UnRipple Package
|
|
|
21 |
INSERT INTO DO_NOT_RIPPLE ( RTAG_ID, PV_ID )
|
|
|
22 |
SELECT nRtagId, pv.PV_ID
|
|
|
23 |
FROM PACKAGE_VERSIONS pv
|
|
|
24 |
WHERE pv.PV_ID IN (
|
|
|
25 |
SELECT *
|
|
|
26 |
FROM TABLE (
|
|
|
27 |
CAST ( oPvIdCollector AS RELMGR_NUMBER_TAB_t )
|
|
|
28 |
)
|
|
|
29 |
);
|
|
|
30 |
|
|
|
31 |
/* LOG ACTION */
|
|
|
32 |
Log_Action_Bulk ( sPvIdList, 'unripple_package', nUserId );
|
|
|
33 |
|
|
|
34 |
END UnRipple_Package;
|
|
|
35 |
/
|