From a0b6b883b79029e5aae65477b7707e0c21ed83c2 Mon Sep 17 00:00:00 2001 From: Developer01 Date: Thu, 26 Sep 2024 20:35:46 +0200 Subject: [PATCH] MS FileFLOW ZooFLOW Komponenten --- .../03_FILEFLOW/Updates/2.5.4.1.sql | 63 +++ .../03_FILEFLOW/Updates/2.5.4.2.sql | 374 ++++++++++++++++++ 2 files changed, 437 insertions(+) create mode 100644 01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.1.sql create mode 100644 01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.2.sql diff --git a/01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.1.sql b/01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.1.sql new file mode 100644 index 0000000..5bca2e9 --- /dev/null +++ b/01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.1.sql @@ -0,0 +1,63 @@ +UPDATE TBDD_MODULES SET DB_VERSION = '2.5.4.1' where NAME = 'fileFLOW' +GO +--CHANGED 24.09.2024 SEQ in autom. Index +ALTER PROCEDURE [dbo].[PRDD_COPY_DOKPROFILE](@pDOCTYPE_ID INT,@pMODULE_ID INT) +AS +DECLARE @NEWDOCTYPE_ID INT + +BEGIN + INSERT INTO TBDD_DOKUMENTART ( + BEZEICHNUNG,EINGANGSART_ID,WINDREAM_DIRECT,KURZNAME,ZIEL_PFAD,BESCHREIBUNG,AKTIV,NAMENKONVENTION,OBJEKTTYP,FOLDER_FOR_INDEX,ERSTELLTWER,DUPLICATE_HANDLING + ) + SELECT + 'COPY_' + BEZEICHNUNG ,EINGANGSART_ID,WINDREAM_DIRECT,KURZNAME,ZIEL_PFAD,BESCHREIBUNG,0,NAMENKONVENTION,OBJEKTTYP,FOLDER_FOR_INDEX,'COPY-PROCEDURE',DUPLICATE_HANDLING FROM TBDD_DOKUMENTART WHERE GUID = @pDOCTYPE_ID + + SELECT @NEWDOCTYPE_ID = MAX(GUID) FROM TBDD_DOKUMENTART + INSERT INTO TBDD_DOKUMENTART_MODULE (DOKART_ID,MODULE_ID,ADDED_WHO) VALUES (@NEWDOCTYPE_ID,@pMODULE_ID,'COPY-PROCEDURE') + + INSERT INTO TBDD_INDEX_AUTOM ( + DOCTYPE_ID,INDEXNAME,VALUE,SEQUENCE, SQL_ACTIVE,CONNECTION_ID,SQL_RESULT,COMMENT,ACTIVE,ADDED_WHO) + SELECT @NEWDOCTYPE_ID,INDEXNAME,VALUE, [SEQUENCE], SQL_ACTIVE,CONNECTION_ID,SQL_RESULT,COMMENT,ACTIVE,'COPY-PROCEDURE' FROM TBDD_INDEX_AUTOM WHERE DOCTYPE_ID = @pDOCTYPE_ID + + DECLARE + @MANINDEX_ID INTEGER, + @NEW_ID INTEGER + DECLARE c_INDEX CURSOR FOR + SELECT GUID FROM TBDD_INDEX_MAN WHERE DOK_ID = @pDOCTYPE_ID ORDER BY SEQUENCE + OPEN c_INDEX + FETCH NEXT FROM c_INDEX INTO @MANINDEX_ID + WHILE @@FETCH_STATUS = 0 + BEGIN + INSERT INTO TBDD_INDEX_MAN ( + DOK_ID, NAME, WD_INDEX, COMMENT, DATATYPE, SUGGESTION, DEFAULT_VALUE, CONNECTION_ID, SEQUENCE, ACTIVE , ADDED_WHO ,SQL_RESULT, SQL_CHECK, OPTIONAL, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES) + SELECT @NEWDOCTYPE_ID, NAME, WD_INDEX, COMMENT, DATATYPE, SUGGESTION, DEFAULT_VALUE, CONNECTION_ID, [SEQUENCE], ACTIVE ,'COPY-PROCEDURE',SQL_RESULT, SQL_CHECK, OPTIONAL, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES FROM TBDD_INDEX_MAN WHERE GUID = @MANINDEX_ID + + SELECT @NEW_ID = MAX(GUID) FROM TBDD_INDEX_MAN WHERE DOK_ID = @NEWDOCTYPE_ID + + --Nachbearbeitungsfunktionen hinzufügen + IF EXISTS(SELECT * FROM TBDD_INDEX_MAN_POSTPROCESSING WHERE IDXMAN_ID = @MANINDEX_ID) + BEGIN + DECLARE + @NB_ID INTEGER + DECLARE c_NBFUNCTION CURSOR FOR + SELECT GUID FROM TBDD_INDEX_MAN_POSTPROCESSING WHERE IDXMAN_ID = @MANINDEX_ID ORDER BY SEQUENCE ASC + OPEN c_NBFUNCTION + FETCH NEXT FROM c_NBFUNCTION INTO @NB_ID + WHILE @@FETCH_STATUS = 0 + BEGIN + PRINT '@NB_ID: ' + CONVERT(VARCHAR(5),@NB_ID) + INSERT INTO TBDD_INDEX_MAN_POSTPROCESSING ( + IDXMAN_ID, TYPE, FUNCTION1, FUNCTION2, TEXT1, TEXT2, TEXT3, SEQUENCE, ADDED_WHO, VARIANT) + SELECT @NEW_ID, TYPE, FUNCTION1, FUNCTION2, TEXT1, TEXT2, TEXT3, [SEQUENCE], 'COPY-ROUTINE',VARIANT + FROM TBDD_INDEX_MAN_POSTPROCESSING WHERE GUID = @NB_ID + FETCH NEXT FROM c_NBFUNCTION INTO @NB_ID + END + CLOSE c_NBFUNCTION + DEALLOCATE c_NBFUNCTION + END + + FETCH NEXT FROM c_INDEX INTO @MANINDEX_ID + END + CLOSE c_INDEX + DEALLOCATE c_INDEX +END diff --git a/01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.2.sql b/01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.2.sql new file mode 100644 index 0000000..b6cfb06 --- /dev/null +++ b/01_SMART_UP_TOOLS/03_FILEFLOW/Updates/2.5.4.2.sql @@ -0,0 +1,374 @@ +UPDATE TBDD_MODULES SET DB_VERSION = '2.5.4.1' where NAME = 'fileFLOW' +GO +--26.09 MS Shortname angepasst +ALTER VIEW [dbo].[VWGI_DOCTYPE_IDB] AS +SELECT + T4.GUID as DOCTYPE_ID, + T4.BEZEICHNUNG AS DOCTYPE, + T4.BEZEICHNUNG AS DOCTYPE_ONLY, + T4.KURZNAME, + T4.FOLDER_FOR_INDEX DYNAMIC_FOLDER, + T4.AKTIV, + T4.NAMENKONVENTION, + T4.OBJEKTTYP, + T6.OBJECT_TITLE AS OBJECT_STORE, + T4.IDB_OBJECT_STORE_ID OBJECT_ST_ID, + T7.CAT_TITLE AS OBJECT_ST_PATH, + T4.ERSTELLTWANN, + T4.GEAENDERTWANN, + T4.SEQUENCE, + T4.IDB_DOCTYPE_ID +FROM + DD_ECM.dbo.TBDD_DOKUMENTART T4 LEFT JOIN IDB.dbo.TBIDB_OBJECT_STORE T6 ON T4.IDB_OBJECT_STORE_ID = T6.GUID + LEFT JOIN IDB.dbo.TBIDB_CATALOG T7 On T6.CAT_ID = T7.GUID +WHERE + T4.GUID in (SELECT DOKART_ID FROM DD_ECM.dbo.TBDD_DOKUMENTART_MODULE WHERE MODULE_ID = (SELECT GUID FROM DD_ECM.dbo.TBDD_MODULES WHERE SHORT_NAME = 'fileFLOW')) +GO + + + +--26.09 MS Shortname angepasst +ALTER VIEW [dbo].[VWGI_DOCTYPE_USER] AS +SELECT DISTINCT + T.GUID AS [USER_ID], + T.USERNAME, + --T2.NAME AS GROUP_NAME, + T3.DOCTYPE_ID, + T4.BEZEICHNUNG AS DOCTYPE, + T4.BEZEICHNUNG AS DOCTYPE_ONLY, + T4.KURZNAME, + T4.ZIEL_PFAD, + T4.AKTIV, + T4.NAMENKONVENTION, + T4.OBJEKTTYP, + T4.IDB_OBJECT_STORE_ID OBJECT_ST_ID, + T5.OBJECT_TITLE as OBJECT_ST_NAME, + T4.SEQUENCE +FROM + DD_ECM.dbo.TBDD_USER T, + DD_ECM.dbo.TBDD_GROUPS_USER T1, + DD_ECM.dbo.TBDD_GROUPS T2, + DD_ECM.dbo.TBDD_USRGRP_DOKTYPE T3, + DD_ECM.dbo.TBDD_DOKUMENTART T4, + IDB.dbo.TBIDB_OBJECT_STORE T5 +WHERE + T4.AKTIV = 1 AND + T.GUID = T1.[USER_ID] AND + T1.GROUP_ID = T2.GUID AND + T2.GUID = T3.GROUP_ID AND + T3.DOCTYPE_ID = T4.GUID AND + T4.IDB_OBJECT_STORE_ID = T5.GUID AND + + T4.GUID in (SELECT DOKART_ID FROM DD_ECM.dbo.TBDD_DOKUMENTART_MODULE WHERE MODULE_ID = (SELECT GUID FROM DD_ECM.dbo.TBDD_MODULES WHERE SHORT_NAME = 'fileFLOW')) +UNION +SELECT DISTINCT + T.GUID AS [USER_ID], + T.USERNAME, + --'' AS GROUP_NAME, + T4.GUID as DOCTYPE_ID, + T4.BEZEICHNUNG AS DOCTYPE, + T4.BEZEICHNUNG AS DOCTYPE_ONLY, + T4.KURZNAME, + T4.ZIEL_PFAD, + T4.AKTIV, + T4.NAMENKONVENTION, + T4.OBJEKTTYP, + T4.IDB_OBJECT_STORE_ID OBJECT_ST_ID, + T5.OBJECT_TITLE as OBJECT_ST_NAME, + T4.SEQUENCE +FROM + DD_ECM.dbo.TBDD_USER T, + DD_ECM.dbo.TBDD_USER_DOKTYPE T3, + DD_ECM.dbo.TBDD_DOKUMENTART T4, + IDB.dbo.TBIDB_OBJECT_STORE T5 +WHERE + T4.AKTIV = 1 AND + T.GUID = T3.[USER_ID] AND + T3.DOCTYPE_ID = T4.GUID AND + T4.IDB_OBJECT_STORE_ID = T5.GUID AND + T4.GUID in (SELECT DOKART_ID FROM DD_ECM.dbo.TBDD_DOKUMENTART_MODULE WHERE MODULE_ID = (SELECT GUID FROM DD_ECM.dbo.TBDD_MODULES WHERE SHORT_NAME = 'fileFLOW')) +GO + + + +--26.09 MS Shortname angepasst +ALTER VIEW [dbo].[VWGI_USER_GROUPS_RELATION] AS +SELECT DISTINCT + T.GUID AS [USER_ID], + T.USERNAME, + --T2.NAME AS GROUP_NAME, + T3.DOCTYPE_ID, + T4.BEZEICHNUNG AS DOCTYPE, + T4.BEZEICHNUNG AS DOCTYPE_ONLY, + T4.KURZNAME, + T4.ZIEL_PFAD, + T4.AKTIV, + T4.NAMENKONVENTION, + T4.OBJEKTTYP, + T4.IDB_OBJECT_STORE_ID OBJECT_ST_ID, + T4.SEQUENCE +FROM + DD_ECM.dbo.TBDD_USER T, + DD_ECM.dbo.TBDD_GROUPS_USER T1, + DD_ECM.dbo.TBDD_GROUPS T2, + DD_ECM.dbo.TBDD_USRGRP_DOKTYPE T3, + DD_ECM.dbo.TBDD_DOKUMENTART T4 +WHERE + T4.AKTIV = 1 AND + T.GUID = T1.[USER_ID] AND + T1.GROUP_ID = T2.GUID AND + T2.GUID = T3.GROUP_ID AND + T3.DOCTYPE_ID = T4.GUID AND + + T4.GUID in (SELECT DOKART_ID FROM DD_ECM.dbo.TBDD_DOKUMENTART_MODULE WHERE MODULE_ID = (SELECT GUID FROM DD_ECM.dbo.TBDD_MODULES WHERE SHORT_NAME = 'fileFLOW')) +UNION +SELECT DISTINCT + T.GUID AS [USER_ID], + T.USERNAME, + --'' AS GROUP_NAME, + T4.GUID as DOCTYPE_ID, + T4.BEZEICHNUNG AS DOCTYPE, + T4.BEZEICHNUNG AS DOCTYPE_ONLY, + T4.KURZNAME, + T4.ZIEL_PFAD, + T4.AKTIV, + T4.NAMENKONVENTION, + T4.OBJEKTTYP, + T4.IDB_OBJECT_STORE_ID OBJECT_ST_ID, + T4.SEQUENCE +FROM + DD_ECM.dbo.TBDD_USER T, + DD_ECM.dbo.TBDD_USER_DOKTYPE T3, + DD_ECM.dbo.TBDD_DOKUMENTART T4 +WHERE + T4.AKTIV = 1 AND + T.GUID = T3.[USER_ID] AND + T3.DOCTYPE_ID = T4.GUID AND + T4.GUID in (SELECT DOKART_ID FROM DD_ECM.dbo.TBDD_DOKUMENTART_MODULE WHERE MODULE_ID = (SELECT GUID FROM DD_ECM.dbo.TBDD_MODULES WHERE SHORT_NAME = 'fileFLOW')) +GO + + + +-- ============================================= +-- Author: DD MS +-- Changed: 09.06.2022 MS ADDED ZOOFLOW +-- Changed: 11.05.2022 MS ADDED PM +-- Changed: 13.08.2020 MS ADDED Zooflow +-- ============================================= +ALTER FUNCTION [dbo].[FNZF_GET_MODULE_INFO] (@pUSERNAME VARCHAR(100)) +RETURNS @Table TABLE + (SequentialOrder INT IDENTITY(1, 1), + [TYPE] VARCHAR(50), + [NAME] VARCHAR(50), + [VALUE] VARCHAR(512)) +AS +BEGIN +/* +This function checks all user-relevant relations an +*/ + DECLARE + @RESULT VARCHAR(500), + @USER_ID INTEGER, + @USER_PRENAME VARCHAR(50), + @USER_SURNAME VARCHAR(50), + @USER_SHORTNAME VARCHAR(50), + @USER_EMAIL VARCHAR(50), + @USER_LANGUAGE VARCHAR(10), + @USER_DATE_FORMAT VARCHAR(10), + @USER_ECM_ID INTEGER, + @IS_IN_MODULE VARCHAR(5), + @IS_ADMIN VARCHAR(5), + @USER_RIGHT_FILE_DEL BIT, + @USERCOUNT_LOGGED_IN INTEGER, + @MODULE_NAME VARCHAR(100), + @MODULE_GUID INTEGER, + @USER_GROUPNAME_CW VARCHAR(100), + @ADMIN_GROUPNAME_fileFLOW VARCHAR(100), + @USER_GROUPNAME_fileFLOW VARCHAR(100), + @ADMIN_GROUPNAME_PM VARCHAR(100), + @USER_GROUPNAME_PM VARCHAR(100), + @ADMIN_GROUPNAME_CW VARCHAR(100), + @USER_GROUPNAME_ZF VARCHAR(100), + @ADMIN_GROUPNAME_ZF VARCHAR(100) + + SET @USER_ID = 0 + SET @IS_ADMIN = 'False' + SET @IS_IN_MODULE = 'False' + SET @USERCOUNT_LOGGED_IN = 0 + SET @RESULT = '' + + SET @USER_GROUPNAME_CW = 'CW_USER' + SET @ADMIN_GROUPNAME_CW = 'CW_ADMINS' + SET @USER_GROUPNAME_fileFLOW = 'fileFLOW_USER' + SET @ADMIN_GROUPNAME_fileFLOW = 'fileFLOW_ADMINS' + SET @USER_GROUPNAME_PM = 'PM_USER' + SET @ADMIN_GROUPNAME_PM = 'PM_ADMINS' + SET @USER_GROUPNAME_ZF = 'ZOOFLOW_USER' + SET @ADMIN_GROUPNAME_ZF = 'ZOOFLOW_ADMINS' + + + IF NOT EXISTS(SELECT GUID FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@pUSERNAME)) + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'ERROR','USER NOT CONFIGURED OR LISTED') + ELSE + BEGIN + SELECT @USER_ID = GUID, @USER_ECM_ID = USERID_FK_INT_ECM, @USER_PRENAME = PRENAME, + @USER_SURNAME = NAME, @USER_SHORTNAME = SHORTNAME,@USER_EMAIL = EMAIL,@USER_LANGUAGE = LANGUAGE,@USER_DATE_FORMAT = DATE_FORMAT FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@pUSERNAME) + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_ID',@USER_ID); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_PRENAME',@USER_PRENAME); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_SURNAME',@USER_SURNAME); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_SHORTNAME',@USER_SHORTNAME); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_EMAIL',@USER_EMAIL); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_DATE_FORMAT',@USER_DATE_FORMAT); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_LANGUAGE',@USER_LANGUAGE); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('USER', 'USER_ECM_ID',@USER_ECM_ID); + + /*#### ClipboardWatcher ####*/ + SELECT @MODULE_GUID = GUID, @MODULE_NAME = NAME FROM TBDD_MODULES WHERE SHORT_NAME = 'CW' + SELECT @USERCOUNT_LOGGED_IN = COUNT(*) FROM TBDD_USER_MODULE_LOG_IN WHERE UPPER(MODULE) = UPPER(@MODULE_NAME) AND CLIENT_ID = 1 + --CHECK USER IS IN MODULE_USER_GROUP + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @USER_GROUPNAME_CW) + BEGIN + SET @IS_IN_MODULE = 'True' + SET @RESULT = 'User is part of Group (' + @USER_GROUPNAME_CW + ')' + IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID) + BEGIN + SET @RESULT = @RESULT + '| User is also configured in User-Modules' + select @IS_ADMIN = CONVERT(VARCHAR(5),T.IS_ADMIN),@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID + END + END + ELSE + BEGIN + SET @RESULT = 'User not part of group (' + @USER_GROUPNAME_CW + ')' + IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID) + BEGIN + SET @RESULT = @RESULT + '| BUT User configured in User-Modules' + SET @IS_IN_MODULE = 'True' + select @IS_ADMIN = CONVERT(VARCHAR(5),T.IS_ADMIN),@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID + END + END + + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @ADMIN_GROUPNAME_CW) + BEGIN + SET @RESULT = @RESULT + '| User is part of group (' + @ADMIN_GROUPNAME_CW + ')' + SET @IS_ADMIN = 'True' + SET @IS_IN_MODULE = 'True' + END + + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('CW', 'MODULE_ACCESS',@IS_IN_MODULE); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('CW', 'IS_ADMIN',@IS_ADMIN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('CW', 'USER_COUNT_LOGGED_IN',@USERCOUNT_LOGGED_IN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('CW', 'RESULT',@RESULT); + + /*#### fileFLOW ####*/ + SET @RESULT = '' + SELECT @MODULE_GUID = GUID, @MODULE_NAME = NAME FROM TBDD_MODULES WHERE SHORT_NAME = 'fileFLOW' + SELECT @USERCOUNT_LOGGED_IN = COUNT(*) FROM TBDD_USER_MODULE_LOG_IN WHERE UPPER(MODULE) = UPPER(@MODULE_NAME) AND CLIENT_ID = 1 + --CHECK USER IS IN MODULE_USER_GROUP + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @USER_GROUPNAME_fileFLOW) + BEGIN + SET @IS_IN_MODULE = 'True' + SET @RESULT = 'User is part of Group (' + @USER_GROUPNAME_fileFLOW + ')' + IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID) + BEGIN + SET @RESULT = @RESULT + '| User is also configured in User-Modules' + SET @IS_IN_MODULE = 'True' + select @IS_ADMIN = CONVERT(VARCHAR(5),T.IS_ADMIN),@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID + END + END + ELSE + BEGIN + SET @RESULT = 'User not part of group (' + @USER_GROUPNAME_fileFLOW + ')' + IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID) + BEGIN + SET @RESULT = @RESULT + '| BUT User configured in User-Modules' + SET @IS_IN_MODULE = 'True' + select @IS_ADMIN = CONVERT(VARCHAR(5),T.IS_ADMIN),@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID + END + END + + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @ADMIN_GROUPNAME_fileFLOW) + BEGIN + SET @RESULT = @RESULT + '| User is part of group (' + @ADMIN_GROUPNAME_fileFLOW + ')' + SET @IS_ADMIN = 'True' + SET @IS_IN_MODULE = 'True' + END + + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('fileFLOW', 'MODULE_ACCESS',@IS_IN_MODULE); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('fileFLOW', 'IS_ADMIN',@IS_ADMIN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('fileFLOW', 'USER_COUNT_LOGGED_IN',@USERCOUNT_LOGGED_IN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('fileFLOW', 'RESULT',@RESULT); + + + /*#### PM ####*/ + SET @RESULT = '' + SELECT @MODULE_GUID = GUID, @MODULE_NAME = NAME FROM TBDD_MODULES WHERE SHORT_NAME = 'PM' + SELECT @USERCOUNT_LOGGED_IN = COUNT(*) FROM TBDD_USER_MODULE_LOG_IN WHERE UPPER(MODULE) = UPPER(@MODULE_NAME) AND CLIENT_ID = 1 + --CHECK USER IS IN MODULE_USER_GROUP + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @USER_GROUPNAME_PM) + BEGIN + SET @IS_IN_MODULE = 'True' + SET @RESULT = 'User is part of Group (' + @USER_GROUPNAME_PM + ')' + IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID) + BEGIN + SET @RESULT = @RESULT + '| User is also configured in User-Modules' + SET @IS_IN_MODULE = 'True' + select @IS_ADMIN = CONVERT(VARCHAR(5),T.IS_ADMIN),@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID + END + END + ELSE + BEGIN + SET @RESULT = 'User not part of group (' + @USER_GROUPNAME_PM + ')' + IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID) + BEGIN + SET @RESULT = @RESULT + '| BUT User configured in User-Modules' + SET @IS_IN_MODULE = 'True' + select @IS_ADMIN = CONVERT(VARCHAR(5),T.IS_ADMIN),@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID + END + END + + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @ADMIN_GROUPNAME_PM) + BEGIN + SET @RESULT = @RESULT + '| User is part of group (' + @ADMIN_GROUPNAME_PM + ')' + SET @IS_ADMIN = 'True' + SET @IS_IN_MODULE = 'True' + END + + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('PM', 'MODULE_ACCESS',@IS_IN_MODULE); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('PM', 'IS_ADMIN',@IS_ADMIN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('PM', 'USER_COUNT_LOGGED_IN',@USERCOUNT_LOGGED_IN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('PM', 'RESULT',@RESULT); + /*#### ZOOFLOW ####*/ + SET @RESULT = '' + SELECT @MODULE_GUID = GUID, @MODULE_NAME = NAME FROM TBDD_MODULES WHERE NAME = 'ZooFlow' + SELECT @USERCOUNT_LOGGED_IN = COUNT(*) FROM TBDD_USER_MODULE_LOG_IN WHERE MODULE = @MODULE_NAME AND CLIENT_ID = 1 + --CHECK USER IS IN MODULE_USER_GROUP + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @USER_GROUPNAME_ZF) + BEGIN + SET @IS_IN_MODULE = 'True' + SET @RESULT = 'User is part of Group (' + @USER_GROUPNAME_PM + ')' + IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID) + BEGIN + SET @RESULT = @RESULT + '| User is also configured in User-Modules' + SET @IS_IN_MODULE = 'True' + select @IS_ADMIN = CONVERT(VARCHAR(5),T.IS_ADMIN),@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID + END + END + ELSE + BEGIN + SET @RESULT = 'User NOT part of group (' + @USER_GROUPNAME_ZF + ')' + END + + IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @ADMIN_GROUPNAME_ZF) + BEGIN + SET @RESULT = @RESULT + '| User is part of group (' + @ADMIN_GROUPNAME_ZF + ')' + SET @IS_ADMIN = 'True' + SET @IS_IN_MODULE = 'True' + END + + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('ZOOFLOW', 'MODULE_ACCESS',@IS_IN_MODULE); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('ZOOFLOW', 'IS_ADMIN',@IS_ADMIN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('ZOOFLOW', 'USER_COUNT_LOGGED_IN',@USERCOUNT_LOGGED_IN); + INSERT INTO @Table (TYPE,NAME,VALUE) VALUES ('ZOOFLOW', 'RESULT',@RESULT); + END +RETURN +END