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

FCLT#64883 Droppen fac_version_major, fac_version_minor en fac_version_patch

Browse Source 
svn path=/Database/trunk/; revision=49025
This commit is contained in:
Erik Groener
2020-12-01 12:53:26 +00:00
parent 1d1274f7cf
commit 06b339799c
6 changed files with 15 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
COMSQL.H
View File

@@ -21,10 +21,6 @@
* It is now defined by external macro _DBV
*/
/* The minimum required software version */
#define _VERSIONMAJ 2019
#define _VERSIONMIN 1
#define _VERSIONPATCH '0'
#define _VERSION '2019.1.0'
#define _DBV_STRING _MKSTRING(_DBV)
#define REGISTERONCE(svnid) \

16
FAC/FAC_PAC.SRC
View File

@@ -135,7 +135,7 @@ CREATE OR REPLACE PACKAGE fac
FUNCTION gettrackinguserkey (peventcode IN VARCHAR2, pkey IN number) RETURN number;
PROCEDURE initsession (flcode IN VARCHAR2);
PROCEDURE initsession (pkey NUMBER, flcode IN VARCHAR2, usertimezone IN VARCHAR2);
PROCEDURE registerversion (pmaj IN NUMBER, pmin IN NUMBER, ppatch IN VARCHAR2, pschema IN VARCHAR2, plang IN VARCHAR2);
PROCEDURE registerversion (pschema IN VARCHAR2, plang IN VARCHAR2);
PROCEDURE registercustversion (pcustid IN VARCHAR2, pcustnr IN NUMBER);
FUNCTION getdbversion RETURN VARCHAR2;
FUNCTION getDefaultBehandelgroep(p_stdm IN NUMBER) RETURN NUMBER;
@@ -4434,26 +4434,22 @@ CREATE OR REPLACE PACKAGE BODY fac AS
EXECUTE IMMEDIATE setsql;
END;
PROCEDURE registerversion (pmaj IN NUMBER, pmin IN NUMBER, ppatch IN VARCHAR2, pschema IN VARCHAR2, plang IN VARCHAR2)
PROCEDURE registerversion (pschema IN VARCHAR2, plang IN VARCHAR2)
AS
verstring fac_module.fac_module_version%TYPE;
revisionnr fac_version.fac_version_schema%TYPE;
BEGIN
IF pmaj IS NOT NULL AND pmin IS NOT NULL AND ppatch IS NOT NULL
IF pschema IS NOT NULL
THEN
verstring := TO_CHAR (pmaj) || '.' || TO_CHAR (pmin) || '.' || TO_CHAR (ppatch);
UPDATE fac_module
SET fac_module_version = verstring;
SET fac_module_version = TO_CHAR(pschema);
UPDATE fac_version
SET fac_version_major = pmaj,
fac_version_minor = pmin,
fac_version_patch = ppatch,
fac_version_schema = pschema,
SET fac_version_schema = pschema,
fac_version_date = SYSDATE;
UPDATE fac_message
SET fac_message_text = 'FACILITOR ' || verstring || 'DB' || TO_CHAR(pschema)
SET fac_message_text = 'FACILITOR DB' || TO_CHAR(pschema)
WHERE fac_message_code = 'FAC_M002';
END IF;

6
FAC/FAC_TAB.SRC
View File

@@ -1268,12 +1268,6 @@ CREATE_TABLE (fac_setting,0) (
// We want the database to know what he is. This table has only one record.
CREATE_TABLE (fac_version, 0) (
fac_version_major
NUMBER(4),
fac_version_minor
NUMBER(3),
fac_version_patch
VARCHAR(30),
fac_version_schema
VARCHAR(30),
fac_version_upgrading

2
FCLT.SRC
View File

@@ -158,7 +158,7 @@ COMMIT;
///////////////////////////// finally compile all views, triggers etc acc to the latest state ///////
BEGIN DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE); END;
/
BEGIN fac.registerversion(_VERSIONMAJ, _VERSIONMIN, _VERSIONPATCH, _DBV_STRING, 'NL'); END;
BEGIN fac.registerversion(_DBV_STRING, 'NL'); END;
/
REGISTERONCE('$Id$')

6
_UP/DB39to40.src
View File

@@ -165,6 +165,12 @@ ALTER TABLE res_rsv_artikel ADD ( res_rsv_artikel_externnr VARCHAR2(256), r
ALTER TABLE res_rsv_deel ADD ( res_rsv_deel_externnr VARCHAR2(256), res_rsv_deel_externsyncdate DATE);
ALTER TABLE res_rsv_ruimte ADD ( res_rsv_ruimte_externsyncdate DATE);
ALTER TABLE res_reservering ADD ( res_reservering_externnr VARCHAR2(256), res_reservering_externsyncdate DATE);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#64883
ALTER TABLE fac_version DROP COLUMN fac_version_major;
ALTER TABLE fac_version DROP COLUMN fac_version_minor;
ALTER TABLE fac_version DROP COLUMN fac_version_patch;
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#*****
///////////////////////////////////////////////////////////////////////////////////////////

4
_UP/recreate.inc
View File

@@ -85,11 +85,11 @@
ALTER PACKAGE fac COMPILE; // anders soms (nog) invalid en lukt het volgende niet niet
ALTER PACKAGE fac COMPILE BODY; // Zelfs de COMPILE_SCHEMA van een paar regels verder naar voren halen hielp niet.
BEGIN fac.registerversion(_VERSIONMAJ, _VERSIONMIN, _VERSIONPATCH, _DBV_STRING, NULL); END;
BEGIN fac.registerversion(_DBV_STRING, NULL); END;
/
/* now compile all views, triggers etc acc to the latest state */
BEGIN
DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE);
DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE);
DBMS_UTILITY.COMPILE_SCHEMA(USER, FALSE); // Soms lukt het niet in 1 keer
END;
/