admin/mars
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

MARS-1409

Browse Source
This commit is contained in:
Grzegorz Michalski
2026-03-02 10:15:22 +01:00
parent a13a9d415f
commit 7db10725a0
36 changed files with 1059 additions and 99 deletions
Download Patch File Download Diff File Expand all files Collapse all files

64
MARS_Packages/REL02_POST/MARS-1409/track_package_versions.sql
View File

@@ -1,7 +1,7 @@
-- ============================================================================
-- MARS-1409 Package Version Tracking
-- ============================================================================
-- Purpose: Record package versions in A_PACKAGE_VERSION_HISTORY table
-- Purpose: Record package versions in A_PACKAGE_VERSION_TRACKING table
-- ============================================================================
SET SERVEROUTPUT ON SIZE UNLIMITED
@@ -12,10 +12,12 @@ PROMPT Recording Package Versions
PROMPT ============================================================================
DECLARE
v_file_manager_version VARCHAR2(50);
v_file_manager_build VARCHAR2(100);
v_env_manager_version VARCHAR2(50);
v_env_manager_build VARCHAR2(100);
v_file_manager_version VARCHAR2(50);
v_file_manager_build VARCHAR2(100);
v_env_manager_version VARCHAR2(50);
v_env_manager_build VARCHAR2(100);
v_file_archiver_version VARCHAR2(50);
v_file_archiver_build VARCHAR2(100);
BEGIN
-- Get FILE_MANAGER version
BEGIN
@@ -40,24 +42,48 @@ BEGIN
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('WARNING: Could not retrieve ENV_MANAGER version');
END;
-- Insert version records (if A_PACKAGE_VERSION_HISTORY table exists)
-- Get FILE_ARCHIVER version
BEGIN
EXECUTE IMMEDIATE 'INSERT INTO CT_MRDS.A_PACKAGE_VERSION_HISTORY
(PACKAGE_NAME, PACKAGE_VERSION, BUILD_INFO, DEPLOYMENT_DATE, DEPLOYMENT_USER, MARS_TICKET)
VALUES (:1, :2, :3, SYSDATE, USER, :4)'
USING 'FILE_MANAGER', v_file_manager_version, v_file_manager_build, 'MARS-1409';
v_file_archiver_version := CT_MRDS.FILE_ARCHIVER.GET_VERSION();
v_file_archiver_build := CT_MRDS.FILE_ARCHIVER.GET_BUILD_INFO();
EXECUTE IMMEDIATE 'INSERT INTO CT_MRDS.A_PACKAGE_VERSION_HISTORY
(PACKAGE_NAME, PACKAGE_VERSION, BUILD_INFO, DEPLOYMENT_DATE, DEPLOYMENT_USER, MARS_TICKET)
VALUES (:1, :2, :3, SYSDATE, USER, :4)'
USING 'ENV_MANAGER', v_env_manager_version, v_env_manager_build, 'MARS-1409';
COMMIT;
DBMS_OUTPUT.PUT_LINE('Package version history recorded successfully');
DBMS_OUTPUT.PUT_LINE('FILE_ARCHIVER Version: ' || v_file_archiver_version);
DBMS_OUTPUT.PUT_LINE('FILE_ARCHIVER Build: ' || v_file_archiver_build);
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('INFO: A_PACKAGE_VERSION_HISTORY table not available - skipping version tracking');
DBMS_OUTPUT.PUT_LINE('WARNING: Could not retrieve FILE_ARCHIVER version');
END;
-- Insert version records into A_PACKAGE_VERSION_TRACKING
BEGIN
EXECUTE IMMEDIATE 'INSERT INTO CT_MRDS.A_PACKAGE_VERSION_TRACKING
(PACKAGE_OWNER, PACKAGE_NAME, PACKAGE_TYPE, PACKAGE_VERSION,
PACKAGE_BUILD_DATE, PACKAGE_AUTHOR, TRACKING_DATE, TRACKED_BY_USER, TRACKED_BY_MODULE)
VALUES (:1, :2, :3, :4, :5, :6, SYSTIMESTAMP, USER, :7)'
USING 'CT_MRDS', 'FILE_MANAGER', 'BOTH', v_file_manager_version,
'', '', 'MARS-1409';
EXECUTE IMMEDIATE 'INSERT INTO CT_MRDS.A_PACKAGE_VERSION_TRACKING
(PACKAGE_OWNER, PACKAGE_NAME, PACKAGE_TYPE, PACKAGE_VERSION,
PACKAGE_BUILD_DATE, PACKAGE_AUTHOR, TRACKING_DATE, TRACKED_BY_USER, TRACKED_BY_MODULE)
VALUES (:1, :2, :3, :4, :5, :6, SYSTIMESTAMP, USER, :7)'
USING 'CT_MRDS', 'ENV_MANAGER', 'BOTH', v_env_manager_version,
'', '', 'MARS-1409';
EXECUTE IMMEDIATE 'INSERT INTO CT_MRDS.A_PACKAGE_VERSION_TRACKING
(PACKAGE_OWNER, PACKAGE_NAME, PACKAGE_TYPE, PACKAGE_VERSION,
PACKAGE_BUILD_DATE, PACKAGE_AUTHOR, TRACKING_DATE, TRACKED_BY_USER, TRACKED_BY_MODULE)
VALUES (:1, :2, :3, :4, :5, :6, SYSTIMESTAMP, USER, :7)'
USING 'CT_MRDS', 'FILE_ARCHIVER', 'BOTH', v_file_archiver_version,
'', '', 'MARS-1409';
COMMIT;
DBMS_OUTPUT.PUT_LINE('Package version tracking recorded successfully');
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('ERROR: Could not record version tracking - ' || SQLERRM);
RAISE;
END;
END;
/