Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
221 vnguyen 1
CREATE PROCEDURE "RELEASE_MANAGER"."SET_PACKAGE_BUILD_ENV" ( nPvId IN PACKAGE_BUILD_ENV.PV_ID%TYPE,
2
	   	  		  								  	sBuildEnvIdList IN VARCHAR2 ) IS
3
/* ---------------------------------------------------------------------------
4
    Last Modified: Rupesh Solanki
5
	Version: 3.0.1
6
   --------------------------------------------------------------------------- */
7
 
8
 
9
BEGIN
10
 
11
   -- Delete Current Build Env settings
12
   DELETE FROM PACKAGE_BUILD_ENV
13
   WHERE pv_id = nPvId;
14
 
15
   -- Delet Current Package Build Info Settings
16
   DELETE FROM PACKAGE_BUILD_INFO
17
   WHERE pv_id = nPvId;
18
 
19
   -- Reset flag to N
20
   UPDATE PACKAGE_VERSIONS SET
21
	   IS_BUILD_ENV_REQUIRED = 'N'
22
   WHERE PV_ID = nPvId;
23
 
24
 
25
   -- Set new Build Env
26
   IF NOT sBuildEnvIdList IS NULL THEN
27
   	  -- Insert into PACKAGE_BUILD_ENV
28
      INSERT INTO PACKAGE_BUILD_ENV ( PV_ID, BE_ID )
29
	  SELECT nPvId AS PV_ID,
30
	  		 be.BE_ID
31
	    FROM BUILD_ENVIRONMENTS be
32
	   WHERE be.BE_ID IN (
33
	   		 		  	   SELECT *
34
					   	     FROM THE ( SELECT CAST( IN_LIST_NUMBER( sBuildEnvIdList ) AS RELMGR_NUMBER_TAB_t ) FROM dual )
35
	   		 		  	 );
36
 
37
   	  -- Insert into PACKAGE_BUILD_INFO
38
      INSERT INTO PACKAGE_BUILD_INFO ( PV_ID, BM_ID )
39
	  SELECT nPvId AS PV_ID,
40
	  		 be.BM_ID
41
	    FROM BUILD_MACHINES be
42
	   WHERE be.BM_ID IN (
43
	   		 		  	   SELECT *
44
					   	     FROM THE ( SELECT CAST( IN_LIST_NUMBER( sBuildEnvIdList ) AS RELMGR_NUMBER_TAB_t ) FROM dual )
45
	   		 		  	 );						 
46
 
47
	   -- Set flag to Y
48
	   UPDATE PACKAGE_VERSIONS SET
49
		   IS_BUILD_ENV_REQUIRED = 'Y'
50
	   WHERE PV_ID = nPvId;
51
 
52
   END IF;
53
 
54
 
55
END Set_Package_Build_Env;
56
/