Blame | Last modification | View Log | RSS feed
CREATE PROCEDURE "RELEASE_MANAGER"."UNRIPPLE_PACKAGE" (sPvIdList IN VARCHAR2,nRtagId IN RELEASE_TAGS.RTAG_ID%TYPE,nUserId IN NUMBER) IS/* ---------------------------------------------------------------------------Version: 4.1--------------------------------------------------------------------------- */oPvIdCollector RELMGR_NUMBER_TAB_t := RELMGR_NUMBER_TAB_t();BEGINIF (sPvIdList IS NULL) THENRAISE_APPLICATION_ERROR (-20000, 'Please select at least one package.' );END IF;oPvIdCollector := IN_LIST_NUMBER ( sPvIdList );-- UnRipple PackageINSERT INTO DO_NOT_RIPPLE ( RTAG_ID, PV_ID )SELECT nRtagId, pv.PV_IDFROM PACKAGE_VERSIONS pvWHERE pv.PV_ID IN (SELECT *FROM TABLE (CAST ( oPvIdCollector AS RELMGR_NUMBER_TAB_t )));/* LOG ACTION */Log_Action_Bulk ( sPvIdList, 'unripple_package', nUserId );END UnRipple_Package;/