AppStd/SqlScripts
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

MS IDB/PM

Browse Source
This commit is contained in:
SchreiberM
2022-01-21 14:26:29 +01:00
parent 07ca812521
commit 18a8b13cb3
3 changed files with 1155 additions and 677 deletions
Download Patch File Download Diff File Expand all files Collapse all files

246
00_IDB/CreateDBObjects.sql
View File

@@ -1541,6 +1541,71 @@ CREATE NONCLUSTERED INDEX [IDXTBIDB_OBJECT_METADATA5]
ON [dbo].[TBIDB_OBJECT_METADATA] ([ATTR_ID],[DEC_TERM_ID])
INCLUDE ([IDB_OBJ_ID],[ADDED_WHO],[ADDED_WHEN])
GO
CREATE TABLE TBIDB_OBJ_STATES
(
GUID INTEGER NOT NULL IDENTITY (1, 1),
TITLE VARCHAR(500),
ADDED_WHO BIGINT,
ADDED_WHEN DATETIME NOT NULL DEFAULT GETDATE(),
CHANGED_WHO BIGINT,
CHANGED_WHEN DATETIME,
CONSTRAINT PK_TBIDB_OBJ_STATES PRIMARY KEY (GUID),
CONSTRAINT UQ_TBIDB_OBJ_STATES UNIQUE (TITLE)
)
GO
CREATE TRIGGER TBIDB_OBJ_STATES_AFT_UPD ON TBIDB_OBJ_STATES
FOR UPDATE
AS
UPDATE TBIDB_OBJ_STATES SET CHANGED_WHEN = GETDATE()
FROM INSERTED
WHERE TBIDB_OBJ_STATES.GUID = INSERTED.GUID
GO
CREATE TABLE TBIDB_OBJ_STATES_LANGUAGE
(
GUID INTEGER NOT NULL IDENTITY (1, 1),
STATE_ID INTEGER NOT NULL,
LANG_ID TINYINT NOT NULL,
TERM_ID BIGINT NOT NULL,
ADDED_WHO BIGINT,
ADDED_WHEN DATETIME NOT NULL DEFAULT GETDATE(),
CHANGED_WHO BIGINT,
CHANGED_WHEN DATETIME,
CONSTRAINT PK_TBIDB_OBJ_STATES_LANGUAGE PRIMARY KEY (GUID),
CONSTRAINT FK_TBIDB_OBJ_STATES_LANGUAGE_STATEID FOREIGN KEY (STATE_ID) REFERENCES TBIDB_OBJ_STATES (GUID),
CONSTRAINT FK_TBIDB_OBJ_STATES_LANGUAGE_LANGID FOREIGN KEY (LANG_ID) REFERENCES TBIDB_LANGUAGE (GUID),
CONSTRAINT FK_TBIDB_OBJ_STATES_LANGUAGE_ADDED_WHO_T_ID FOREIGN KEY (ADDED_WHO) REFERENCES TBIDB_TERM_VALUE_VARCHAR (GUID),
CONSTRAINT FK_TBIDB_OBJ_STATES_LANGUAGE_CHANGED_WHO_T_ID FOREIGN KEY (CHANGED_WHO) REFERENCES TBIDB_TERM_VALUE_VARCHAR (GUID),)
GO
CREATE TRIGGER TBIDB_OBJ_STATES_LANGUAGE_AFT_UPD ON TBIDB_OBJ_STATES_LANGUAGE
FOR UPDATE
AS
UPDATE TBIDB_OBJ_STATES_LANGUAGE SET CHANGED_WHEN = GETDATE()
FROM INSERTED
WHERE TBIDB_OBJ_STATES_LANGUAGE.GUID = INSERTED.GUID
GO
CREATE TABLE TBIDB_OBJ_MY_STATES
(
GUID BIGINT NOT NULL IDENTITY (1, 1),
IDB_OBJ_ID BIGINT NOT NULL,
STATE_ID INTEGER NOT NULL,
ADDED_WHO BIGINT,
ADDED_WHEN DATETIME NOT NULL DEFAULT GETDATE(),
CHANGED_WHO BIGINT,
CHANGED_WHEN DATETIME,
CONSTRAINT PK_TBIDB_OBJ_MY_STATES PRIMARY KEY (GUID),
CONSTRAINT FK_TBIDB_OBJ_MY_STATES_IDBOBJID FOREIGN KEY (IDB_OBJ_ID) REFERENCES TBIDB_OBJECT (IDB_OBJ_ID),
CONSTRAINT FK_TBIDB_OBJ_MY_STATES_STATE_ID FOREIGN KEY (STATE_ID) REFERENCES TBIDB_OBJ_STATES (GUID),
CONSTRAINT FK_TBIDB_OBJ_MY_STATES_ADDED_WHO_T_ID FOREIGN KEY (ADDED_WHO) REFERENCES TBIDB_TERM_VALUE_VARCHAR (GUID),
CONSTRAINT FK_TBIDB_OBJ_MY_STATES_CHANGED_WHO_T_ID FOREIGN KEY (CHANGED_WHO) REFERENCES TBIDB_TERM_VALUE_VARCHAR (GUID),)
GO
CREATE TRIGGER TBIDB_OBJ_MY_STATES_AFT_UPD ON TBIDB_OBJ_MY_STATES
FOR UPDATE
AS
UPDATE TBIDB_OBJ_MY_STATES SET CHANGED_WHEN = GETDATE()
FROM INSERTED
WHERE TBIDB_OBJ_MY_STATES.GUID = INSERTED.GUID
GO
/*###########################
######### FUNCTIONS #########
#############################*/
@@ -2745,7 +2810,107 @@ GO
############## PROCEDURES ###################
#############################################*/
CREATE PROCEDURE [dbo].[PRIDB_NEW_STATE_OBJECT] @pIDB_OBJ_ID BIGINT, @pSYSSTATE VARCHAR(100),@pWHO VARCHAR(100)
AS
BEGIN
DECLARE
@LANG_ID INTEGER,
@STATE_ID INTEGER
SELECT @STATE_ID = GUID FROM TBIDB_OBJ_STATES WHERE TITLE = @pSYSSTATE;
DECLARE @ADDED_WHO_TERM_ID BIGINT
EXEC PRIDB_NEW_TERM 'VARCHAR',@pWHO,@pWHO,@TERM_ID = @ADDED_WHO_TERM_ID OUTPUT;
INSERT INTO TBIDB_OBJ_MY_STATES (IDB_OBJ_ID,STATE_ID,ADDED_WHO) VALUES (@pIDB_OBJ_ID,@STATE_ID,@ADDED_WHO_TERM_ID);
END
GO
ALTER PROCEDURE [dbo].[PRIDB_NEW_IDB_OBJECT_STATE] @pSYSSTATE VARCHAR(512),@pWHO VARCHAR(100)
AS
BEGIN
DECLARE
@LANG_ID TINYINT,
@pLANG_CODE VARCHAR(5),
@STATE_ID INTEGER
DECLARE @WHO_TERM_ID BIGINT
EXEC PRIDB_NEW_TERM 'VARCHAR',@pWHO,@pWHO,@TERM_ID = @WHO_TERM_ID OUTPUT;
DECLARE @STATE_TERM_ID BIGINT,@LANG_STATE_TERM_ID BIGINT
EXEC PRIDB_NEW_TERM 'VARCHAR',@pSYSSTATE,@pWHO,@TERM_ID = @STATE_TERM_ID OUTPUT;
IF NOT EXISTS(SELECT GUID FROM TBIDB_OBJ_STATES WHERE TITLE = @pSYSSTATE)
BEGIN
INSERT INTO TBIDB_OBJ_STATES (TITLE,ADDED_WHO) VALUES (@pSYSSTATE,@WHO_TERM_ID)
END
SELECT @STATE_ID = GUID FROM TBIDB_OBJ_STATES WHERE TITLE = @pSYSSTATE;
DECLARE c_PRIDB_NEW_IDB_OBJECT_STATE CURSOR FOR
select GUID,LANG_CODE FROM TBIDB_LANGUAGE
OPEN c_PRIDB_NEW_IDB_OBJECT_STATE
FETCH NEXT FROM c_PRIDB_NEW_IDB_OBJECT_STATE INTO @LANG_ID,@pLANG_CODE
WHILE @@FETCH_STATUS = 0
BEGIN
IF NOT EXISTS(SELECT GUID FROM TBIDB_OBJ_STATES_LANGUAGE WHERE STATE_ID = @STATE_ID AND LANG_ID = @LANG_ID)
INSERT INTO TBIDB_OBJ_STATES_LANGUAGE (STATE_ID,LANG_ID,TERM_ID,ADDED_WHO) VALUES (@STATE_ID,@LANG_ID,@STATE_TERM_ID,@WHO_TERM_ID)
FETCH NEXT FROM c_PRIDB_NEW_IDB_OBJECT_STATE INTO @LANG_ID,@pLANG_CODE
END
CLOSE c_PRIDB_NEW_IDB_OBJECT_STATE
DEALLOCATE c_PRIDB_NEW_IDB_OBJECT_STATE
END
GO
EXEC PRIDB_NEW_IDB_OBJECT_STATE 'File Versioned', 'Digital Data';
EXEC PRIDB_NEW_IDB_OBJECT_STATE 'File added', 'Digital Data';
EXEC PRIDB_NEW_IDB_OBJECT_STATE 'File changed', 'Digital Data';
EXEC PRIDB_NEW_IDB_OBJECT_STATE 'File deleted', 'Digital Data';
EXEC PRIDB_NEW_IDB_OBJECT_STATE 'Metadata changed', 'Digital Data';
EXEC PRIDB_NEW_IDB_OBJECT_STATE 'Attributevalue deleted', 'Digital Data';
GO
CREATE PROCEDURE [dbo].[PRIDB_UPDATE_IDB_OBJECT_STATE] @pOLD_TERM VARCHAR(512), @pNEW_TERM VARCHAR(512),@pLANG_CODE VARCHAR(5),@pWHO VARCHAR(100)
AS
BEGIN
DECLARE
@LANG_ID TINYINT,
@STATE_ID INTEGER
DECLARE @WHO_TERM_ID BIGINT
SELECT @LANG_ID = GUID FROM TBIDB_LANGUAGE WHERE LANG_CODE = @pLANG_CODE;
EXEC PRIDB_NEW_TERM 'VARCHAR',@pWHO,@pWHO,@TERM_ID = @WHO_TERM_ID OUTPUT;
DECLARE @NEW_STATE_TERM_ID BIGINT,@OLD_STATE_TERM_ID BIGINT
EXEC PRIDB_NEW_TERM 'VARCHAR',@pNEW_TERM,@pWHO,@TERM_ID = @NEW_STATE_TERM_ID OUTPUT;
EXEC PRIDB_NEW_TERM 'VARCHAR',@pOLD_TERM,@pWHO,@TERM_ID = @OLD_STATE_TERM_ID OUTPUT;
UPDATE TBIDB_OBJ_STATES_LANGUAGE SET TERM_ID = @NEW_STATE_TERM_ID,CHANGED_WHO = @WHO_TERM_ID WHERE TERM_ID = @OLD_STATE_TERM_ID AND LANG_ID = @LANG_ID
AND TERM_ID <> @NEW_STATE_TERM_ID
END
GO
EXEC PRIDB_UPDATE_IDB_OBJECT_STATE 'File Versioned','Datei versioniert', 'de-DE', 'Digital Data';
EXEC PRIDB_UPDATE_IDB_OBJECT_STATE 'File added','Datei erstellt', 'de-DE', 'Digital Data';
EXEC PRIDB_UPDATE_IDB_OBJECT_STATE 'File changed','Datei geändert', 'de-DE', 'Digital Data';
EXEC PRIDB_UPDATE_IDB_OBJECT_STATE 'File deleted','Datei gelöscht', 'de-DE', 'Digital Data';
EXEC PRIDB_UPDATE_IDB_OBJECT_STATE 'Metadata changed','Metadaten geändert', 'de-DE', 'Digital Data';
EXEC PRIDB_UPDATE_IDB_OBJECT_STATE 'Attributevalue deleted','Attributwert geändert', 'de-DE', 'Digital Data';
GO
CREATE VIEW VWIDB_OBJ_STATES_LANGUAGE AS
SELECT
A.GUID,
B.TERM_VALUE AS STATE_TERM,
A.LANG_ID,
C.LANG_CODE,
D.TITLE,
E.TERM_VALUE ADDED_WHO,
A.ADDED_WHEN,
F.TERM_VALUE CHANGED_WHO,
A.CHANGED_WHEN
FROM TBIDB_OBJ_STATES_LANGUAGE A INNER JOIN TBIDB_TERM_VALUE_VARCHAR B ON A.TERM_ID = B.GUID
INNER JOIN TBIDB_LANGUAGE C ON A.LANG_ID = C.GUID
INNER JOIN TBIDB_OBJ_STATES D ON A.STATE_ID = D.GUID
INNER JOIN TBIDB_TERM_VALUE_VARCHAR E ON A.ADDED_WHO = E.GUID
INNER JOIN TBIDB_TERM_VALUE_VARCHAR F ON A.ADDED_WHO = F.GUID
GO
-- =============================================
-- Author: DD MS
-- Changed: 25.11.2021 @TERM_TYPE_ID = 6
@@ -3280,16 +3445,18 @@ DECLARE
@Bool4 Varchar(1),
@Integer24 Varchar(20),
@Float Varchar(20),
@RELPATH Varchar(200)
@RELPATH Varchar(200),
@SEQUENCE Integer
SET @SQL1 = 'CREATE VIEW VWIDB_DOC_DATA_' + UPPER(LEFT(@pLANGCODE,2)) + ' AS '+ char(10) + 'SELECT ' + char(10) + ' T.IDB_OBJ_ID' + char(10)
BEGIN
DECLARE c_REDO CURSOR FOR
SELECT ATTR_ID,ATTR_TITLE,TYPE_ID
FROM VWIDB_BE_ATTRIBUTE WHERE VIEW_VISIBLE = 1 AND LANG_CODE = @pLANGCODE ORDER BY VIEW_SEQUENCE
DECLARE c_PRIDB_CREATE_VIEW_DOC_DATA CURSOR FOR
SELECT DISTINCT ATTR_ID,ATTR_TITLE,TYPE_ID,VIEW_SEQUENCE
FROM VWIDB_BE_ATTRIBUTE WHERE VIEW_VISIBLE = 1 AND LANG_CODE = @pLANGCODE AND ATTR_ID IS NOT NULL
ORDER BY VIEW_SEQUENCE
OPEN c_REDO
FETCH NEXT FROM c_REDO INTO @ATTR_ID,@TITLE,@TYPID
OPEN c_PRIDB_CREATE_VIEW_DOC_DATA
FETCH NEXT FROM c_PRIDB_CREATE_VIEW_DOC_DATA INTO @ATTR_ID,@TITLE,@TYPID,@SEQUENCE
WHILE @@FETCH_STATUS = 0
BEGIN
DECLARE @FN_COMMAND as VARCHAR(100), @FN_TYP as VARCHAR(50)
@@ -3314,12 +3481,13 @@ BEGIN
SET @FN_TYP = 'INTEGER_VECTOR'
SET @FN_COMMAND = REPLACE(@FN_COMMAND,'@TYPE',@FN_TYP)
PRINT @FN_COMMAND
SET @SQL1 += char(9) + ',' + @FN_COMMAND + char(9) + char(9) + ' AS ''' + @TITLE + '''' + char(10)
FETCH NEXT FROM c_REDO INTO @ATTR_ID,@TITLE,@TYPID
--PRINT @SQL1
FETCH NEXT FROM c_PRIDB_CREATE_VIEW_DOC_DATA INTO @ATTR_ID,@TITLE,@TYPID,@SEQUENCE
END
CLOSE c_REDO
DEALLOCATE c_REDO
CLOSE c_PRIDB_CREATE_VIEW_DOC_DATA
DEALLOCATE c_PRIDB_CREATE_VIEW_DOC_DATA
SET @SQL1 += char(9) + ',T5.TERM_VALUE AS DocExtension' + char(10)
+ char(9) + ',T5.TERM_VALUE AS DocName' + char(10)
+ char(9) + ',CONCAT(T4.TERM_VALUE,''\'',T5.TERM_VALUE) AS DocRelativePath' + char(10)
@@ -4603,22 +4771,74 @@ BEGIN
END
END
GO
-- =============================================
-- Author: DD MS 21.01.2022
-- =============================================
CREATE PROCEDURE [dbo].[PRIDB_NEW_VERSION_OBJECT] @IDB_OBJ_ID BIGINT,@NEW_IDB_OBJ_ID BIGINT, @WHO VARCHAR(100)
AS
BEGIN
UPDATE TBIDB_OBJECT SET ACTIVE = 0, CHANGED_WHO = @WHO WHERE IDB_OBJ_ID = @IDB_OBJ_ID;
UPDATE TBIDB_OBJECT SET IS_VERSION = 1,ACTIVE = 1,PARENT_OBJ_ID = @IDB_OBJ_ID WHERE IDB_OBJ_ID = @NEW_IDB_OBJ_ID;
EXEC PRIDB_NEW_STATE_OBJECT @IDB_OBJ_ID, 'File Versioned',@WHO;
INSERT INTO [dbo].[TBIDB_OBJECT_METADATA]
([IDB_OBJ_ID]
,[ATTR_ID]
,[TEXT_TERM_LANG_ID]
,[INT_TERM_ID]
,[DEC_TERM_ID]
,[FLOAT_TERM_ID]
,[DATE_TERM_ID]
,[ADDED_WHO]
,[ADDED_WHEN]
,[CHANGED_WHO]
,[CHANGED_WHEN]
,[DATETIME_TERM_ID])
SELECT @NEW_IDB_OBJ_ID
,[ATTR_ID]
,[TEXT_TERM_LANG_ID]
,[INT_TERM_ID]
,[DEC_TERM_ID]
,[FLOAT_TERM_ID]
,[DATE_TERM_ID]
,[ADDED_WHO]
,[ADDED_WHEN]
,[CHANGED_WHO]
,[CHANGED_WHEN]
,[DATETIME_TERM_ID] FROM TBIDB_OBJECT_METADATA WHERE IDB_OBJ_ID = @IDB_OBJ_ID;
INSERT INTO [dbo].[TBIDB_OBJ_MY_STATES]
([IDB_OBJ_ID]
,[STATE_ID]
,[ADDED_WHO]
,[ADDED_WHEN]
,[CHANGED_WHO]
,[CHANGED_WHEN])
SELECT @NEW_IDB_OBJ_ID
,[STATE_ID]
,[ADDED_WHO]
,[ADDED_WHEN]
,[CHANGED_WHO]
,[CHANGED_WHEN] FROM TBIDB_OBJ_MY_STATES WHERE IDB_OBJ_ID = @IDB_OBJ_ID;
END
GO
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('Doctype',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('OriginFileName',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('OriginCreationDatetime',6,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('OriginChangedDatetime',6,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('DisplayFileName',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('DisplayFileName1',1,0);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('DisplayFileName1',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('Dynamic Folder',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('EmailMessageID',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('EmailSubject',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('EmailFrom',1,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE) VALUES ('EmailDate',5,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE,MULTI_CONTEXT) VALUES ('PM-LOGGING',8,0,1);
INSERT INTO TBIDB_ATTRIBUTE (TITLE,TYP_ID,SYS_ATTRIBUTE,MULTI_CONTEXT) VALUES ('ObjectEvents',1,1,1);
INSERT INTO TBIDB_BE_ATTRIBUTE (BE_ID,ATTR_ID,DEFAULT_SEARCH_ATTRIBUTE) SELECT 1,GUID, 1 FROM TBIDB_ATTRIBUTE ;
INSERT INTO TBIDB_BE_ATTRIBUTE (BE_ID,ATTR_ID,DEFAULT_SEARCH_ATTRIBUTE) SELECT 1,GUID, 0 FROM TBIDB_ATTRIBUTE where TITLE = 'ObjectEvents' ;
INSERT INTO TBIDB_BE_ATTRIBUTE (BE_ID,ATTR_ID,DEFAULT_SEARCH_ATTRIBUTE) SELECT 1,GUID, 1 FROM TBIDB_ATTRIBUTE WHERE TITLE NOT IN ('PM-LOGGING','ObjectEvents') ;
INSERT INTO TBIDB_BE_ATTRIBUTE (BE_ID,ATTR_ID,DEFAULT_SEARCH_ATTRIBUTE) SELECT 1,GUID, 0 FROM TBIDB_ATTRIBUTE where TITLE IN ('PM-LOGGING','ObjectEvents') ;
GO
CREATE VIEW [dbo].[VWGI_ADMIN_OVERVIEW] AS