WebSVN – DevTools – Diff – /ManagerSuite/Release_Manager/trunk/database/Relman_export.sql

 --------------------------------------------------------
---  File created - Tuesday-June-03-2014
+--  File created - Monday-September-22-2014
 --------------------------------------------------------
 --------------------------------------------------------
 --  DDL for Type RELMGR_NUMBER_TAB_T
 --------------------------------------------------------
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_ADDITIONAL_NOTES
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_ADDITIONAL_NOTES"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 35029 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_ADDITIONAL_NOTES"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 35629 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_BMCON_ID
 --------------------------------------------------------
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_CR_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_CR_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 85781 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_CR_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 87961 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_DAEMON_INSTRUCTION_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_DAEMON_INSTRUCTION_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 149782 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_DAEMON_INSTRUCTION_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 153807 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_GBE_ID
 --------------------------------------------------------
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_PKG_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_PKG_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 59385 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_PKG_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 60626 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_PROJ_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_PROJ_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 781 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_PROJ_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 801 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_PV_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_PV_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 976908 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_PV_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 1000851 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_RCON_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_RCON_ID"  MINVALUE 1 MAXVALUE 9999999999999999999999999990 INCREMENT BY 1 START WITH 24903 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_RCON_ID"  MINVALUE 1 MAXVALUE 9999999999999999999999999990 INCREMENT BY 1 START WITH 25983 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_RTAG_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_RTAG_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 29943 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_RTAG_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 30783 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_SCHEDULED_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_SCHEDULED_ID"  MINVALUE 1 MAXVALUE 9999999999999999999999999990 INCREMENT BY 1 START WITH 26581 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_SCHEDULED_ID"  MINVALUE 1 MAXVALUE 9999999999999999999999999990 INCREMENT BY 1 START WITH 26981 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_SESSION_NUM
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_SESSION_NUM"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 997862 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_SESSION_NUM"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 1013446 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_UNIT_TESTS
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_UNIT_TESTS"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 348883 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_UNIT_TESTS"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 353625 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_USER_ID
 --------------------------------------------------------
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_VIEW_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_VIEW_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 5321 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_VIEW_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 5401 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Sequence SEQ_VTREE_ID
 --------------------------------------------------------
-   CREATE SEQUENCE  "SEQ_VTREE_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 26762 CACHE 20 ORDER  NOCYCLE ;
+   CREATE SEQUENCE  "SEQ_VTREE_ID"  MINVALUE 1 MAXVALUE 999999999999999999999999999 INCREMENT BY 1 START WITH 27602 CACHE 20 ORDER  NOCYCLE ;
+/
 --------------------------------------------------------
 --  DDL for Table ABT_ACTION_LOG
 --------------------------------------------------------
    (	"RCON_ID" NUMBER,
 	"CURRENT_BUILD_FILES" CLOB,
 	"CURRENT_RUN_LEVEL" NUMBER,
 	"PAUSE" NUMBER,
 	"CURRENT_PKG_ID_BEING_BUILT" NUMBER,
-	"KEEP_ALIVE" DATE
+	"KEEP_ALIVE" DATE,
+	"CURRENT_PV_ID" NUMBER,
+	"LAST_BUILD" DATE DEFAULT sysdate
    ) ;
+   COMMENT ON COLUMN "RUN_LEVEL"."RCON_ID" IS 'Link to the Release_config table';
+   COMMENT ON COLUMN "RUN_LEVEL"."CURRENT_BUILD_FILES" IS 'The current build file. Set by the Master, consumed by the Slaves.';
+   COMMENT ON COLUMN "RUN_LEVEL"."CURRENT_RUN_LEVEL" IS 'Daemon indiactes its current state';
+   COMMENT ON COLUMN "RUN_LEVEL"."PAUSE" IS 'The daemon should pause at the end of the current build';
+   COMMENT ON COLUMN "RUN_LEVEL"."CURRENT_PKG_ID_BEING_BUILT" IS 'pkg_id of the package currently being built';
+   COMMENT ON COLUMN "RUN_LEVEL"."KEEP_ALIVE" IS 'DateTime of the last database enquiry made by the daemon. Used to locate dead daemons.';
+   COMMENT ON COLUMN "RUN_LEVEL"."CURRENT_PV_ID" IS 'The PV_ID of the package currently being built.
+Added 29-Jul-14 for future use within the build system.';
+   COMMENT ON COLUMN "RUN_LEVEL"."LAST_BUILD" IS 'The DateTime that the last build started. This does not include dummy builds. Used to determine unused daemons.';
+/
 --------------------------------------------------------
 --  DDL for Table RUN_LEVEL_SCHEDULE
 --------------------------------------------------------
       sdisplay_name          IN   VARCHAR2,
       smachine_hostname      IN   VARCHAR2,
       ngbeid                 IN   NUMBER,
       sdescription           IN   VARCHAR2
    );
+   /*================================================================================================*/
+   PROCEDURE import_daemons ( nSourceRtagId IN NUMBER, nTargetRtagId IN NUMBER, nUserId IN NUMBER  );
 END pk_buildapi;
+/
+/
    PROCEDURE add_code_review_url (
         npvid           IN    NUMBER,
         nprojid         IN    NUMBER,
         surl            IN    VARCHAR2,
         sreason         IN    VARCHAR2,
-        ddateofreview   IN    DATE
+        ddateofreview   IN    VARCHAR2
    );
    PROCEDURE update_code_review_url (
         ncrid           IN    NUMBER,
         nprojid         IN    NUMBER,
         surl            IN    VARCHAR2,
-        sreason         IN    VARCHAR2
+        sreason         IN    VARCHAR2,
+        ddateofreview   IN    VARCHAR2
    );
    PROCEDURE remove_code_review_url (
         ncrid           IN    NUMBER
    );
       THEN
          raise_application_error (-20000,
                                  'Cannot have duplicate machines.'
                                  );
    END;
+/*-------------------------------------------------------------------------------------------------------*/
+PROCEDURE import_daemons ( nSourceRtagId IN NUMBER, nTargetRtagId IN NUMBER, nUserId IN NUMBER  ) IS
+   sSourceLocation VARCHAR2(4000);
+   sTargetLocation VARCHAR2(4000);
+   ProjId NUMBER;
+   cReleaseMode CHAR(1);
+   RconId NUMBER;
+   -- this cursor gets the source release daemon configurations, ensuring that the
+   -- first record will be the master daemon, and subsequent records will be the slaves.
+   CURSOR curSrcReleaseConfigs IS
+    SELECT daemon_hostname, gbe_id, gbe_buildfilter, bmcon_id, daemon_mode
+     FROM RELEASE_CONFIG rc
+    WHERE rc.RTAG_ID = nSourceRtagId
+    ORDER BY rc.daemon_mode;
+    recSrcReleaseConfigs curSrcReleaseConfigs%ROWTYPE;
+    -- this cursor looks for target release daemons
+   CURSOR curTgtReleaseConfigs IS
+    SELECT rcon_id
+     FROM RELEASE_CONFIG rc
+    WHERE rc.RTAG_ID = nTargetRtagId;
+    recTgtReleaseConfigs curTgtReleaseConfigs%ROWTYPE;
+    -- this cursor looks for target release daemon run level entries
+   CURSOR curTgtReleaseConfigRunLevel IS
+    SELECT current_run_level
+     FROM RUN_LEVEL rl
+    WHERE rl.RCON_ID = recTgtReleaseConfigs.rcon_id;
+    recTgtReleaseConfigRunLevel curTgtReleaseConfigRunLevel%ROWTYPE;
+BEGIN
+   /*--------------- Business Rules Here -------------------*/
+   IF (nSourceRtagId IS NULL) OR (nTargetRtagId IS NULL)
+   THEN
+      RAISE_APPLICATION_ERROR (-20000, 'Missing some parameters! nSourceRtagId= '|| nSourceRtagId ||', nTargetRtagId='|| nTargetRtagId );
+   END IF;
+   IF (nSourceRtagId = nTargetRtagId) THEN
+      RAISE_APPLICATION_ERROR (-20000, 'Cannot import release contents from same release.' );
+   END IF;
+   -- Check if Target release is in OPEN mode
+   SELECT rt.OFFICIAL  INTO  cReleaseMode
+     FROM RELEASE_TAGS rt
+    WHERE rt.RTAG_ID = nTargetRtagId;
+   IF (cReleaseMode != 'N') THEN
+      RAISE_APPLICATION_ERROR (-20000, 'Release must be in OPEN mode to import the contents.' );
+   END IF;
+   -- check that the target release's daemons are all paused before we allow an import operation
+   OPEN curTgtReleaseConfigs;
+   FETCH curtgtReleaseConfigs INTO recTgtReleaseConfigs;
+   WHILE curTgtReleaseConfigs%FOUND
+   LOOP
+      OPEN curTgtReleaseConfigRunLevel;
+      FETCH curTgtReleaseConfigRunLevel INTO recTgtReleaseConfigRunLevel;
+      IF curTgtReleaseConfigRunLevel%FOUND THEN
+         IF (recTgtReleaseConfigRunLevel.current_run_level IS NULL) OR
+            (recTgtReleaseConfigRunLevel.current_run_level <> 2) THEN
+            RAISE_APPLICATION_ERROR (-20000, 'Destination release daemon run levels must be paused before operation can proceed.' );
+         END IF;
+      ELSE
+         -- we don't know what the daemon run level is so err on the side of caution
+         RAISE_APPLICATION_ERROR (-20000, 'Destination release daemon run levels must be paused before operation can proceed.' );
+      END IF;
+      CLOSE curTgtReleaseConfigRunLevel;
+      FETCH curTgtReleaseConfigs INTO recTgtReleaseConfigs;
+   END LOOP;
+   CLOSE curTgtReleaseConfigs;
+   /*-------------------------------------------------------*/
+   --Import Release Configuration Information
+   OPEN curSrcReleaseConfigs;
+   FETCH curSrcReleaseConfigs INTO recSrcReleaseConfigs;
+     WHILE curSrcReleaseConfigs%FOUND
+   LOOP
+      -- add a daemon to the target release
+      PK_BUILDAPI.duplicate_daemon_config( nTargetRtagId,
+                                     recSrcReleaseConfigs.bmcon_id,
+                                     recSrcReleaseConfigs.daemon_hostname,
+                                     recSrcReleaseConfigs.gbe_id,
+                                     recSrcReleaseConfigs.daemon_mode ,
+                                     recSrcReleaseConfigs.gbe_buildfilter );
+      FETCH curSrcReleaseConfigs INTO recSrcReleaseConfigs;
+   END LOOP;
+   CLOSE curSrcReleaseConfigs;
+   /* Log Project Action */
+   -- Get Source Location
+   SELECT pr.PROJ_NAME ||' > '|| rt.RTAG_NAME ||' ['|| rt.RTAG_VERSION ||'.'|| rt.RTAG_LIFE_CYCLE ||']'  INTO sSourceLocation
+     FROM RELEASE_TAGS rt,
+           PROJECTS pr
+    WHERE rt.PROJ_ID = pr.PROJ_ID
+      AND rt.RTAG_ID = nSourceRtagId;
+   -- Get Target Location
+   SELECT pr.PROJ_NAME ||' > '|| rt.RTAG_NAME ||' ['|| rt.RTAG_VERSION ||'.'|| rt.RTAG_LIFE_CYCLE ||']'  INTO sTargetLocation
+     FROM RELEASE_TAGS rt,
+           PROJECTS pr
+    WHERE rt.PROJ_ID = pr.PROJ_ID
+      AND rt.RTAG_ID = nTargetRtagId;
+   -- Get project id
+   SELECT rt.PROJ_ID  INTO  ProjId
+     FROM RELEASE_TAGS rt
+    WHERE rt.RTAG_ID = nTargetRtagId;
+   Log_Project_Action ( ProjId, 'import_daemon_configuration', nUserId, 'SOURCE: '|| sSourceLocation ||'   TARGET: '|| sTargetLocation, nTargetRtagId );
+END;
 END pk_buildapi;
+/
+/
      IF vext <> ssv_ext
      THEN
        IF envtab = 0
        THEN
          -- WORK IN PROGRESS --
-         pk_work_in_progress.remove_package (clonefrompvid, rtagid, userid);
+         pk_work_in_progress.remove_package (clonefrompvid, rtagid,
+                                    userid);
        ELSIF envtab = 1
        THEN
          -- PENDING --
          pk_planned.remove_package (clonefrompvid, rtagid, userid);
        ELSIF envtab = 2
    PROCEDURE add_code_review_url (
       npvid           IN    NUMBER,
       nprojid         IN    NUMBER,
       surl            IN    VARCHAR2,
       sreason         IN    VARCHAR2,
-      ddateofreview   IN    DATE
+      ddateofreview   IN    VARCHAR2
    ) IS
       ncrid NUMBER;
    BEGIN
       SELECT seq_cr_id.NEXTVAL INTO ncrid FROM DUAL;
-      INSERT INTO code_review_url ( cr_id, pv_id, proj_id, url, reason, date_of_review,
+      INSERT INTO code_review_url ( cr_id, pv_id, proj_id, url, reason, date_of_review, last_modified )
-                                    last_modified )
-      VALUES ( ncrid, npvid, nprojid, surl, sreason, ddateofreview, ora_sysdate );
+      VALUES ( ncrid, npvid, nprojid, surl, sreason, TO_DATE( ddateofreview,'DD/MM/YYYY' ), ora_sysdate );
    END;
 /*-------------------------------------------------------------------------------------------------------*/
    /*
    ** Author: Jeremy Tweddle
    */
    PROCEDURE update_code_review_url (
       ncrid           IN    NUMBER,
       nprojid         IN    NUMBER,
       surl            IN    VARCHAR2,
-      sreason         IN    VARCHAR2
+      sreason         IN    VARCHAR2,
+      ddateofreview   IN    VARCHAR2
    ) IS
    BEGIN
       UPDATE code_review_url
       SET url = surl,
           proj_id = nprojid,
           reason = sreason,
+          date_of_review = TO_DATE( ddateofreview,'DD/MM/YYYY' ),
           last_modified = ora_sysdate
       WHERE cr_id = ncrid;
    END;
 /*-------------------------------------------------------------------------------------------------------*/
    /*
    ** Author: Jeremy Tweddle
    ** Date: 22/Aug/2007
    */
       RETURN RECORDS;
    END;
 /*-------------------------------------------------------------------------------------------------------*/
+-- Use:
+--   Used by the Automated Build System to release a new package
+-- Returns:
+--    Use application errors to indicate programming errors
+--    Use negative return codes to indicate correctable user problems
+--    Positive return code is the new PVID of the package
-   FUNCTION auto_make_vcsrelease (
+  FUNCTION auto_make_vcsrelease (
       rtagid                   IN   NUMBER,
       pkgname                  IN   VARCHAR2,
       vext                     IN   VARCHAR2,
       newpkgversion            IN   VARCHAR2,
       vcstag                   IN   VARCHAR2,
       ssv_ext                         package_versions.v_ext%TYPE;
       return_package_not_found        NUMBER                        := -1;
       return_package_already_exists   NUMBER                        := -2;
       return_not_approved             NUMBER                        := -3;
       return_migrated_pkg             NUMBER                        := -4;
+      return_svn_path_changed         NUMBER                        := -5;
       x_vcstypeid                     NUMBER;
       x_tag                           VARCHAR2(32);
       x_label                         VARCHAR2(60);
          raise_application_error (-20000, 'PkgVcsTag must be supplied.');
       END IF;
       IF (isrippled IS NULL) OR (isrippled < 0) OR (isrippled > 1)
       THEN
-         raise_application_error
-            (-20000,
-             'IsRippled must be set to 1 (Is rippled build) or 0 (Is planned build).'
+         raise_application_error (-20000, 'IsRippled must be set to 1 (Is rippled build) or 0 (Is planned build).');
-            );
       END IF;
       IF (username IS NULL)
       THEN
          raise_application_error (-20000, 'UserName must be supplied.');
             AND usr.is_disabled IS NULL;
       EXCEPTION
          WHEN NO_DATA_FOUND
          THEN
             raise_application_error (-20000,
-                                        'UserName '
+                                        'UserName: '
                                      || username
                                      || ' is not valid or disabled.'
                                     );
       END;
       -- Ensure Source Path does not change
       -- Do not expect the SVN development branch to change
       -- From the previous package
       IF ( x_tag = 'SVN' AND p_srcpath != x_srcpath )
       THEN
-        raise_application_error (-20000, 'Source Path does not match (' || p_srcpath || ','|| x_srcpath || ')' );
+        return return_svn_path_changed;
       END IF;
       BEGIN
          -- Import Dependencies
          import_dependencies (pvid, dependenciesimportlist, userid);

Subversion Repositories DevTools

(root)/ManagerSuite/Release_Manager/trunk/database/Relman_export.sql @ 4553 – Rev 4477 → 4553