MS Änderungen Update SWE

This commit is contained in:
Developer01 2025-01-28 11:59:44 +01:00
parent 46e3551e72
commit 52dc4ac4e2
6 changed files with 184 additions and 131 deletions

View File

@ -1,52 +1,52 @@
UPDATE TBDD_MODULES SET DB_VERSION = '2.4.0.1' where NAME = 'Process-Manager' UPDATE TBDD_MODULES SET DB_VERSION = '2.4.0.1' where NAME = 'Process-Manager'
GO GO
-- ================================================================= -- =================================================================
-- Die Procedure fügt einen Datensatz in die Tabelle TBTF_VALIDATOR_MESSAGE ein. -- Die Procedure fügt einen Datensatz in die Tabelle TBTF_VALIDATOR_MESSAGE ein.
-- --
-- ================================================================= -- =================================================================
-- Copyright (c) 2024 by Digital Data GmbH -- Copyright (c) 2024 by Digital Data GmbH
-- --
-- Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim -- Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim
-- Tel.: 0641/202360 • E-Mail: info-flow@digitaldata.works -- Tel.: 0641/202360 • E-Mail: info-flow@digitaldata.works
-- ================================================================= -- =================================================================
-- Creation Date / Author: 29.08.2024 / MP -- Creation Date / Author: 29.08.2024 / MP
-- ================================================================= -- =================================================================
-- History: -- History:
-- 29.08.2024 / MP - Prozedur erstellt -- 29.08.2024 / MP - Prozedur erstellt
CREATE PROCEDURE [dbo].[PRTF_NEW_VALIDATOR_MESSAGE] CREATE PROCEDURE [dbo].[PRTF_NEW_VALIDATOR_MESSAGE]
@DOC_ID BIGINT -- DocID oder IDB_OBJ_ID / 1 für alle Belege @DOC_ID BIGINT -- DocID oder IDB_OBJ_ID / 1 für alle Belege
, @MESSAGE_TITLE VARCHAR(100) -- Title aus GUI_LANGUAGE_PHRASE , @MESSAGE_TITLE VARCHAR(100) -- Title aus GUI_LANGUAGE_PHRASE
, @ADDED_WHO VARCHAR(100) -- Wo/Von wem wurde die Prozedur aufgerufen , @ADDED_WHO VARCHAR(100) -- Wo/Von wem wurde die Prozedur aufgerufen
, @IMAGE_INDEX INTEGER = 0 -- ICON: 0 = Info / 1 = Fehlende Eingabe / 2 = Fehler , @IMAGE_INDEX INTEGER = 0 -- ICON: 0 = Info / 1 = Fehlende Eingabe / 2 = Fehler
AS AS
BEGIN BEGIN
SET NOCOUNT ON; SET NOCOUNT ON;
IF NOT EXISTS (SELECT 1 FROM DD_ECM.dbo.TBDD_GUI_LANGUAGE_PHRASE IF NOT EXISTS (SELECT 1 FROM TBDD_GUI_LANGUAGE_PHRASE
WHERE TITLE = @MESSAGE_TITLE AND MODULE = 'PM' AND CAPT_TYPE = 'WF_MESSAGE' AND OBJ_NAME = 'frmValidator') WHERE TITLE = @MESSAGE_TITLE AND MODULE = 'PM' AND CAPT_TYPE = 'WF_MESSAGE' AND OBJ_NAME = 'frmValidator')
BEGIN BEGIN
-- Wenn es die Meldung nicht gibt, oder nicht korrekt konfiguriert ist, brechen wir hier ab -- Wenn es die Meldung nicht gibt, oder nicht korrekt konfiguriert ist, brechen wir hier ab
RETURN; RETURN;
END END
IF @IMAGE_INDEX > 2 IF @IMAGE_INDEX > 2
BEGIN BEGIN
SET @IMAGE_INDEX = 0; SET @IMAGE_INDEX = 0;
END END
INSERT INTO DD_ECM.dbo.TBTF_VALIDATOR_MESSAGE INSERT INTO TBTF_VALIDATOR_MESSAGE
( (
DocID DocID
, GUI_LANG_TITLE , GUI_LANG_TITLE
, ImageIndex , ImageIndex
, Active , Active
, ADDED_WHO , ADDED_WHO
) VALUES ( ) VALUES (
@DOC_ID @DOC_ID
, @MESSAGE_TITLE , @MESSAGE_TITLE
, @IMAGE_INDEX , @IMAGE_INDEX
, 1 -- wir fügen nur aktive Sätze ein , 1 -- wir fügen nur aktive Sätze ein
, @ADDED_WHO , @ADDED_WHO
); );
END END

View File

@ -1,33 +1,33 @@
UPDATE TBDD_MODULES SET DB_VERSION = '2.4.0.2' where NAME = 'Process-Manager' UPDATE TBDD_MODULES SET DB_VERSION = '2.4.0.2' where NAME = 'Process-Manager'
GO GO
-- ================================================================= -- =================================================================
-- Die Procedure setzt einen Datensatz der Tabelle TBTF_VALIDATOR_MESSAGE -- Die Procedure setzt einen Datensatz der Tabelle TBTF_VALIDATOR_MESSAGE
-- auf ACTIVE = 0 -- auf ACTIVE = 0
-- --
-- ================================================================= -- =================================================================
-- Copyright (c) 2024 by Digital Data GmbH -- Copyright (c) 2024 by Digital Data GmbH
-- --
-- Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim -- Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim
-- Tel.: 0641/202360 • E-Mail: info-flow@digitaldata.works -- Tel.: 0641/202360 • E-Mail: info-flow@digitaldata.works
-- ================================================================= -- =================================================================
-- Creation Date / Author: 30.08.2024 / MP -- Creation Date / Author: 30.08.2024 / MP
-- ================================================================= -- =================================================================
-- History: -- History:
-- 30.08.2024 / MP - Prozedur erstellt -- 30.08.2024 / MP - Prozedur erstellt
CREATE PROCEDURE [dbo].[PRTF_DEACTIVATE_VALIDATOR_MESSAGE] CREATE PROCEDURE [dbo].[PRTF_DEACTIVATE_VALIDATOR_MESSAGE]
@DOC_ID BIGINT -- DocID oder IDB_OBJ_ID / 1 für alle Belege @DOC_ID BIGINT -- DocID oder IDB_OBJ_ID / 1 für alle Belege
, @MESSAGE_TITLE VARCHAR(100) -- Title aus GUI_LANGUAGE_PHRASE , @MESSAGE_TITLE VARCHAR(100) -- Title aus GUI_LANGUAGE_PHRASE
, @CHANGED_WHO VARCHAR(100) -- Wo/Von wem wurde die Prozedur aufgerufen , @CHANGED_WHO VARCHAR(100) -- Wo/Von wem wurde die Prozedur aufgerufen
, @ACTIVE_FLAG INTEGER = 0 -- optionales ACTIVE-Flag - Default = 0 , @ACTIVE_FLAG INTEGER = 0 -- optionales ACTIVE-Flag - Default = 0
AS AS
BEGIN BEGIN
SET NOCOUNT ON; SET NOCOUNT ON;
UPDATE DD_ECM.dbo.TBTF_VALIDATOR_MESSAGE SET UPDATE TBTF_VALIDATOR_MESSAGE SET
Active = @ACTIVE_FLAG, Active = @ACTIVE_FLAG,
CHANGED_WHO = @CHANGED_WHO CHANGED_WHO = @CHANGED_WHO
WHERE DocID = @DOC_ID WHERE DocID = @DOC_ID
AND GUI_LANG_TITLE = @MESSAGE_TITLE; AND GUI_LANG_TITLE = @MESSAGE_TITLE;
END END

View File

@ -20,6 +20,4 @@ AS
UPDATE TBPM_CONTOL_TABLE_LANG SET CHANGED_WHEN = GETDATE() UPDATE TBPM_CONTOL_TABLE_LANG SET CHANGED_WHEN = GETDATE()
FROM INSERTED FROM INSERTED
WHERE TBPM_CONTOL_TABLE_LANG.GUID = INSERTED.GUID WHERE TBPM_CONTOL_TABLE_LANG.GUID = INSERTED.GUID
GO GO
UPDATE TBAPPSERV_CRON_DETAIL set COMMAND = 'SELECT IIF(LANG.CAPTION IS NULL,T.SPALTEN_HEADER,LANG.CAPTION) SPALTEN_HEADER_LANG, T.*, T1.PROFIL_ID, IIF(LANG.LANG_CODE IS NULL,''de-DE'', LANG.LANG_CODE) LANG_CODE from TBPM_CONTROL_TABLE T INNER JOIN TBPM_PROFILE_CONTROLS T1 ON T.CONTROL_ID = T1.GUID
LEFT JOIN (SELECT * FROM TBPM_CONTOL_TABLE_LANG) LANG ON T.GUID = LANG.COL_ID WHERE T1.CONTROL_ACTIVE = 1' WHERE TITLE = 'TBPM_CONTROL_TABLE'

View File

@ -12,7 +12,7 @@ BEGIN
ALTER TABLE TBPM_PROFILE ALTER TABLE TBPM_PROFILE
ALTER COLUMN DISPLAY_MODE VARCHAR(250) NOT NULL; ALTER COLUMN DISPLAY_MODE VARCHAR(250) NOT NULL;
END END
IF COL_LENGTH('TBPM_PROFILE', 'SHOW_DOCUMENT') IS NOT NULL IF COL_LENGTH('TBPM_PROFILE', 'SHOW_DOCUMENT') IS NULL
BEGIN BEGIN
ALTER TABLE TBPM_PROFILE ALTER TABLE TBPM_PROFILE
ADD SHOW_DOCUMENT BIT NOT NULL DEFAULT 1; ADD SHOW_DOCUMENT BIT NOT NULL DEFAULT 1;

View File

@ -31,51 +31,106 @@ END
ELSE ELSE
PRINT 'COLUMN SAVE_CHANGE_ON_ENABLED DOES EXIST' PRINT 'COLUMN SAVE_CHANGE_ON_ENABLED DOES EXIST'
GO GO
ALTER VIEW [dbo].[VWPM_CONTROL_INDEX] AS DECLARE @SQL NVARCHAR(max)
SELECT TOP 100 PERCENT IF EXISTS (SELECT name FROM master.sys.databases WHERE name = N'IDB')
T1.GUID, BEGIN
T.GUID PROFIL_ID, SET @SQL = 'CREATE OR ALTER VIEW [dbo].[VWPM_CONTROL_INDEX] AS
T.NAME PROFIL_NAME, SELECT TOP 100 PERCENT
T.LOG_INDEX, T1.GUID,
T1.NAME CTRL_NAME, T.GUID PROFIL_ID,
T1.CTRL_TYPE, T.NAME PROFIL_NAME,
T1.CTRL_TEXT, T.LOG_INDEX,
T1.X_LOC, T1.NAME CTRL_NAME,
T1.Y_LOC, T1.CTRL_TYPE,
T1.FONT_COLOR, T1.CTRL_TEXT,
T1.FONT_FAMILY, T1.X_LOC,
T1.FONT_SIZE, T1.Y_LOC,
T1.FONT_STYLE, T1.FONT_COLOR,
T1.WIDTH, T1.FONT_FAMILY,
T1.HEIGHT, T1.FONT_SIZE,
COALESCE(T1.INDEX_NAME,'') INDEX_NAME, T1.FONT_STYLE,
COALESCE((SELECT TYP_ID FROM IDB.dbo.TBIDB_ATTRIBUTE WHERE TITLE = COALESCE(T1.INDEX_NAME,'')),'0') AS IDB_TYP, T1.WIDTH,
T1.VALIDATION, T1.HEIGHT,
T1.CHOICE_LIST, COALESCE(T1.INDEX_NAME,'''') INDEX_NAME,
T1.TYP, COALESCE((SELECT TYP_ID FROM IDB.dbo.TBIDB_ATTRIBUTE WHERE TITLE = COALESCE(T1.INDEX_NAME,'''')),''0'') AS IDB_TYP,
T1.CONNECTION_ID, T1.VALIDATION,
CASE WHEN T1.[SQL_UEBERPRUEFUNG] IS NULL THEN '' ELSE T1.[SQL_UEBERPRUEFUNG] END AS [SQL_UEBERPRUEFUNG], T1.CHOICE_LIST,
T1.[READ_ONLY], T1.TYP,
T1.LOAD_IDX_VALUE, T1.CONNECTION_ID,
T1.DEFAULT_VALUE, CASE WHEN T1.[SQL_UEBERPRUEFUNG] IS NULL THEN '''' ELSE T1.[SQL_UEBERPRUEFUNG] END AS [SQL_UEBERPRUEFUNG],
T1.REGEX_MATCH, T1.[READ_ONLY],
T1.REGEX_MESSAGE_DE, T1.LOAD_IDX_VALUE,
T1.REGEX_MESSAGE_EN, T1.DEFAULT_VALUE,
T1.OVERWRITE_DATA, T1.REGEX_MATCH,
T1.SET_CONTROL_DATA, T1.REGEX_MESSAGE_DE,
T1.SAVE_CHANGE_ON_ENABLED, T1.REGEX_MESSAGE_EN,
T1.FORMAT_STRING CTRL_FORMAT_STRING, T1.OVERWRITE_DATA,
T1.BACKCOLOR_IF CTRL_BACKCOLOR_IF T1.SET_CONTROL_DATA,
FROM T1.SAVE_CHANGE_ON_ENABLED,
TBPM_PROFILE T, T1.FORMAT_STRING CTRL_FORMAT_STRING,
TBPM_PROFILE_CONTROLS T1 T1.BACKCOLOR_IF CTRL_BACKCOLOR_IF
WHERE FROM
T.GUID = T1.PROFIL_ID TBPM_PROFILE T,
AND T1.CONTROL_ACTIVE = 1 TBPM_PROFILE_CONTROLS T1
ORDER BY WHERE
T.GUID, T.GUID = T1.PROFIL_ID
T1.X_LOC, AND T1.CONTROL_ACTIVE = 1
T1.Y_LOC ORDER BY
T.GUID,
T1.X_LOC,
T1.Y_LOC'
END
ELSE
BEGIN
SET @SQL = 'ALTER VIEW [dbo].[VWPM_CONTROL_INDEX] AS
SELECT TOP 100 PERCENT
T1.GUID,
T.GUID PROFIL_ID,
T.NAME PROFIL_NAME,
T.LOG_INDEX,
T1.NAME CTRL_NAME,
T1.CTRL_TYPE,
T1.CTRL_TEXT,
T1.X_LOC,
T1.Y_LOC,
T1.FONT_COLOR,
T1.FONT_FAMILY,
T1.FONT_SIZE,
T1.FONT_STYLE,
T1.WIDTH,
T1.HEIGHT,
COALESCE(T1.INDEX_NAME,'''') INDEX_NAME,
--COALESCE((SELECT TYP_ID FROM IDB.dbo.TBIDB_ATTRIBUTE WHERE TITLE = COALESCE(T1.INDEX_NAME,'''')),''0'') AS IDB_TYP,
T1.VALIDATION,
T1.CHOICE_LIST,
T1.TYP,
T1.CONNECTION_ID,
CASE WHEN T1.[SQL_UEBERPRUEFUNG] IS NULL THEN '''' ELSE T1.[SQL_UEBERPRUEFUNG] END AS [SQL_UEBERPRUEFUNG],
T1.[READ_ONLY],
T1.LOAD_IDX_VALUE,
T1.DEFAULT_VALUE,
T1.REGEX_MATCH,
T1.REGEX_MESSAGE_DE,
T1.REGEX_MESSAGE_EN,
T1.OVERWRITE_DATA,
T1.SET_CONTROL_DATA,
T1.SAVE_CHANGE_ON_ENABLED,
T1.FORMAT_STRING CTRL_FORMAT_STRING,
T1.BACKCOLOR_IF CTRL_BACKCOLOR_IF
FROM
TBPM_PROFILE T,
TBPM_PROFILE_CONTROLS T1
WHERE
T.GUID = T1.PROFIL_ID
AND T1.CONTROL_ACTIVE = 1
ORDER BY
T.GUID,
T1.X_LOC,
T1.Y_LOC'
END
EXEC (@SQL)
GO GO
ALTER VIEW [dbo].[VWPM_PROFILE_USER_UNION] AS ALTER VIEW [dbo].[VWPM_PROFILE_USER_UNION] AS