MS
This commit is contained in:
7835
08_ADDI/SQL/CREATE_DB_OBJECTS_RO.sql
Normal file
7835
08_ADDI/SQL/CREATE_DB_OBJECTS_RO.sql
Normal file
File diff suppressed because it is too large
Load Diff
BIN
08_ADDI/SQL/Copy/Controls.sql
Normal file
BIN
08_ADDI/SQL/Copy/Controls.sql
Normal file
Binary file not shown.
5
08_ADDI/SQL/Entwurf/Search_all.sql
Normal file
5
08_ADDI/SQL/Entwurf/Search_all.sql
Normal file
@@ -0,0 +1,5 @@
|
||||
select T.VALUE,
|
||||
T.RECORD_ID, T.CONTROL_ID,T.CONTROL_COLUMN,T1.FORM_TITLE
|
||||
from VWPMO_VALUES T, TBPMO_FORM_VIEW T1 where
|
||||
T.FORM_ID = T1.FORM_ID AND
|
||||
T.VALUE LIKE '%den R%' ORDER BY T.VALUE
|
||||
43
08_ADDI/SQL/Hilfe/Split;durchführen.sql
Normal file
43
08_ADDI/SQL/Hilfe/Split;durchführen.sql
Normal file
@@ -0,0 +1,43 @@
|
||||
|
||||
BEGIN
|
||||
DECLARE
|
||||
@GUID INTEGER,
|
||||
@CONTROL_ID INTEGER,
|
||||
@RECORD_ID INTEGER,
|
||||
@VALUE VARCHAR(MAX),
|
||||
@NEW_VALUE VARCHAR(MAX),
|
||||
@INDEX INTEGER,
|
||||
@ADDED_WHO VARCHAR(50)
|
||||
|
||||
DECLARE c_Values CURSOR FOR
|
||||
SELECT GUID,CONTROL_ID,RECORD_ID,VALUE,ADDED_WHO FROM TBPMO_CONTROL_VALUE WHERE VALUE LIKE '%;%' AND CONTROL_ID NOT IN (SELECT GUID FROM TBPMO_CONTROL WHERE CONTROL_TYPE_ID = 2) ORDER BY RECORD_ID,CONTROL_ID
|
||||
OPEN c_Values
|
||||
FETCH NEXT FROM c_Values INTO @GUID,@CONTROL_ID,@RECORD_ID,@VALUE,@ADDED_WHO
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @INDEX = 0
|
||||
--#####
|
||||
DECLARE c_NEWVALUES CURSOR FOR
|
||||
SELECT Item FROM dbo.FN_SPLIT_STRING(@VALUE, ';')
|
||||
OPEN c_NEWVALUES
|
||||
FETCH NEXT FROM c_NEWVALUES INTO @NEW_VALUE
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @NEW_VALUE = LTRIM(@NEW_VALUE)
|
||||
IF @INDEX = 0
|
||||
UPDATE TBPMO_CONTROL_VALUE SET VALUE = @NEW_VALUE WHERE GUID = @GUID
|
||||
ELSE
|
||||
INSERT INTO TBPMO_CONTROL_VALUE (CONTROL_ID,RECORD_ID,VALUE,ADDED_WHO) VALUES
|
||||
(@CONTROL_ID,@RECORD_ID,@NEW_VALUE,@ADDED_WHO)
|
||||
PRINT CONVERT(VARCHAR(5),@CONTROL_ID) + '#' + CONVERT(VARCHAR(5),@INDEX) + '-' + @NEW_VALUE
|
||||
SET @INDEX = @INDEX + 1
|
||||
FETCH NEXT FROM c_NEWVALUES INTO @NEW_VALUE
|
||||
END
|
||||
CLOSE c_NEWVALUES
|
||||
DEALLOCATE c_NEWVALUES
|
||||
--#####
|
||||
FETCH NEXT FROM c_Values INTO @GUID,@CONTROL_ID,@RECORD_ID,@VALUE,@ADDED_WHO
|
||||
END
|
||||
CLOSE c_Values
|
||||
DEALLOCATE c_Values
|
||||
END
|
||||
43
08_ADDI/SQL/Hilfe/Split;wiederAufheben.sql
Normal file
43
08_ADDI/SQL/Hilfe/Split;wiederAufheben.sql
Normal file
@@ -0,0 +1,43 @@
|
||||
BEGIN
|
||||
DECLARE
|
||||
@CONTROL_ID INTEGER,
|
||||
@RECORD_ID INTEGER,
|
||||
@ACT_RECORD_ID INTEGER,
|
||||
@VALUE VARCHAR(MAX),
|
||||
@NEW_VALUE VARCHAR(MAX),
|
||||
@INDEX INTEGER
|
||||
|
||||
DECLARE c_Control_Values CURSOR FOR
|
||||
select CONTROL_ID,RECORD_ID FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID IN (SELECT GUID FROM TBPMO_CONTROL WHERE CONTROL_TYPE_ID = 2) GROUP BY CONTROL_ID,RECORD_ID HAVING COUNT(GUID) > 1 ORDER BY RECORD_ID
|
||||
OPEN c_Control_Values
|
||||
FETCH NEXT FROM c_Control_Values INTO @CONTROL_ID, @RECORD_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
PRINT 'RECORD: ' + CONVERT(VARCHAR(10),@RECORD_ID)
|
||||
SET @NEW_VALUE = ''
|
||||
SET @INDEX = 0
|
||||
DECLARE c_ROWVALUES CURSOR FOR
|
||||
SELECT VALUE FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = @CONTROL_ID AND RECORD_ID = @RECORD_ID
|
||||
OPEN c_ROWVALUES
|
||||
FETCH NEXT FROM c_ROWVALUES INTO @VALUE
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF @INDEX = 0
|
||||
SET @NEW_VALUE = @VALUE
|
||||
ELSE
|
||||
SET @NEW_VALUE += ';' + @VALUE
|
||||
SET @INDEX += 1
|
||||
FETCH NEXT FROM c_ROWVALUES INTO @VALUE
|
||||
END
|
||||
PRINT 'JETZT DAS UPDATE UND DELETE FÜR RECORD: ' + CONVERT(VARCHAR(10),@RECORD_ID)
|
||||
PRINT '@NEW_VALUE: ' + CONVERT(VARCHAR(500),@NEW_VALUE)
|
||||
DELETE FROM TBPMO_CONTROL_VALUE WHERE RECORD_ID = @RECORD_ID AND CONTROL_ID = @CONTROL_ID
|
||||
INSERT INTO TBPMO_CONTROL_VALUE (CONTROL_ID,RECORD_ID,VALUE) VALUES (@CONTROL_ID,@RECORD_ID,@NEW_VALUE)
|
||||
CLOSE c_ROWVALUES
|
||||
DEALLOCATE c_ROWVALUES
|
||||
|
||||
FETCH NEXT FROM c_Control_Values INTO @CONTROL_ID, @RECORD_ID
|
||||
END
|
||||
CLOSE c_Control_Values
|
||||
DEALLOCATE c_Control_Values
|
||||
END
|
||||
BIN
08_ADDI/SQL/Kunden/Renolit/PRPMO_CLIENT_AFTER_RECORD_INSERT.sql
Normal file
BIN
08_ADDI/SQL/Kunden/Renolit/PRPMO_CLIENT_AFTER_RECORD_INSERT.sql
Normal file
Binary file not shown.
12
08_ADDI/SQL/SQL Skripte - Help/DATABASE_RELEVANT.sql
Normal file
12
08_ADDI/SQL/SQL Skripte - Help/DATABASE_RELEVANT.sql
Normal file
@@ -0,0 +1,12 @@
|
||||
Use master
|
||||
Go
|
||||
|
||||
Alter Database DD_ECM Set Single_User With RollBack Immediate
|
||||
|
||||
|
||||
ALTER DATABASE DD_ECM -- put your database name here
|
||||
COLLATE Latin1_General_CI_AS
|
||||
|
||||
ALTER DATABASE DD_ECM
|
||||
SET MULTI_USER;
|
||||
GO
|
||||
111
08_ADDI/SQL/SQL Skripte - Help/ENTITY_REFRESH.sql
Normal file
111
08_ADDI/SQL/SQL Skripte - Help/ENTITY_REFRESH.sql
Normal file
@@ -0,0 +1,111 @@
|
||||
DECLARE
|
||||
@ENTITY_ID INTEGER,
|
||||
@CONTROL_ID INTEGER,
|
||||
@GUID INTEGER,
|
||||
@VALUE VARCHAR(MAX)
|
||||
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
SELECT FORM_ID FROM TBPMO_FORM_VIEW WHERE DOCUMENT_VIEW = 1
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'de-DE' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Filename' AND HEADER_CAPTION = 'Dateiname')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,COLUMN_VIEW,HEADER_CAPTION) VALUES
|
||||
(@ENTITY_ID,'Filename','Dateiname')
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'de-DE' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Doctype' AND HEADER_CAPTION = 'Dokumentart')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,COLUMN_VIEW,HEADER_CAPTION) VALUES
|
||||
(@ENTITY_ID,'Doctype','Dokumentart')
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'de-DE' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'IN_WORK' AND HEADER_CAPTION = 'in work?')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,COLUMN_VIEW,HEADER_CAPTION,WIDTH) VALUES
|
||||
(@ENTITY_ID,'IN_WORK','in work?',50)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'de-DE' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'IN_WORK_USER' AND HEADER_CAPTION = 'IW_USER')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,COLUMN_VIEW,HEADER_CAPTION,VISIBLE) VALUES
|
||||
(@ENTITY_ID,'IN_WORK_USER','IW_USER',0)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'de-DE' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'IN_WORK_COMMENT' AND HEADER_CAPTION = 'IW_COMMENT')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,COLUMN_VIEW,HEADER_CAPTION,VISIBLE) VALUES
|
||||
(@ENTITY_ID,'IN_WORK_COMMENT','IW_COMMENT',0)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'de-DE' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Creation_DateTime' AND HEADER_CAPTION = 'Erstellt')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,COLUMN_VIEW,HEADER_CAPTION,WIDTH) VALUES
|
||||
(@ENTITY_ID,'Creation_DateTime','Erstellt',100)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'de-DE' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Change_DateTime' AND HEADER_CAPTION = 'Geändert')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,COLUMN_VIEW,HEADER_CAPTION,WIDTH) VALUES
|
||||
(@ENTITY_ID,'Change_DateTime','Geändert',100)
|
||||
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'en-US' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Filename' AND HEADER_CAPTION = 'Filename')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,LANGUAGE,COLUMN_VIEW,HEADER_CAPTION) VALUES
|
||||
(@ENTITY_ID,'en-US','Filename','Filename')
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'en-US' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Doctype' AND HEADER_CAPTION = 'Doctype')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,LANGUAGE,COLUMN_VIEW,HEADER_CAPTION) VALUES
|
||||
(@ENTITY_ID,'en-US','Doctype','Doctype')
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'en-US' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'IN_WORK' AND HEADER_CAPTION = 'in work?')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,LANGUAGE,COLUMN_VIEW,HEADER_CAPTION,WIDTH) VALUES
|
||||
(@ENTITY_ID,'en-US','IN_WORK','in work?',50)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'en-US' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'IN_WORK_USER' AND HEADER_CAPTION = 'IW_USER')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,LANGUAGE,COLUMN_VIEW,HEADER_CAPTION,VISIBLE) VALUES
|
||||
(@ENTITY_ID,'en-US','IN_WORK_USER','IW_USER',0)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'en-US' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'IN_WORK_COMMENT' AND HEADER_CAPTION = 'IW_COMMENT')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,LANGUAGE,COLUMN_VIEW,HEADER_CAPTION,VISIBLE) VALUES
|
||||
(@ENTITY_ID,'en-US','IN_WORK_COMMENT','IW_COMMENT',0)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'en-US' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Creation_DateTime' AND HEADER_CAPTION = 'Created')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,LANGUAGE,COLUMN_VIEW,HEADER_CAPTION,WIDTH) VALUES
|
||||
(@ENTITY_ID,'en-US','Creation_DateTime','Created',100)
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE LANGUAGE = 'en-US' AND ENTITY_ID = @ENTITY_ID AND
|
||||
COLUMN_VIEW = 'Change_DateTime' AND HEADER_CAPTION = 'Changed')
|
||||
INSERT INTO TBPMO_DOCSEARCH_RESULTLIST_CONFIG (ENTITY_ID,LANGUAGE,COLUMN_VIEW,HEADER_CAPTION,WIDTH) VALUES
|
||||
(@ENTITY_ID,'en-US','Change_DateTime','Changed',100)
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
GO
|
||||
|
||||
DECLARE
|
||||
@ENTITY_ID INTEGER,
|
||||
@CONTROL_ID INTEGER,
|
||||
@GUID INTEGER,
|
||||
@VALUE VARCHAR(MAX)
|
||||
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
SELECT GUID FROM TBPMO_FORM
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
EXEC [dbo].[PRPMO_CREATE_SQL] @ENTITY_ID
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
|
||||
EXECUTE [dbo].[PRPMO_CREATE_TEMP_VIEWS]
|
||||
|
||||
DECLARE
|
||||
@ENTITY_ID INTEGER
|
||||
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
SELECT GUID FROM TBPMO_FORM
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
EXEC [dbo].PRPMO_CREATE_ENTITY_TABLE @ENTITY_ID
|
||||
EXEC [dbo].PRPMO_ENTITY_TABLE_IMPORT_RECORDS @ENTITY_ID
|
||||
EXEC [dbo].PRPMO_CREATE_ENTITY_TABLE_VIEW @ENTITY_ID
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
@@ -0,0 +1,41 @@
|
||||
CREATE VIEW VWEXPORT_CONTRACT AS
|
||||
SELECT T.[GUID] AS CONTROL_GUID
|
||||
,T.[FORM_ID] AS CONTROL_FORM_ID
|
||||
,T.[CONTROL_TYPE_ID] AS CONTROL_TYPE_ID
|
||||
,T.[NAME] AS CONTROL_NAME
|
||||
,T.[FORMAT_TYPE] AS CONTROL_FORMAT_TYPE
|
||||
,T.[SHOW_COLUMN] AS CONTROL_SHOW_COLUMN
|
||||
,T.[COL_NAME] AS CONTROL_COL_NAME
|
||||
,T.[REQUIRED] AS CONTROL_REQUIRED
|
||||
,T.[PARENT_CONTROL_ID] AS CONTROL_PARENT_CONTROL_ID
|
||||
,T.[MASTER_DATA_ID] AS CONTROL_MASTER_DATA_ID
|
||||
,T.[MULTILINE] AS CONTROL_MULTILINE
|
||||
,T.[STATIC_LIST] AS CONTROL_STATIC_LIST
|
||||
,T.[DEFAULT_VALUE] AS CONTROL_DEFAULT_VALUE
|
||||
,T.[SQL_COMMAND_1] AS CONTROL_SQL_COMMAND_1
|
||||
,T.[CONNECTION_ID_1] AS CONTROL_CONNECTION_ID_1
|
||||
,T.[READ_ONLY] AS CONTROL_READ_ONLY
|
||||
,T.[VALIDATION] AS CONTROL_VALIDATION
|
||||
,T.[ADDED_WHO] AS CONTROL_ADDED_WHO
|
||||
,T.[VISIBLE] AS CONTROL_VISIBLE
|
||||
,T.[TREE_VIEW] AS CONTROL_TREE_VIEW
|
||||
,T.[SELECT_ONLY] AS CONTROL_SELECT_ONLY
|
||||
,T1.[GUID] AS CS_GUID
|
||||
,T1.[CONTROL_ID] AS CS_CONTROL_ID
|
||||
,T1.[SCREEN_ID] AS CS_SCREEN_ID
|
||||
,T1.[CONTROL_TEXT] AS CS_CONTROL_TEXT
|
||||
,T1.[X_LOC] AS CS_X_LOC
|
||||
,T1.[Y_LOC] AS CS_Y_LOC
|
||||
,T1.[HEIGHT] AS CS_HEIGHT
|
||||
,T1.[WIDTH] AS CS_WIDTH
|
||||
,T1.[FONT_FAMILY] AS CS_FONT_FAMILY
|
||||
,T1.[FONT_COLOR] AS CS_FONT_COLOR
|
||||
,T1.[FONT_SIZE] AS CS_FONT_SIZE
|
||||
,T1.[FONT_STYLE] AS CS_FONT_STYLE
|
||||
,T1.[BACK_COLOR] AS CS_BACK_COLOR
|
||||
,T1.[TAB_INDEX] AS CS_TAB_INDEX
|
||||
,T1.[TAB_STOP] AS CS_TAB_STOP
|
||||
FROM [dbo].[TBPMO_CONTROL] T, TBPMO_CONTROL_SCREEN T1 WHERE T.GUID = T1.CONTROL_ID AND T1.SCREEN_ID = 1 AND FORM_ID = 1
|
||||
GO
|
||||
|
||||
|
||||
52
08_ADDI/SQL/SQL Skripte - Help/Fulltext.sql
Normal file
52
08_ADDI/SQL/SQL Skripte - Help/Fulltext.sql
Normal file
@@ -0,0 +1,52 @@
|
||||
SELECT * FROM sys.fulltext_catalogs
|
||||
|
||||
|
||||
CREATE DATABASE TestDB
|
||||
GO
|
||||
|
||||
USE TestDB
|
||||
GO
|
||||
|
||||
CREATE TABLE [SupportTicketsSummaries] (
|
||||
ID INT NOT NULL
|
||||
,[ShortSummary] VARCHAR(200)
|
||||
,[Description] VARCHAR(200)
|
||||
,[Problem] VARCHAR(200)
|
||||
,[Solution] VARCHAR(200)
|
||||
,[Notes] VARCHAR(200)
|
||||
,CONSTRAINT PK_SupportTicketsSummaries PRIMARY KEY (ID)
|
||||
)
|
||||
GO
|
||||
|
||||
IF NOT EXISTS (
|
||||
SELECT 1
|
||||
FROM sys.fulltext_catalogs
|
||||
WHERE [name] = 'SupportTicketsSummariesFT'
|
||||
)
|
||||
BEGIN
|
||||
PRINT 'Creating full-text catalogue SupportTicketsSummariesFT'
|
||||
|
||||
CREATE FULLTEXT CATALOG [SupportTicketsSummariesFT]
|
||||
WITH accent_sensitivity = OFF AUTHORIZATION [dbo]
|
||||
|
||||
PRINT 'Adding columns to the full-text catalogue'
|
||||
|
||||
CREATE FULLTEXT INDEX ON [dbo].[SupportTicketsSummaries] (
|
||||
[ShortSummary] LANGUAGE 1033
|
||||
,[Description] LANGUAGE 1033
|
||||
,[Problem] LANGUAGE 1033
|
||||
,[Solution] LANGUAGE 1033
|
||||
) KEY INDEX PK_SupportTicketsSummaries
|
||||
ON [SupportTicketsSummariesFT] --catalog
|
||||
WITH STOPLIST = SYSTEM;
|
||||
|
||||
--you can alter the full text index after creating
|
||||
ALTER FULLTEXT INDEX ON [dbo].[SupportTicketsSummaries] ADD ([Notes] LANGUAGE 1033)
|
||||
END
|
||||
GO
|
||||
|
||||
USE MASTER
|
||||
|
||||
--DROP DATABASE TESTDB
|
||||
SELECT *
|
||||
FROM [dbo].[FullText] T WHERE CONTAINS([Text], '*29.04.2010*') AND CONTAINS([Text], '*Ladeliste*')
|
||||
4
08_ADDI/SQL/SQL Skripte - Help/Get_Object_Changes.sql
Normal file
4
08_ADDI/SQL/SQL Skripte - Help/Get_Object_Changes.sql
Normal file
@@ -0,0 +1,4 @@
|
||||
select *
|
||||
from sys.objects
|
||||
where (type = 'TR' or type = 'P')
|
||||
and modify_date > dateadd(m, -1, getdate()) order by modify_date desc
|
||||
120
08_ADDI/SQL/SQL Skripte - Help/Template Import.sql
Normal file
120
08_ADDI/SQL/SQL Skripte - Help/Template Import.sql
Normal file
@@ -0,0 +1,120 @@
|
||||
DECLARE @OLD_CONTROLID INTEGER,
|
||||
@NEW_CONTROLID INTEGER,
|
||||
@OLD_CONTROL_SCREEN_ID INTEGER,
|
||||
@NEW_CONTROL_SCREEN_ID INTEGER
|
||||
--delete from TBPMO_CONTROL_LANGUAGE where convert(date,added_when) = convert(date,GETDATE())
|
||||
--delete from tbpmo_Control_Screen where convert(date,added_when) = convert(date,GETDATE())
|
||||
--delete from tbpmo_Control where convert(date,added_when) = convert(date,GETDATE())
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
select guid FROM TBPMO_CONTROL_IMPORT WHERE FORM_ID = 1
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @OLD_CONTROLID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
|
||||
INSERT INTO [dbo].[TBPMO_CONTROL]
|
||||
([CONTROL_TYPE_ID]
|
||||
,[COL_NAME]
|
||||
,[CONNECTION_ID_1]
|
||||
,[CONNECTION_ID_2]
|
||||
,[DEFAULT_VALUE]
|
||||
,[FORM_ID]
|
||||
,[FORMAT_TYPE]
|
||||
,[NAME]
|
||||
,[SHOW_COLUMN]
|
||||
,[PARENT_CONTROL_ID]
|
||||
,[REQUIRED]
|
||||
,[SELECT_ONLY]
|
||||
,[STATIC_LIST]
|
||||
,[MASTER_DATA_ID]
|
||||
,[MULTILINE]
|
||||
,[READ_ONLY]
|
||||
,[SQL_COMMAND_1]
|
||||
,[SQL_COMMAND_2]
|
||||
,[TREE_VIEW]
|
||||
,[VALIDATION]
|
||||
,[VISIBLE]
|
||||
,[ADDED_WHO]
|
||||
,[AUTO_SUGGEST])
|
||||
|
||||
select [CONTROL_TYPE_ID]
|
||||
,COALESCE([COL_NAME],'')
|
||||
,[CONNECTION_ID_1]
|
||||
,[CONNECTION_ID_2]
|
||||
,COALESCE([DEFAULT_VALUE],'')
|
||||
,11
|
||||
,[FORMAT_TYPE]
|
||||
,[NAME]
|
||||
,[SHOW_COLUMN]
|
||||
,[PARENT_CONTROL_ID]
|
||||
,[REQUIRED]
|
||||
,[SELECT_ONLY]
|
||||
,COALESCE([STATIC_LIST],'')
|
||||
,[MASTER_DATA_ID]
|
||||
,[MULTILINE]
|
||||
,[READ_ONLY]
|
||||
,COALESCE([SQL_COMMAND_1],'')
|
||||
,COALESCE([SQL_COMMAND_2],'')
|
||||
,[TREE_VIEW]
|
||||
,[VALIDATION]
|
||||
,[VISIBLE]
|
||||
,'DD TEMPLATE Import'
|
||||
,[AUTO_SUGGEST]
|
||||
FROM TBPMO_CONTROL_IMPORT where GUID = @OLD_CONTROLID
|
||||
SELECT @NEW_CONTROLID = MAX(GUID) FROM TBPMO_CONTROL
|
||||
|
||||
SELECT @OLD_CONTROL_SCREEN_ID = GUID FROM TBPMO_CONTROL_SCREEN_IMPORT WHERE CONTROL_ID = @OLD_CONTROLID
|
||||
Print '@OLD_CONTROL_SCREEN_ID: ' + convert(varchar(50),@OLD_CONTROL_SCREEN_ID)
|
||||
--Now Insert of ControlScreen
|
||||
INSERT INTO [dbo].[TBPMO_CONTROL_SCREEN]
|
||||
([CONTROL_ID]
|
||||
,[SCREEN_ID]
|
||||
,[CONTROL_TEXT]
|
||||
,[X_LOC]
|
||||
,[Y_LOC]
|
||||
,[HEIGHT]
|
||||
,[WIDTH]
|
||||
,[FONT_FAMILY]
|
||||
,[FONT_COLOR]
|
||||
,[FONT_SIZE]
|
||||
,[FONT_STYLE]
|
||||
,[BACK_COLOR]
|
||||
,[TAB_INDEX]
|
||||
,[TAB_STOP]
|
||||
,[ADDED_WHO])
|
||||
SELECT @NEW_CONTROLID
|
||||
,1
|
||||
,COALESCE([CONTROL_TEXT],'')
|
||||
,[X_LOC]
|
||||
,[Y_LOC]
|
||||
,[HEIGHT]
|
||||
,[WIDTH]
|
||||
,[FONT_FAMILY]
|
||||
,[FONT_COLOR]
|
||||
,[FONT_SIZE]
|
||||
,[FONT_STYLE]
|
||||
,[BACK_COLOR]
|
||||
,[TAB_INDEX]
|
||||
,[TAB_STOP]
|
||||
,'DD TEMPLATE Import'
|
||||
FROM TBPMO_CONTROL_SCREEN_IMPORT WHERE CONTROL_ID = @OLD_CONTROLID
|
||||
|
||||
SELECT @NEW_CONTROL_SCREEN_ID = MAX(GUID) FROM TBPMO_CONTROL_SCREEN
|
||||
Print '@@NEW_CONTROL_SCREEN_ID: ' + convert(varchar(50),@NEW_CONTROL_SCREEN_ID)
|
||||
INSERT INTO [dbo].[TBPMO_CONTROL_LANGUAGE]
|
||||
([LANGUAGE_TYPE]
|
||||
,[CONTROL_SCREEN_ID]
|
||||
,[CAPTION]
|
||||
,[HINT]
|
||||
,[ADDED_WHO])
|
||||
SELECT [LANGUAGE_TYPE]
|
||||
,@NEW_CONTROL_SCREEN_ID
|
||||
,COALESCE([CAPTION],'')
|
||||
,[HINT]
|
||||
,[ADDED_WHO] FROM TBPMO_CONTROL_LANGUAGE_IMPORT where CONTROL_SCREEN_ID = @OLD_CONTROL_SCREEN_ID
|
||||
|
||||
|
||||
FETCH NEXT FROM c_REDO INTO @OLD_CONTROLID
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
67
08_ADDI/SQL/SQL Skripte - Help/UPDATE_DOC_VALUES.sql
Normal file
67
08_ADDI/SQL/SQL Skripte - Help/UPDATE_DOC_VALUES.sql
Normal file
@@ -0,0 +1,67 @@
|
||||
DECLARE
|
||||
@RECORD_ID INTEGER,
|
||||
@DOC_ID INTEGER,
|
||||
@ENT_ID INTEGER,
|
||||
@Items INTEGER,
|
||||
@Items1 INTEGER
|
||||
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
SELECT T.RECORD_ID, T.DOC_ID, T1.FORM_ID
|
||||
,(SELECT COUNT(GUID) FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE ENTITY_ID = T1.FORM_ID AND TYPE_ID = 3 AND CONFIG_COLUMNS = 1) as [DD_Items]
|
||||
,(SELECT COUNT(GUID) FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE ENTITY_ID = T1.FORM_ID AND TYPE_ID <> 3 AND CONFIG_COLUMNS = 1) as [Values] FROM TBPMO_DOC_RECORD_LINK T, TBPMO_RECORD T1 WHERE T.RECORD_ID = T1.GUID
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @RECORD_ID,@DOC_ID,@ENT_ID,@Items,@Items1
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
DECLARE @CONFID INTEGER,@VALUE VARCHAR(100)
|
||||
|
||||
IF @Items >= 1
|
||||
BEGIN
|
||||
DECLARE cursorValues CURSOR LOCAL FOR
|
||||
SELECT T.GUID,T1.VALUE FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG T, TBPMO_DOCRESULT_DROPDOWN_ITEMS T1 WHERE T.GUID = T1.CONFIG_ID AND T1.[DEFAULT] = 1 AND T.ENTITY_ID = @ENT_ID AND T.TYPE_ID = 3
|
||||
OPEN cursorValues
|
||||
FETCH NEXT FROM cursorValues INTO @CONFID,@VALUE
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOC_VALUES WHERE DocID = @DOC_ID AND RECORD_ID = @RECORD_ID AND CONFIG_ID = @CONFID)
|
||||
BEGIN
|
||||
PRINT 'VALUES DROPDOWN'
|
||||
INSERT INTO TBPMO_DOC_VALUES (DocID,RECORD_ID,CONFIG_ID,VALUE,ADDED_WHO) VALUES
|
||||
(@DOC_ID,@RECORD_ID,@CONFID,@VALUE,'PR_NEW')
|
||||
END
|
||||
|
||||
FETCH NEXT FROM cursorValues INTO @CONFID,@VALUE
|
||||
END
|
||||
CLOSE cursorValues
|
||||
DEALLOCATE cursorValues
|
||||
END
|
||||
IF @Items1 >= 1
|
||||
BEGIN
|
||||
DECLARE cursorValues1 CURSOR LOCAL FOR
|
||||
SELECT T.GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG T WHERE T.ENTITY_ID = @ENT_ID AND T.TYPE_ID <> 3 AND T.CONFIG_COLUMNS = 1
|
||||
OPEN cursorValues1
|
||||
FETCH NEXT FROM cursorValues1 INTO @CONFID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_DOC_VALUES WHERE DocID = @DOC_ID AND RECORD_ID = @RECORD_ID AND CONFIG_ID = @CONFID)
|
||||
BEGIN
|
||||
PRINT 'VALUES DEFAULT'
|
||||
INSERT INTO TBPMO_DOC_VALUES (DocID,RECORD_ID,CONFIG_ID,VALUE,ADDED_WHO) VALUES
|
||||
(@DOC_ID,@RECORD_ID,@CONFID,'','PR_NEW')
|
||||
END
|
||||
|
||||
FETCH NEXT FROM cursorValues1 INTO @CONFID
|
||||
END
|
||||
CLOSE cursorValues1
|
||||
DEALLOCATE cursorValues1
|
||||
END
|
||||
FETCH NEXT FROM c_REDO INTO @RECORD_ID,@DOC_ID,@ENT_ID,@Items,@Items1
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
18
08_ADDI/SQL/SQL Skripte - Help/User_Rights_Constructors.sql
Normal file
18
08_ADDI/SQL/SQL Skripte - Help/User_Rights_Constructors.sql
Normal file
@@ -0,0 +1,18 @@
|
||||
DECLARE @ENTITY_ID INTEGER,@USER_ID INTEGER
|
||||
|
||||
DECLARE c_USER CURSOR FOR
|
||||
SELECT T.USER_ID, T1.FORM_ID FROM TBPMO_CONSTRUCTOR_USER T, VWPMO_CONSTRUCTOR_FORMS T1 WHERE T.CONSTRUCT_ID = T1.CONSTRUCT_ID AND T1.DOCUMENT_VIEW = 1
|
||||
|
||||
OPEN c_USER
|
||||
FETCH NEXT FROM c_USER INTO @USER_ID,@ENTITY_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_RIGHT_USER WHERE USER_ID = @USER_ID AND ENTITY_ID = @ENTITY_ID)
|
||||
INSERT INTO TBPMO_RIGHT_USER (USER_ID, ENTITY_ID) VALUES (@USER_ID,@ENTITY_ID)
|
||||
|
||||
FETCH NEXT FROM c_USER INTO @USER_ID,@ENTITY_ID
|
||||
END
|
||||
CLOSE c_USER
|
||||
DEALLOCATE c_USER
|
||||
|
||||
|
||||
@@ -0,0 +1,49 @@
|
||||
DECLARE
|
||||
@RECORD_ID INTEGER,
|
||||
@DATE DAtetime,
|
||||
@GUID INTEGER,
|
||||
@CAPTION VARCHAR(500)
|
||||
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
select GUID,NODE_CAPTION from VWPMO_STRUCTURE_NODES where ENTITY_ID = 8 and CREATE_RECORD = 1
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @GUID,@CAPTION
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
|
||||
FETCH NEXT FROM c_REDO INTO @GUID,@CAPTION
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
|
||||
/*########################################
|
||||
---CHECKIDENT
|
||||
##########################################*/
|
||||
DBCC CHECKIDENT ('TBPMO_CONTROL_SCREEN', RESEED, 1);
|
||||
|
||||
select *
|
||||
from sys.objects
|
||||
where (type = 'TR' or type = 'P')
|
||||
and modify_date > dateadd(m, -1, getdate()) order by modify_date desc
|
||||
/*########################################
|
||||
---MASSEN INSERT
|
||||
##########################################*/
|
||||
Declare @Id int
|
||||
Set @Id = 1
|
||||
|
||||
While @Id <= 200000
|
||||
Begin
|
||||
Insert Into TBGI_TEST_KREDITOR (KREDITOR_NAME,CITY) values ('Kreditor- ' + CAST(@Id as nvarchar(10)),
|
||||
'City - ' + CAST(@Id as nvarchar(10)))
|
||||
--Print @Id
|
||||
Set @Id = @Id + 1
|
||||
End
|
||||
/*########################################
|
||||
---Text EXISTS IN PROCEDURE
|
||||
##########################################*/
|
||||
|
||||
SELECT type, *
|
||||
FROM sys.objects
|
||||
WHERE OBJECT_DEFINITION(object_id) LIKE '%FROM TBIDB_TERM_LANGUAGE%'
|
||||
--AND type IN ('V')
|
||||
ORDER BY name
|
||||
@@ -0,0 +1,11 @@
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD COLUMN_NAME1 VARCHAR(100) NOT NULL DEFAULT ''
|
||||
GO
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD COLUMN_NAME2 VARCHAR(100) NOT NULL DEFAULT ''
|
||||
GO
|
||||
|
||||
UPDATE TBPMO_FORM_CONSTRUCTOR_DETAIL SET COLUMN_NAME1 = 'Format' where GUID = 2
|
||||
GO
|
||||
UPDATE TBPMO_FORM_CONSTRUCTOR_DETAIL SET COLUMN_NAME1 = 'Sendetitel' where GUID = 3
|
||||
GO
|
||||
@@ -0,0 +1,24 @@
|
||||
ALTER VIEW [dbo].[VWPMO_CONSTRUCTOR_FORMS] AS
|
||||
SELECT
|
||||
T2.CONSTRUCT_ID,
|
||||
T2.PARENT_ID,
|
||||
T2.SEQUENCE,
|
||||
T2.LEVEL1_SELECT,
|
||||
T.GUID AS FORM_ID,
|
||||
T1.FORM_TITLE,
|
||||
T2.SQL_SELECT_EBENE1,
|
||||
T2.SQL_SELECT_EBENE2,
|
||||
T2.COLUMN_NAME1,
|
||||
T2.COLUMN_NAME2
|
||||
FROM
|
||||
tbpmo_form T,
|
||||
TBPMO_FORM_VIEW T1,
|
||||
TBPMO_FORM_CONSTRUCTOR_DETAIL T2
|
||||
where
|
||||
T2.FORM_ID = T.GUID AND
|
||||
T1.SCREEN_ID = 1 AND
|
||||
T.GUID = T1.FORM_ID
|
||||
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,8 @@
|
||||
ALTER TABLE TBPMO_CONTROL
|
||||
ADD FORMAT_TYPE VARCHAR(50)
|
||||
UPDATE TBPMO_CONTROL SET FORMAT_TYPE = 'String'
|
||||
--Manuell in Tabelle den Default Wert ändern
|
||||
|
||||
ALTER TABLE TBPMO_CONTROL
|
||||
ADD SHOW_COLUMN BIT
|
||||
UPDATE TBPMO_CONTROL SET SHOW_COLUMN = 1
|
||||
@@ -0,0 +1,36 @@
|
||||
CREATE TABLE TBPMO_CONTROL_IMAGE
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
CONTROL_ID INTEGER NOT NULL,
|
||||
RECORD_ID INTEGER NOT NULL,
|
||||
IMG VARBINARY(max) NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME NOT NULL DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_CONTROL_IMAGE PRIMARY KEY (GUID),
|
||||
CONSTRAINT UQ_CONTROLID_RECORDID UNIQUE (CONTROL_ID, RECORD_ID),
|
||||
CONSTRAINT FK_TBPMO_CONTROL_IMAGE_CONTROL_ID FOREIGN KEY (CONTROL_ID) REFERENCES TBPMO_CONTROL (GUID),
|
||||
CONSTRAINT FK_TBPMO_CONTROL_IMAGE_RECORD_ID FOREIGN KEY (RECORD_ID) REFERENCES TBPMO_RECORD (GUID),
|
||||
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_CONTROL_IMAGE_AFT_UPD ON TBPMO_CONTROL_IMAGE
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @RECORD_ID INTEGER, @CHANGED_WHO VARCHAR(50)
|
||||
SELECT
|
||||
@RECORD_ID = RECORD_ID,
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
UPDATE TBPMO_CONTROL_IMAGE
|
||||
SET CHANGED_WHEN = GETDATE() FROM INSERTED
|
||||
WHERE TBPMO_CONTROL_IMAGE.GUID = INSERTED.GUID
|
||||
|
||||
UPDATE TBPMO_RECORD SET
|
||||
CHANGED_WHO = @CHANGED_WHO
|
||||
WHERE TBPMO_RECORD.GUID = @RECORD_ID
|
||||
END
|
||||
@@ -0,0 +1,19 @@
|
||||
CREATE TABLE TBPMO_WD_OBJECTTYPE
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
OBJECT_TYPE VARCHAR(100) NOT NULL,
|
||||
IDXNAME_ENTITYID VARCHAR(100) NOT NULL,
|
||||
IDXNAME_PARENTID VARCHAR(100) NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_WD_OBJECTTYPE PRIMARY KEY (GUID),
|
||||
CONSTRAINT UQ_OBJECTTYPE_TBPMO_WD_OBJECTTYPE UNIQUE (OBJECT_TYPE)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_WD_OBJECTTYPE_AFT_UPD ON TBPMO_WD_OBJECTTYPE
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_WD_OBJECTTYPE SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WD_OBJECTTYPE.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,72 @@
|
||||
USE [DD_ECM]
|
||||
GO
|
||||
|
||||
/****** Object: View [dbo].[VWPMO_CONTROL_SCREEN] Script Date: 30.03.2015 10:13:05 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
|
||||
|
||||
ALTER VIEW [dbo].[VWPMO_CONTROL_SCREEN] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T.GUID CONTROL_ID,
|
||||
T.NAME CONTROL_NAME,
|
||||
T.REQUIRED CONTROL_REQUIRED,
|
||||
T.FORMAT_TYPE CONTROL_FORMAT_TYPE,
|
||||
T.DEFAULT_VALUE CONTROL_DEF_VALUE,
|
||||
T.READ_ONLY CONTROL_READ_ONLY,
|
||||
T.MULTILINE CONTROL_MULTILINE,
|
||||
T.PARENT_CONTROL_ID CONTROL_PARENT_ID,
|
||||
T.COL_NAME CONTROL_COL_NAME,
|
||||
T.SHOW_COLUMN CONTROL_SHOW_COLUMN,
|
||||
T.CONNECTION_ID_1 CONTROL_CONNID_1,
|
||||
T.SQL_COMMAND_1 CONTROL_SQLCOMMAND_1,
|
||||
T4.GUID CTRLTYPE_ID,
|
||||
T4.TYPE_NAME CTRLTYPE_NAME,
|
||||
T.FORM_ID,
|
||||
T3.NAME FORM_NAME,
|
||||
T3.LEVEL FORM_LEVEL,
|
||||
T1.SCREEN_ID SCREEN_ID,
|
||||
T2.NAME SCREEN_NAME,
|
||||
T1.GUID CTRLSCR_ID,
|
||||
T1.CONTROL_TEXT CTRLSCR_CAPTION,
|
||||
T1.X_LOC CTRLSCR_X_LOC,
|
||||
T1.Y_LOC CTRLSCR_Y_LOC,
|
||||
T1.HEIGHT CTRLSCR_HEIGHT,
|
||||
T1.WIDTH CTRLSCR_WIDTH,
|
||||
T1.FONT_FAMILY CTRLSCR_FONT_FAMILY,
|
||||
T1.FONT_COLOR CTRLSCR_FONT_COLOR,
|
||||
T1.FONT_SIZE CTRLSCR_FONT_SIZE,
|
||||
T1.FONT_STYLE CTRLSCR_FONT_STYLE,
|
||||
T1.TAB_INDEX CTRLSCR_TAB_INDEX,
|
||||
T1.TAB_STOP CTRLSCR_TAB_STOP,
|
||||
T1.BACK_COLOR CTRLSCR_BACK_COLOR,
|
||||
T.MASTER_DATA_ID CTRLSCR_MASTER_DATA_ID
|
||||
FROM
|
||||
TBPMO_CONTROL T,
|
||||
TBPMO_CONTROL_SCREEN T1,
|
||||
TBPMO_SCREEN T2,
|
||||
TBPMO_FORM T3,
|
||||
TBPMO_CONTROL_TYPE T4
|
||||
WHERE
|
||||
T.FORM_ID = T3.GUID AND
|
||||
T.GUID = T1.CONTROL_ID AND
|
||||
T1.SCREEN_ID = T2.GUID AND
|
||||
T.CONTROL_TYPE_ID = T4.GUID
|
||||
ORDER BY
|
||||
T1.SCREEN_ID,
|
||||
T.FORM_ID,
|
||||
T1.TAB_STOP
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,15 @@
|
||||
DBCC CHECKIDENT (TBPMO_CONTROL_TYPE, RESEED, 11)
|
||||
INSERT INTO TBPMO_CONTROL_TYPE(TYPE_NAME)
|
||||
VALUES
|
||||
('CheckedListBox')
|
||||
GO
|
||||
INSERT INTO TBPMO_CONTROL_TYPE(TYPE_NAME)
|
||||
VALUES
|
||||
('ListBox')
|
||||
GO
|
||||
|
||||
ALTER TABLE TBPMO_RECORD_CONNECT
|
||||
ADD CONSTRAINT UQ_RECORD_CONNECT UNIQUE (RECORD1_ID, RECORD2_ID)
|
||||
|
||||
--In TBPMO_RECORD_AFT_INS die
|
||||
--EXEC DBO.PRPMO_CREATE_RECORD_CONNECTIONS @FORM_ID,@RECORD_ID
|
||||
@@ -0,0 +1,23 @@
|
||||
CREATE TABLE TBPMO_RUN_PROCEDURES
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
FORM_ID INTEGER NOT NULL,
|
||||
EXECUTE_COMMAND VARCHAR(500) NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME NOT NULL DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_RUN_PROCEDURES PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_RUN_PROCEDURES_FORM_ID FOREIGN KEY (FORM_ID) REFERENCES TBPMO_FORM (GUID),
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_RUN_PROCEDURES_AFT_UPD ON TBPMO_RUN_PROCEDURES
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_RUN_PROCEDURES SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_RUN_PROCEDURES.GUID = INSERTED.GUID
|
||||
GO
|
||||
INSERT INTO TBPMO_RUN_PROCEDURES(FORM_ID,EXECUTE_COMMAND)
|
||||
VALUES
|
||||
(2,'EXEC PRPMO_AFTER_UPDATE_VALUES @FORM_ID,@RECORD_ID')
|
||||
GO
|
||||
Binary file not shown.
@@ -0,0 +1,7 @@
|
||||
SELECT SQL_COMMAND_1
|
||||
FROM TBPMO_CONTROL
|
||||
WHERE (SQL_COMMAND_1 LIKE '%@%')
|
||||
|
||||
@RECORD_ID
|
||||
@PARENTRECORD_ID
|
||||
@FORM_ID
|
||||
@@ -0,0 +1,8 @@
|
||||
UPDATE TBPMO_CONTROL SET SHOW_COLUMN = 1 WHERE CONTROL_TYPE_ID = 2 AND SHOW_COLUMN is null
|
||||
UPDATE TBPMO_CONTROL SET SHOW_COLUMN = 1 WHERE SHOW_COLUMN is null
|
||||
|
||||
ALTER TABLE TBPMO_CONTROL
|
||||
ALTER COLUMN SHOW_COLUMN BIT NOT NULL
|
||||
|
||||
ALTER TABLE TBPMO_CONTROL
|
||||
ADD DEFAULT 1 FOR SHOW_COLUMN
|
||||
@@ -0,0 +1,2 @@
|
||||
ALTER TABLE TBPMO_WORKFLOW_TASK
|
||||
ADD TASK_DATE DATE
|
||||
Binary file not shown.
@@ -0,0 +1,12 @@
|
||||
CREATE TABLE TBPMO_FILES_USER
|
||||
(
|
||||
GUID INT IDENTITY(1,1),
|
||||
FILENAME2WORK VARCHAR(500) NOT NULL,
|
||||
USER@WORK VARCHAR(50) NOT NULL,
|
||||
HANDLE_TYPE VARCHAR(50) NOT NULL,
|
||||
WORKED BIT NOT NULL DEFAULT 0,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE() NOT NULL,
|
||||
CONSTRAINT PK_TBPMO_FILES_USER PRIMARY KEY(GUID)
|
||||
)
|
||||
GO
|
||||
------------------------------------------------------------------------------
|
||||
@@ -0,0 +1,23 @@
|
||||
CREATE TABLE TBPMO_FOLLUPEMAIL_RECORD
|
||||
(
|
||||
GUID INTEGER IDENTITY(0,1), -- Eindeutiger Tabellenschlüssel
|
||||
FOLLOW_UP_ID INTEGER NOT NULL,
|
||||
[USER_ID] INTEGER NOT NULL,
|
||||
RECORD_ID INTEGER NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT' NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_FOLLUPEMAIL_RECORD PRIMARY KEY (GUID),
|
||||
CONSTRAINT UQ_USER_FOLLUP_ID UNIQUE ([USER_ID],FOLLOW_UP_ID),
|
||||
CONSTRAINT FK_TBPMO_FOLLUPEMAIL_RECORD_USER_ID FOREIGN KEY([USER_ID]) REFERENCES TBDD_USER(GUID),
|
||||
CONSTRAINT FK_TBPMO_FOLLUPEMAIL_RECORD_FOLLOW_UP_ID FOREIGN KEY(FOLLOW_UP_ID) REFERENCES TBPMO_FOLLOW_UP_EMAIL(GUID),
|
||||
CONSTRAINT FK_TBPMO_FOLLUPEMAIL_RECORD_RECORD_ID FOREIGN KEY(RECORD_ID) REFERENCES TBPMO_RECORD(GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_FOLLUPEMAIL_RECORD_AFT_UPD ON TBPMO_FOLLUPEMAIL_RECORD
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_FOLLUPEMAIL_RECORD SET CHANGED_WHEN = GETDATE() FROM INSERTED
|
||||
WHERE TBPMO_FOLLUPEMAIL_RECORD.GUID = INSERTED.GUID
|
||||
GO
|
||||
Binary file not shown.
@@ -0,0 +1,23 @@
|
||||
CREATE VIEW VWPMO_FOLLOW_UP_EMAIL_ENTITY_RECORD AS
|
||||
SELECT
|
||||
T.GUID FOLLOW_UP_ID,
|
||||
T1.RECORD_ID,
|
||||
T2.GUID AS ENTITY_ID,
|
||||
T.NAME,
|
||||
T.FOLLOW_UP_SEQUENCE,
|
||||
T.FOLLOW_UP_DAYS,
|
||||
T.FOLLOW_UP_TIME_SPAN,
|
||||
CONVERT(DATE,T1.VALUE) RECORD_VALUE,
|
||||
T.EMAIL_SUBJECT,
|
||||
T.EMAIL_BODY,
|
||||
T.DEPENDENT_DATE_CTRL_ID,
|
||||
T.DEPENDENT_DONE_CTRL_ID
|
||||
FROM
|
||||
TBPMO_FOLLOW_UP_EMAIL T,
|
||||
VWPMO_VALUES T1,
|
||||
TBPMO_FORM T2
|
||||
WHERE
|
||||
T.ACTIVE = 1 AND
|
||||
T.DEPENDENT_DATE_CTRL_ID = T1.CONTROL_ID AND
|
||||
T1.FORM_ID = T2.GUID
|
||||
|
||||
@@ -0,0 +1,12 @@
|
||||
CREATE VIEW VWPMO_GUI_ENTITY AS
|
||||
SELECT TOP 100 PERCENT
|
||||
TBPMO_FORM.GUID AS ID,
|
||||
TBPMO_FORM.NAME AS Name,
|
||||
TBPMO_FORM_VIEW.FORM_TITLE AS Title
|
||||
FROM
|
||||
TBPMO_FORM INNER JOIN
|
||||
TBPMO_FORM_VIEW ON TBPMO_FORM.GUID = TBPMO_FORM_VIEW.FORM_ID
|
||||
WHERE
|
||||
(TBPMO_FORM.FORM_TYPE_ID IN (1, 2, 3, 5))
|
||||
ORDER BY
|
||||
TBPMO_FORM.PARENT_ID, Title
|
||||
@@ -0,0 +1,30 @@
|
||||
ALTER VIEW [dbo].[VWPMO_WF_ACTIVE] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T.GUID AS WF_TASK_ID,
|
||||
T1.TITLE,
|
||||
T.RECORD_ID,
|
||||
T.STATE_ID,
|
||||
T2.STATE_DESC,
|
||||
T2.COLOR,
|
||||
T.COMMENT,
|
||||
T.DUE_DATE,
|
||||
T.TASK_DATE,
|
||||
'' AS USERNAME,
|
||||
T.ADDED_WHEN,
|
||||
T.CHANGED_WHO,
|
||||
T.CHANGED_WHEN
|
||||
FROM
|
||||
TBPMO_WORKFLOW_TASK AS T,
|
||||
TBPMO_WORKFLOW AS T1,
|
||||
TBPMO_KONFIGURATION TK,
|
||||
TBPMO_WORKFLOW_TASK_STATE T2
|
||||
|
||||
WHERE
|
||||
TK.GUID = 1 AND
|
||||
T.WF_ID = T1.GUID AND
|
||||
T.STATE_ID = T2.GUID AND
|
||||
T.STATE_ID <> TK.WORKFLOW_FINAL_STATE1
|
||||
ORDER BY T.GUID
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,29 @@
|
||||
CREATE VIEW VWPMO_WF_OVERVIEW_AUTHORITY AS
|
||||
SELECT
|
||||
T.GUID as WF_ID,
|
||||
T.RECORD_ID,
|
||||
TBPMO_WORKFLOW.TITLE + ' - ' + TBPMO_WORKFLOW_TASK_STATE.STATE_DESC AS STATE,
|
||||
TBPMO_WORKFLOW_TASK_STATE.GUID AS STATE_ID,
|
||||
TBPMO_WORKFLOW_TASK_STATE.COLOR,
|
||||
(SELECT TBDD_USER.NAME + ', ' + TBDD_USER.PRENAME AS Expr1
|
||||
FROM TBPMO_WORKFLOW_TASK_USER INNER JOIN
|
||||
TBDD_USER ON TBPMO_WORKFLOW_TASK_USER.USER_ID = TBDD_USER.GUID
|
||||
WHERE (TBPMO_WORKFLOW_TASK_USER.WF_TASK_ID = T.GUID)) AS Authority,
|
||||
CASE WHEN (SELECT TBDD_USER.NAME + ', ' + TBDD_USER.PRENAME AS Expr1
|
||||
FROM TBPMO_WORKFLOW_TASK_USER INNER JOIN
|
||||
TBDD_USER ON TBPMO_WORKFLOW_TASK_USER.USER_ID = TBDD_USER.GUID
|
||||
WHERE (TBPMO_WORKFLOW_TASK_USER.WF_TASK_ID = T.GUID)) IS NULL
|
||||
THEN TBPMO_WORKFLOW.TITLE + ' - ' + TBPMO_WORKFLOW_TASK_STATE.STATE_DESC
|
||||
ELSE
|
||||
TBPMO_WORKFLOW.TITLE + ' - ' + TBPMO_WORKFLOW_TASK_STATE.STATE_DESC + ' - ' +
|
||||
(SELECT TBDD_USER.NAME + ', ' + TBDD_USER.PRENAME AS Expr1
|
||||
FROM TBPMO_WORKFLOW_TASK_USER INNER JOIN
|
||||
TBDD_USER ON TBPMO_WORKFLOW_TASK_USER.USER_ID = TBDD_USER.GUID
|
||||
WHERE (TBPMO_WORKFLOW_TASK_USER.WF_TASK_ID = T.GUID))
|
||||
END AS String,
|
||||
T.CHANGED_WHO,
|
||||
T.CHANGED_WHEN
|
||||
FROM TBPMO_WORKFLOW_TASK T INNER JOIN
|
||||
TBPMO_WORKFLOW ON T.WF_ID = TBPMO_WORKFLOW.GUID INNER JOIN
|
||||
TBPMO_WORKFLOW_TASK_STATE ON T.STATE_ID = TBPMO_WORKFLOW_TASK_STATE.GUID
|
||||
WHERE (T.ACTIVE = 1)
|
||||
Binary file not shown.
Binary file not shown.
@@ -0,0 +1,9 @@
|
||||
ALTER TABLE TBPMO_FORM
|
||||
ADD SINGLE_RECORD BIT NOT NULL DEFAULT 0
|
||||
ALTER TABLE TBPMO_KONFIGURATION
|
||||
ADD FOLLOW_UP_LOG_ERR_ONLY BIT NOT NULL DEFAULT 1
|
||||
|
||||
ALTER TABLE TBPMO_KONFIGURATION
|
||||
ADD FOLLOW_UP_EMAIL_PROFILE INTEGER NOT NULL DEFAULT 99
|
||||
ALTER TABLE TBPMO_FOLLOW_UP_EMAIL
|
||||
ADD NAME VARCHAR(100) NOT NULL DEFAULT 'DESCRIPTION FOLLOW UP'
|
||||
@@ -0,0 +1,44 @@
|
||||
USE [DD_ECM]
|
||||
GO
|
||||
|
||||
/****** Object: View [dbo].[VWPMO_CONSTRUCTOR_FORMS] Script Date: 28.08.2015 13:22:17 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
|
||||
|
||||
|
||||
|
||||
ALTER VIEW [dbo].[VWPMO_CONSTRUCTOR_FORMS] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T2.GUID,
|
||||
T2.CONSTRUCT_ID,
|
||||
T.PARENT_ID,
|
||||
T2.SEQUENCE,
|
||||
T2.LEVEL1_SELECT,
|
||||
T.GUID AS FORM_ID,
|
||||
T1.FORM_TITLE,
|
||||
T2.SQL_SELECT_EBENE1,
|
||||
T2.SQL_SELECT_EBENE2,
|
||||
T2.COLUMN_NAME1,
|
||||
T2.COLUMN_NAME2,
|
||||
T.FORM_TYPE_ID
|
||||
FROM
|
||||
tbpmo_form T,
|
||||
TBPMO_FORM_VIEW T1,
|
||||
TBPMO_FORM_CONSTRUCTOR_DETAIL T2
|
||||
where
|
||||
T2.FORM_ID = T.GUID AND
|
||||
T1.SCREEN_ID = 1 AND
|
||||
T.GUID = T1.FORM_ID
|
||||
ORDER BY
|
||||
T2.CONSTRUCT_ID,T.PARENT_ID,T2.SEQUENCE
|
||||
|
||||
|
||||
|
||||
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,2 @@
|
||||
ALTER TABLE TBPMO_CONTROL
|
||||
ADD STATIC_LIST VARCHAR(2000) NOT NULL DEFAULT ''
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -0,0 +1,71 @@
|
||||
USE [DD_ECM]
|
||||
GO
|
||||
|
||||
/****** Object: View [dbo].[VWPMO_CONTROL_SCREEN] Script Date: 03.02.2015 10:27:53 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
|
||||
ALTER VIEW [dbo].[VWPMO_CONTROL_SCREEN] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T.GUID CONTROL_ID,
|
||||
T.NAME CONTROL_NAME,
|
||||
T.REQUIRED CONTROL_REQUIRED,
|
||||
T.DEFAULT_VALUE CONTROL_DEF_VALUE,
|
||||
T.READ_ONLY CONTROL_READ_ONLY,
|
||||
T.MULTILINE CONTROL_MULTILINE,
|
||||
T.PARENT_CONTROL_ID CONTROL_PARENT_ID,
|
||||
T.COL_NAME CONTROL_COL_NAME,
|
||||
T.SHOW_COLUMN CONTROL_SHOW_COLUMN,
|
||||
T.CONNECTION_ID_1 CONTROL_CONNID_1,
|
||||
T.SQL_COMMAND_1 CONTROL_SQLCOMMAND_1,
|
||||
T.STATIC_LIST CONTROL_STATIC_LIST,
|
||||
T4.GUID CTRLTYPE_ID,
|
||||
T4.TYPE_NAME CTRLTYPE_NAME,
|
||||
T.FORMAT_TYPE CONTROL_FORMAT_TYPE,
|
||||
T.FORM_ID,
|
||||
T3.NAME FORM_NAME,
|
||||
T3.LEVEL FORM_LEVEL,
|
||||
T1.SCREEN_ID SCREEN_ID,
|
||||
T2.NAME SCREEN_NAME,
|
||||
T1.GUID CTRLSCR_ID,
|
||||
T1.CONTROL_TEXT CTRLSCR_CAPTION,
|
||||
T1.X_LOC CTRLSCR_X_LOC,
|
||||
T1.Y_LOC CTRLSCR_Y_LOC,
|
||||
T1.HEIGHT CTRLSCR_HEIGHT,
|
||||
T1.WIDTH CTRLSCR_WIDTH,
|
||||
T1.FONT_FAMILY CTRLSCR_FONT_FAMILY,
|
||||
T1.FONT_COLOR CTRLSCR_FONT_COLOR,
|
||||
T1.FONT_SIZE CTRLSCR_FONT_SIZE,
|
||||
T1.FONT_STYLE CTRLSCR_FONT_STYLE,
|
||||
T1.TAB_INDEX CTRLSCR_TAB_INDEX,
|
||||
T1.TAB_STOP CTRLSCR_TAB_STOP,
|
||||
T1.BACK_COLOR CTRLSCR_BACK_COLOR,
|
||||
T.MASTER_DATA_ID CTRLSCR_MASTER_DATA_ID
|
||||
FROM
|
||||
TBPMO_CONTROL T,
|
||||
TBPMO_CONTROL_SCREEN T1,
|
||||
TBPMO_SCREEN T2,
|
||||
TBPMO_FORM T3,
|
||||
TBPMO_CONTROL_TYPE T4
|
||||
WHERE
|
||||
T.FORM_ID = T3.GUID AND
|
||||
T.GUID = T1.CONTROL_ID AND
|
||||
T1.SCREEN_ID = T2.GUID AND
|
||||
T.CONTROL_TYPE_ID = T4.GUID
|
||||
ORDER BY
|
||||
T1.SCREEN_ID,
|
||||
T.FORM_ID,
|
||||
T1.TAB_STOP
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,15 @@
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD LOAD_DIRECT BIT NOT NULL DEFAULT 0
|
||||
|
||||
ALTER TABLE TBDD_MODULES
|
||||
ADD BACKGROUND_IMAGE VARBINARY(MAX)
|
||||
GO
|
||||
ALTER TABLE TBDD_MODULES
|
||||
ADD PRODUCT_NAME1 VARCHAR(200) NOT NULL DEFAULT 'RECORD-ORGANIZER'
|
||||
GO
|
||||
ALTER TABLE TBDD_MODULES
|
||||
ADD PRODUCT_NAME2 VARCHAR(200)
|
||||
GO
|
||||
ALTER TABLE TBDD_INDEX_AUTOM
|
||||
ADD [ENTITY_ID] INTEGER NOT NULL DEFAULT 0
|
||||
GO
|
||||
@@ -0,0 +1,3 @@
|
||||
INSERT INTO TBPMO_FORM_TYPE(FORM_TYPE)
|
||||
VALUES
|
||||
('GROUP ENTITY')
|
||||
@@ -0,0 +1,16 @@
|
||||
CREATE VIEW VWPMO_TEMPLATE_ENTITY AS
|
||||
SELECT
|
||||
T.GUID AS TEMPLATE_ID,
|
||||
T.NAME AS TEMPLATE_NAME,
|
||||
T.TEMPLATE_PATH AS TEMPLATE_PATH,
|
||||
T1.GUID AS TEMPLATE_ENTITY_ID,
|
||||
T2.GUID AS ENTITY_ID,
|
||||
T2.NAME
|
||||
FROM
|
||||
TBPMO_TEMPLATE T,
|
||||
TBPMO_TEMPLATE_ENTITY T1,
|
||||
TBPMO_FORM T2
|
||||
WHERE
|
||||
T.ACTIVE = 1 AND
|
||||
T.GUID = T1.TEMPLATE_ID AND
|
||||
T1.ENTITY_ID = T2.GUID
|
||||
@@ -0,0 +1,21 @@
|
||||
CREATE TABLE TBPMO_TEMPLATE
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
NAME VARCHAR(100) NOT NULL UNIQUE,
|
||||
TEMPLATE_PATH VARCHAR(1000) NOT NULL,
|
||||
DOCTYPE_ID INTEGER NOT NULL,
|
||||
ACTIVE BIT NOT NULL DEFAULT 1,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_TEMPLATE PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_TEMPLATE_DOCTYPE_ID FOREIGN KEY(DOCTYPE_ID) REFERENCES TBDD_DOKUMENTART(GUID)
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_TEMPLATE_AFT_UPD ON TBPMO_TEMPLATE
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_TEMPLATE SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_TEMPLATE.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,19 @@
|
||||
CREATE TABLE TBPMO_TEMPLATE_ENTITY
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
TEMPLATE_ID INTEGER NOT NULL,
|
||||
ENTITY_ID INTEGER NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_TEMPLATE_ENTITY PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_TEMPLATE_ENTITY_TEMPLATE_ID FOREIGN KEY(TEMPLATE_ID) REFERENCES TBPMO_TEMPLATE(GUID),
|
||||
CONSTRAINT FK_TBPMO_TEMPLATE_ENTITY_ENTITY_ID FOREIGN KEY(ENTITY_ID) REFERENCES TBPMO_FORM(GUID)
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_TEMPLATE_ENTITY_AFT_UPD ON TBPMO_TEMPLATE_ENTITY
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_TEMPLATE_ENTITY SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_TEMPLATE_ENTITY.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,23 @@
|
||||
CREATE TABLE TBPMO_TEMPLATE_PATTERN
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
TEMPLATE_ID INTEGER NOT NULL,
|
||||
NAME_PATTERN VARCHAR(100) NOT NULL,
|
||||
FIXED_VALUE VARCHAR(100),
|
||||
CONNECTION_ID INTEGER,
|
||||
SQL_COMMAND VARCHAR(2000),
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_TEMPLATE_PATTERN PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_TEMPLATE_PATTERN_TEMPLATE_ID FOREIGN KEY(TEMPLATE_ID) REFERENCES TBPMO_TEMPLATE(GUID),
|
||||
CONSTRAINT UQ_TBPMO_TEMPLATE_PATTERN UNIQUE (TEMPLATE_ID, NAME_PATTERN)
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_TEMPLATE_PATTERN_AFT_UPD ON TBPMO_TEMPLATE_PATTERN
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_TEMPLATE_PATTERN SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_TEMPLATE_PATTERN.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,5 @@
|
||||
ALTER TABLE TBPMO_CONTROL_VALUE
|
||||
ALTER COLUMN VALUE NVARCHAR(MAX) NOT NULL
|
||||
|
||||
ALTER TABLE TBPMO_WD_FORMVIEW_DOKTYPES
|
||||
ADD NAME_CONVENTION VARCHAR(100) NOT NULL DEFAULT ''
|
||||
@@ -0,0 +1,3 @@
|
||||
DROP TABLE TBPMO_TEMPLATE_ENTITY_PATTERN
|
||||
DROP TABLE TBPMO_TEMPLATE_ENTITY
|
||||
DROP TABLE TBPMO_TEMPLATE
|
||||
@@ -0,0 +1,36 @@
|
||||
ALTER PROCEDURE [dbo].[PRPMO_CREATE_TEMP_VIEWS]
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE
|
||||
@FORM_ID INTEGER,
|
||||
@SQL_COMMAND nvarchar(MAX),
|
||||
@VIEW_NAME nvarchar(30),
|
||||
@DEL_SQL NVARCHAR(100),
|
||||
@CREATE_VIEW NVARCHAR(MAX)
|
||||
DECLARE c_TASK CURSOR FOR
|
||||
SELECT FORM_ID,SQL_COMMAND
|
||||
FROM TBPMO_FORM_SQL where SQL_COMMAND is not null
|
||||
OPEN c_TASK
|
||||
FETCH NEXT FROM c_TASK INTO @FORM_ID,@SQL_COMMAND
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @VIEW_NAME = 'VWTEMP_PMO_FORM' + CONVERT(VARCHAR(3),@FORM_ID)
|
||||
IF EXISTS(select * FROM sys.views where name = @VIEW_NAME)
|
||||
BEGIN
|
||||
SET @DEL_SQL = 'DROP VIEW dbo.' + QUOTENAME(@VIEW_NAME) + ''
|
||||
EXEC sp_executesql @DEL_SQL
|
||||
END
|
||||
SELECT @SQL_COMMAND = SQL_COMMAND FROM TBPMO_FORM_SQL where FORM_ID = @FORM_ID
|
||||
SET @CREATE_VIEW = 'CREATE VIEW ' + @VIEW_NAME + ' AS ' + @SQL_COMMAND
|
||||
|
||||
EXEC sp_executesql @CREATE_VIEW
|
||||
|
||||
FETCH NEXT FROM c_TASK INTO @FORM_ID,@SQL_COMMAND
|
||||
END
|
||||
CLOSE c_TASK
|
||||
DEALLOCATE c_TASK
|
||||
END
|
||||
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,102 @@
|
||||
CREATE TABLE TBPMO_FORM_CONSTR_QUICK_DISPLAY
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
CONSTRUCT_ID INTEGER NOT NULL,
|
||||
CONTROL_ID INTEGER NOT NULL,
|
||||
HEADLINE BIT NOT NULL DEFAULT 0,
|
||||
PICTURE BIT NOT NULL DEFAULT 0,
|
||||
SEQUENCE INTEGER NOT NULL DEFAULT 0,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME NOT NULL DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_FORM_CONSTR_QUICK_DISPLAY PRIMARY KEY (GUID),
|
||||
CONSTRAINT UNIQUE_CONSTRUCTID_CONTROL_ID UNIQUE(CONSTRUCT_ID,CONTROL_ID),
|
||||
CONSTRAINT FK_TBPMO_FORM_CONSTR_QUICK_DISPLAY_CONSTRUCT_ID FOREIGN KEY (CONSTRUCT_ID) REFERENCES TBPMO_FORM_CONSTRUCTOR_DETAIL (GUID),
|
||||
CONSTRAINT FK_TBPMO_FORM_CONSTR_QUICK_DISPLAY_CONTROL_ID FOREIGN KEY (CONTROL_ID) REFERENCES TBPMO_CONTROL (GUID),
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER [dbo].[TBPMO_FORM_CONSTR_QUICK_DISPLAY_AFT_UPD] ON [dbo].[TBPMO_FORM_CONSTR_QUICK_DISPLAY]
|
||||
FOR UPDATE
|
||||
AS
|
||||
DECLARE
|
||||
@GUID INTEGER,
|
||||
@CONSTRUCT_ID INTEGER,
|
||||
@HEADLINE BIT
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@CONSTRUCT_ID = CONSTRUCT_ID,
|
||||
@HEADLINE = HEADLINE
|
||||
FROM INSERTED
|
||||
|
||||
IF @HEADLINE = 1
|
||||
BEGIN
|
||||
UPDATE TBPMO_FORM_CONSTR_QUICK_DISPLAY SET HEADLINE = 0 WHERE CONSTRUCT_ID = @CONSTRUCT_ID AND PICTURE = 0 AND GUID <> @GUID
|
||||
EXEC dbo.PRPMO_CREATE_QUICK_SQL @CONSTRUCT_ID
|
||||
END
|
||||
|
||||
UPDATE TBPMO_FORM_CONSTR_QUICK_DISPLAY SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_FORM_CONSTR_QUICK_DISPLAY.GUID = INSERTED.GUID
|
||||
GO
|
||||
--Insert trigger
|
||||
CREATE TRIGGER TBPMO_FORM_CONSTR_QUICK_DISPLAY_AFT_INS ON TBPMO_FORM_CONSTR_QUICK_DISPLAY
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@CONSTRUCT_ID INTEGER,
|
||||
@SEQUENCE INTEGER,
|
||||
@COUNT INT
|
||||
|
||||
SELECT
|
||||
@CONSTRUCT_ID = CONSTRUCT_ID
|
||||
FROM INSERTED
|
||||
|
||||
SELECT
|
||||
@SEQUENCE = MAX(SEQUENCE),
|
||||
@COUNT = COUNT(*)
|
||||
FROM TBPMO_FORM_CONSTR_QUICK_DISPLAY WHERE HEADLINE = 0 AND PICTURE = 0 AND CONSTRUCT_ID = @CONSTRUCT_ID
|
||||
|
||||
IF @COUNT = 1
|
||||
UPDATE TBPMO_FORM_CONSTR_QUICK_DISPLAY SET HEADLINE = 1 FROM INSERTED WHERE TBPMO_FORM_CONSTR_QUICK_DISPLAY.GUID = INSERTED.GUID
|
||||
|
||||
IF @COUNT > 1
|
||||
UPDATE TBPMO_FORM_CONSTR_QUICK_DISPLAY SET SEQUENCE = @SEQUENCE + 1 FROM INSERTED WHERE TBPMO_FORM_CONSTR_QUICK_DISPLAY.GUID = INSERTED.GUID
|
||||
|
||||
EXEC dbo.PRPMO_CREATE_QUICK_SQL @CONSTRUCT_ID
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_FORM_CONSTR_QUICK_DISPLAY_AFT_DEL ON TBPMO_FORM_CONSTR_QUICK_DISPLAY
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR DELETE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@CONSTRUCT_ID INTEGER,
|
||||
@COUNT INT
|
||||
|
||||
SELECT
|
||||
@CONSTRUCT_ID = CONSTRUCT_ID
|
||||
FROM deleted
|
||||
SELECT
|
||||
@COUNT = COUNT(*)
|
||||
FROM TBPMO_FORM_CONSTR_QUICK_DISPLAY WHERE CONSTRUCT_ID = @CONSTRUCT_ID
|
||||
|
||||
IF @COUNT >= 2
|
||||
EXEC dbo.PRPMO_CREATE_QUICK_SQL @CONSTRUCT_ID
|
||||
ELSE
|
||||
UPDATE TBPMO_FORM_CONSTRUCTOR_DETAIL SET SQL_QUICK_VIEW = '' WHERE GUID = @CONSTRUCT_ID
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
@@ -0,0 +1,21 @@
|
||||
CREATE TABLE TBPMO_CONTROL_HINT
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
CONTROL_ID INTEGER NOT NULL,
|
||||
HINT_COMMENT VARCHAR(500) NOT NULL,
|
||||
LANGUAGE_CODE VARCHAR(10) NOT NULL DEFAULT 'de-DE',
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_CONTROL_HINT PRIMARY KEY (GUID),
|
||||
CONSTRAINT UNIQUE_CONTROL_ID_LANGUAGE_CODE_CONTROL_ID UNIQUE(CONTROL_ID,LANGUAGE_CODE),
|
||||
CONSTRAINT FK_TBPMO_CONTROL_HINT_CONTROL_ID FOREIGN KEY (CONTROL_ID) REFERENCES TBPMO_CONTROL (GUID),
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_CONTROL_HINT_AFT_UPD ON TBPMO_CONTROL_HINT
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_CONTROL_HINT SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CONTROL_HINT.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,2 @@
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD SQL_QUICK_VIEW NVARCHAR(MAX) DEFAULT '' NOT NULL
|
||||
Binary file not shown.
@@ -0,0 +1,25 @@
|
||||
CREATE TABLE TBPMO_USER_CONSTR_VIEW_TYPE
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
[USER_ID] INTEGER NOT NULL,
|
||||
CONSTRUCTOR_DETAIL_ID INTEGER NOT NULL,
|
||||
[ENTITY_ID] INTEGER NOT NULL,
|
||||
VIEW_ID INTEGER NOT NULL DEFAULT 1, --1=TileView,2=Carousel,3=GridView
|
||||
COMMENT VARCHAR(300),
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_USER_CONSTR_VIEW_TYPE PRIMARY KEY (GUID),
|
||||
CONSTRAINT UNIQUE_CONSTRUCTOR_ID_VIEW_ID UNIQUE(CONSTRUCTOR_DETAIL_ID,VIEW_ID,[USER_ID]),
|
||||
CONSTRAINT FK_TBPMO_USER_CONSTR_VIEW_TYPE_USER_ID FOREIGN KEY (USER_ID) REFERENCES TBDD_USER (GUID),
|
||||
CONSTRAINT FK_TBPMO_USER_CONSTR_VIEW_TYPE_CONSTRUCTOR_ID FOREIGN KEY (CONSTRUCTOR_DETAIL_ID) REFERENCES TBPMO_FORM_CONSTRUCTOR_DETAIL (GUID),
|
||||
CONSTRAINT FK_TBPMO_USER_CONSTR_VIEW_TYPE_ENTITY_ID FOREIGN KEY ([ENTITY_ID]) REFERENCES TBPMO_FORM (GUID),
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_USER_CONSTR_VIEW_TYPE_AFT_UPD ON TBPMO_USER_CONSTR_VIEW_TYPE
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_USER_CONSTR_VIEW_TYPE SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_USER_CONSTR_VIEW_TYPE.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,32 @@
|
||||
CREATE TABLE TBPMO_USER_WINDREAM_RESULTLIST_CONFIG
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
[USER_ID] INTEGER NOT NULL,
|
||||
CONSTRUCTOR_DETAIL_ID INTEGER NOT NULL,
|
||||
COLUMN1 VARCHAR(50) NOT NULL,
|
||||
COLUMN1_WIDTH INTEGER NOT NULL,
|
||||
COLUMN2 VARCHAR(50) NOT NULL,
|
||||
COLUMN2_WIDTH INTEGER NOT NULL,
|
||||
COLUMN3 VARCHAR(50) NOT NULL,
|
||||
COLUMN3_WIDTH INTEGER NOT NULL,
|
||||
COLUMN4 VARCHAR(50),
|
||||
COLUMN4_WIDTH INTEGER,
|
||||
COLUMN5 VARCHAR(50),
|
||||
COLUMN5_WIDTH INTEGER,
|
||||
COLUMN6 VARCHAR(50),
|
||||
COLUMN6_WIDTH INTEGER,
|
||||
COLUMN7 VARCHAR(50),
|
||||
COLUMN7_WIDTH INTEGER,
|
||||
COMMENT VARCHAR(300),
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_USER_WINDREAM_RESULTLIST_CONFIG PRIMARY KEY (GUID),
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_USER_WINDREAM_RESULTLIST_CONFIG_AFT_UPD ON TBPMO_USER_WINDREAM_RESULTLIST_CONFIG
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_USER_WINDREAM_RESULTLIST_CONFIG SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_USER_WINDREAM_RESULTLIST_CONFIG.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,33 @@
|
||||
DROP TABLE TBPMO_WINDREAM_RESULTLIST_CONFIG
|
||||
|
||||
CREATE TABLE TBPMO_WINDREAM_RESULTLIST_CONFIG
|
||||
(
|
||||
GUID TINYINT,
|
||||
COLUMN1 VARCHAR(50) NOT NULL,
|
||||
COLUMN1_WIDTH INTEGER NOT NULL,
|
||||
COLUMN2 VARCHAR(50) NOT NULL,
|
||||
COLUMN2_WIDTH INTEGER NOT NULL,
|
||||
COLUMN3 VARCHAR(50) NOT NULL,
|
||||
COLUMN3_WIDTH INTEGER NOT NULL,
|
||||
COLUMN4 VARCHAR(50),
|
||||
COLUMN4_WIDTH INTEGER,
|
||||
COLUMN5 VARCHAR(50),
|
||||
COLUMN5_WIDTH INTEGER,
|
||||
COLUMN6 VARCHAR(50),
|
||||
COLUMN6_WIDTH INTEGER,
|
||||
COLUMN7 VARCHAR(50),
|
||||
COLUMN7_WIDTH INTEGER,
|
||||
COMMENT VARCHAR(300),
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_WINDREAM_RESULTLIST_CONFIG_GUID PRIMARY KEY(GUID),
|
||||
CONSTRAINT CH_TBPMO_WINDREAM_RESULTLIST_CONFIG_GUID CHECK(GUID = 1),
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_WINDREAM_RESULTLIST_CONFIG_AFT_UPD ON TBPMO_WINDREAM_RESULTLIST_CONFIG
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_WINDREAM_RESULTLIST_CONFIG SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WINDREAM_RESULTLIST_CONFIG.GUID = INSERTED.GUID
|
||||
GO
|
||||
@@ -0,0 +1,2 @@
|
||||
ALTER TABLE TBPMO_FORM
|
||||
ADD POS_ENTITY INTEGER DEFAULT '0' NOT NULL
|
||||
@@ -0,0 +1,22 @@
|
||||
UPDATE TBPMO_KONFIGURATION SET SQL_RECORD_SQL1 = 'SELECT T.GUID AS [Record-ID],T.FORM_ID AS [Form-ID],' where GUID = 1
|
||||
|
||||
DECLARE @FORM_ID INT
|
||||
|
||||
DECLARE c_FORM CURSOR FOR SELECT GUID FROM TBPMO_FORM
|
||||
OPEN c_FORM
|
||||
FETCH NEXT FROM c_FORM INTO @FORM_ID
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
EXEC PRPMO_CREATE_SQL @FORM_ID
|
||||
|
||||
FETCH NEXT FROM c_FORM INTO @FORM_ID
|
||||
END
|
||||
|
||||
CLOSE c_FORM
|
||||
DEALLOCATE c_FORM
|
||||
|
||||
|
||||
GO
|
||||
|
||||
EXEC [dbo].[PRPMO_CREATE_TEMP_VIEWS]
|
||||
@@ -0,0 +1,8 @@
|
||||
USE [DD_ECM]
|
||||
GO
|
||||
|
||||
/****** Object: Index [UQ_USER_FOLLUP_ID] Script Date: 07.12.2015 11:47:08 ******/
|
||||
ALTER TABLE [dbo].[TBPMO_FOLLUPEMAIL_RECORD] DROP CONSTRAINT [UQ_USER_FOLLUP_ID]
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,31 @@
|
||||
--Insert trigger
|
||||
CREATE TRIGGER [dbo].[TBPMO_CONTROL_SCREEN_AFT_INS] ON [dbo].[TBPMO_CONTROL_SCREEN]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@GUID INTEGER,
|
||||
@CONTROL_ID INTEGER,
|
||||
@ENTITY_ID INTEGER,
|
||||
@SEQUENCE INTEGER
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@CONTROL_ID = CONTROL_ID
|
||||
FROM INSERTED
|
||||
|
||||
SELECT
|
||||
@ENTITY_ID = FORM_ID
|
||||
FROM TBPMO_CONTROL WHERE [GUID] = @CONTROL_ID
|
||||
|
||||
SELECT @SEQUENCE = MAX(TAB_INDEX) FROM TBPMO_CONTROL_SCREEN WHERE CONTROL_ID IN (SELECT GUID FROM TBPMO_CONTROL WHERE FORM_ID = @ENTITY_ID)
|
||||
|
||||
UPDATE TBPMO_CONTROL_SCREEN SET TAB_INDEX = @SEQUENCE + 1 FROM INSERTED WHERE TBPMO_CONTROL_SCREEN.GUID = INSERTED.GUID
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
|
||||
@@ -0,0 +1,21 @@
|
||||
CREATE TABLE TBPMO_FOLDERWATCH_USER
|
||||
(
|
||||
GUID INTEGER IDENTITY(0,1), -- Eindeutiger Tabellenschlüssel
|
||||
[USER_ID] INT NOT NULL,
|
||||
FOLDER_PATH VARCHAR(800) NOT NULL,
|
||||
FOLDER_TYPE VARCHAR(20) DEFAULT 'DEFAULT' NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT' NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_FOLDERWATCH_USER PRIMARY KEY (GUID),
|
||||
CONSTRAINT UQ_TBPMO_FOLDERWATCH_USER UNIQUE([USER_ID],FOLDER_PATH),
|
||||
CONSTRAINT FK_TBPMO_FOLDERWATCH_USER_USER_ID FOREIGN KEY([USER_ID]) REFERENCES TBDD_USER(GUID),
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_FOLDERWATCH_USER_AFT_UPD ON TBPMO_FOLDERWATCH_USER
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_FOLDERWATCH_USER SET CHANGED_WHEN = GETDATE() FROM INSERTED
|
||||
WHERE TBPMO_FOLDERWATCH_USER.GUID = INSERTED.GUID
|
||||
GO
|
||||
Binary file not shown.
@@ -0,0 +1,54 @@
|
||||
ALTER VIEW [dbo].[VWPMO_FOLLOW_UP_EMAIL] AS
|
||||
SELECT
|
||||
T1.GUID FOLLOW_UP_ID,
|
||||
T1.NAME,
|
||||
T1.FOLLOW_UP_SEQUENCE,
|
||||
T1.FOLLOW_UP_DAYS,
|
||||
T1.FOLLOW_UP_TIME_SPAN,
|
||||
CONVERT(CHAR(5),GETDATE(),108) NOW_TIME,
|
||||
T.RECORD_ID,
|
||||
CONVERT(DATE,T.VALUE) VALUE,
|
||||
T1.EMAIL_SUBJECT,
|
||||
T1.EMAIL_BODY,
|
||||
T1.PROCESS_SELECT1,
|
||||
T1.PROCESS_SELECT2,
|
||||
T1.PROCESS_SELECT3,
|
||||
T1.PROCESS_SELECT4,
|
||||
T1.PROCESS_SELECT5,
|
||||
T1.PROCESS_SELECT6,
|
||||
T1.PROCESS_SELECT7,
|
||||
T1.PROCESS_SELECT8,
|
||||
T1.PROCESS_SELECT9,
|
||||
T1.PROCESS_SELECT10,
|
||||
T1.TIME_UNITY,
|
||||
T1.TIME_DIST,
|
||||
CASE T1.TIME_UNITY
|
||||
WHEN 'Month' THEN
|
||||
DATEDIFF(month, getdate(),convert(Date,T.value))
|
||||
WHEN 'Week' THEN
|
||||
DATEDIFF(week, getdate(),convert(Date,T.value))
|
||||
END TIME_SPAN,
|
||||
T1.DEPENDENT_DATE_CTRL_ID,
|
||||
T1.DEPENDENT_DONE_CTRL_ID,
|
||||
(SELECT VALUE FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = T1.DEPENDENT_DONE_CTRL_ID AND RECORD_ID = T.RECORD_ID) DONE_VALUE,
|
||||
T2.GUID AS CONSTRUCTOR_ID,
|
||||
T2.FORM_TITLE AS CONSTRUCTOR_TITLE
|
||||
FROM
|
||||
VWPMO_VALUES T,
|
||||
TBPMO_FOLLOW_UP_EMAIL T1,
|
||||
TBPMO_FORM_CONSTRUCTOR T2
|
||||
WHERE
|
||||
T1.ACTIVE = 1 AND
|
||||
(SELECT VALUE FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = T1.DEPENDENT_DONE_CTRL_ID AND RECORD_ID = T.RECORD_ID) = 'False' And
|
||||
T.CONTROL_ID = T1.DEPENDENT_DATE_CTRL_ID AND
|
||||
T1.CONSTRUCTOR_ID = T2.GUID AND
|
||||
T1.TIME_SPAN =
|
||||
CASE T1.TIME_UNITY
|
||||
WHEN 'Month' THEN
|
||||
DATEDIFF(month, getdate(),convert(Date,T.value))
|
||||
WHEN 'Week' THEN
|
||||
DATEDIFF(week, getdate(),convert(Date,T.value))
|
||||
END
|
||||
GO
|
||||
|
||||
|
||||
@@ -0,0 +1,27 @@
|
||||
ALTER VIEW VWPMO_FOLLOW_UP_EMAIL_ENTITY_RECORD AS
|
||||
SELECT
|
||||
T.GUID FOLLOW_UP_ID,
|
||||
T1.RECORD_ID,
|
||||
T2.GUID AS ENTITY_ID,
|
||||
T.NAME,
|
||||
T.FOLLOW_UP_SEQUENCE,
|
||||
T.FOLLOW_UP_DAYS,
|
||||
T.FOLLOW_UP_TIME_SPAN,
|
||||
CONVERT(DATE,T1.VALUE) RECORD_VALUE,
|
||||
T.EMAIL_SUBJECT,
|
||||
T.EMAIL_BODY,
|
||||
T.DEPENDENT_DATE_CTRL_ID,
|
||||
T.DEPENDENT_DONE_CTRL_ID,
|
||||
T3.GUID AS CONSTRUCTOR_ID,
|
||||
T3.FORM_TITLE AS CONSTRUCTOR_TITLE
|
||||
FROM
|
||||
TBPMO_FOLLOW_UP_EMAIL T,
|
||||
VWPMO_VALUES T1,
|
||||
TBPMO_FORM T2,
|
||||
TBPMO_FORM_CONSTRUCTOR T3
|
||||
WHERE
|
||||
T.ACTIVE = 1 AND
|
||||
T.DEPENDENT_DATE_CTRL_ID = T1.CONTROL_ID AND
|
||||
T1.FORM_ID = T2.GUID AND
|
||||
T.CONSTRUCTOR_ID = T3.GUID
|
||||
|
||||
@@ -0,0 +1,10 @@
|
||||
|
||||
ALTER TABLE TBPMO_FILES_USER
|
||||
ADD FILENAME_ONLY VARCHAR(100) DEFAULT '' NOT NULL
|
||||
GO
|
||||
ALTER TABLE TBPMO_FOLLOW_UP_EMAIL
|
||||
ADD CONSTRUCTOR_ID INTEGER DEFAULT '1' NOT NULL
|
||||
GO
|
||||
ALTER TABLE TBPMO_FOLLOW_UP_EMAIL
|
||||
ADD CONSTRAINT FK_TBPMO_FOLLOW_UP_EMAIL_CONSTR_ID FOREIGN KEY (CONSTRUCTOR_ID)
|
||||
REFERENCES TBPMO_FORM_CONSTRUCTOR(GUID)
|
||||
@@ -0,0 +1,4 @@
|
||||
CREATE NONCLUSTERED INDEX [IDXTBPMO_CONTROL_VALUE_RECID_VALUE]
|
||||
ON [dbo].[TBPMO_CONTROL_VALUE] ([CONTROL_ID])
|
||||
INCLUDE ([RECORD_ID],[VALUE])
|
||||
GO
|
||||
@@ -0,0 +1,27 @@
|
||||
CREATE PROCEDURE [dbo].[PRDD_COPY_RECORD](@pRECORD_ID INT,@WHO VARCHAR(50)) --,@pMODULE_ID INT)
|
||||
AS
|
||||
DECLARE @NEW_RECORD_ID INT
|
||||
|
||||
BEGIN TRY
|
||||
INSERT INTO TBPMO_RECORD (
|
||||
FORM_ID,ADDED_WHO)
|
||||
SELECT FORM_ID,@WHO FROM TBPMO_RECORD WHERE GUID = @pRECORD_ID
|
||||
|
||||
SELECT @NEW_RECORD_ID = MAX(GUID) FROM TBPMO_RECORD
|
||||
|
||||
INSERT INTO TBPMO_RECORD_CONNECT(RECORD1_ID,RECORD2_ID,COMMENT) SELECT
|
||||
RECORD1_ID,@NEW_RECORD_ID,COMMENT FROM TBPMO_RECORD_CONNECT WHERE RECORD2_ID = @pRECORD_ID
|
||||
|
||||
INSERT INTO TBPMO_CONTROL_VALUE(CONTROL_ID,RECORD_ID,VALUE,ADDED_WHO) SELECT
|
||||
CONTROL_ID,@NEW_RECORD_ID,VALUE,@WHO FROM TBPMO_CONTROL_VALUE WHERE RECORD_ID = @pRECORD_ID
|
||||
|
||||
INSERT INTO TBPMO_CONTROL_IMAGE(CONTROL_ID,RECORD_ID,IMG,ADDED_WHO) SELECT
|
||||
CONTROL_ID,@NEW_RECORD_ID,IMG,@WHO FROM TBPMO_CONTROL_IMAGE WHERE RECORD_ID = @pRECORD_ID
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
|
||||
@@ -0,0 +1,69 @@
|
||||
ALTER TABLE TBPMO_RECORD
|
||||
ADD RECORD_ENTITY_ID INTEGER NOT NULL DEFAULT 0
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_RECORD_AFT_INS] ON [dbo].[TBPMO_RECORD]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@RECORD_ID INTEGER,
|
||||
@MAX_ID INTEGER,
|
||||
@FORM_ID INTEGER,
|
||||
@WF_ID INTEGER,
|
||||
@PARENT_ID INTEGER
|
||||
SELECT
|
||||
@FORM_ID = FORM_ID,
|
||||
@RECORD_ID = GUID
|
||||
FROM INSERTED
|
||||
|
||||
SELECT
|
||||
@MAX_ID = MAX(RECORD_ENTITY_ID) + 1
|
||||
FROM TBPMO_RECORD WHERE FORM_ID = @FORM_ID
|
||||
|
||||
UPDATE TBPMO_RECORD SET
|
||||
RECORD_ENTITY_ID = @MAX_ID FROM INSERTED WHERE TBPMO_RECORD.GUID = INSERTED.GUID
|
||||
|
||||
--Überprüfen ob dieser Rec
|
||||
IF EXISTS(
|
||||
SELECT * FROM TBPMO_WORKFLOW_FORM where FORM_ID = @FORM_ID
|
||||
)
|
||||
BEGIN
|
||||
EXECUTE dbo.PRPMO_CREATE_WF_TASKS @FORM_ID, @RECORD_ID
|
||||
END
|
||||
|
||||
--EXEC DBO.PRPMO_CREATE_RECORD_CONNECTIONS @FORM_ID,@RECORD_ID
|
||||
--SELECT @PARENT_ID = PARENT_ID FROM TBPMO_FORM WHERE GUID = @FORM_ID
|
||||
--IF @PARENT_ID > 0
|
||||
-- INSERT INTO TBPMO_RECORD_CONNECT(RECORD1_ID,RECORD2_ID) VALUES (@PARENT_ID,@RECORD_ID)
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
DECLARE
|
||||
@GUID INTEGER,
|
||||
@FORM_ID INTEGER ,
|
||||
@MAX_ID INTEGER
|
||||
DECLARE c_RECORD CURSOR FOR
|
||||
SELECT GUID,FORM_ID FROM TBPMO_RECORD ORDER BY GUID
|
||||
OPEN c_RECORD
|
||||
FETCH NEXT FROM c_RECORD INTO @GUID,@FORM_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SELECT
|
||||
@MAX_ID = MAX(RECORD_ENTITY_ID) + 1
|
||||
FROM TBPMO_RECORD WHERE FORM_ID = @FORM_ID
|
||||
|
||||
UPDATE TBPMO_RECORD SET RECORD_ENTITY_ID = @MAX_ID WHERE GUID = @GUID
|
||||
|
||||
FETCH NEXT FROM c_RECORD INTO @GUID,@FORM_ID
|
||||
END
|
||||
CLOSE c_RECORD
|
||||
DEALLOCATE c_RECORD
|
||||
GO
|
||||
103
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.3/2.4.3.sql
Normal file
103
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.3/2.4.3.sql
Normal file
@@ -0,0 +1,103 @@
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR
|
||||
ADD LANGUAGE VARCHAR(5) NOT NULL DEFAULT 'de-DE'
|
||||
GO
|
||||
DROP TABLE TBPMO_CONTROL_LANGUAGE
|
||||
CREATE TABLE TBPMO_CONTROL_LANGUAGE
|
||||
(
|
||||
GUID INT IDENTITY(1,1), -- Eindeutiger Tabellenschlüssel,
|
||||
LANGUAGE_TYPE VARCHAR(5) NOT NULL,
|
||||
CONTROL_SCREEN_ID INTEGER NOT NULL,
|
||||
CAPTION VARCHAR(100) NOT NULL,
|
||||
HINT VARCHAR(500),
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'Digital Data' NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_CONTROL_LANGUAGE PRIMARY KEY(GUID),
|
||||
CONSTRAINT FK_TBPMO_CONTROL_LANGUAGE_CTRLSCR_ID FOREIGN KEY(CONTROL_SCREEN_ID) REFERENCES TBPMO_CONTROL_SCREEN(GUID)
|
||||
)
|
||||
GO
|
||||
------------------------------------------------------------------------------
|
||||
|
||||
CREATE TRIGGER TBPMO_CONTROL_LANGUAGE_AFT_UPD ON TBPMO_CONTROL_LANGUAGE
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
UPDATE TBPMO_CONTROL_LANGUAGE SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CONTROL_LANGUAGE.GUID = INSERTED.GUID
|
||||
END
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_LANGUAGE_OBJECT
|
||||
(
|
||||
GUID INT IDENTITY(1,1), -- Eindeutiger Tabellenschlüssel,
|
||||
LANGUAGE_TYPE VARCHAR(5) NOT NULL,
|
||||
SCREEN_ID INTEGER NOT NULL,
|
||||
PMO_OBJECT_NAME VARCHAR(100) NOT NULL,
|
||||
CAPTION VARCHAR(100) NOT NULL,
|
||||
HINT VARCHAR(500),
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'Digital Data' NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_LANGUAGE_OBJECT PRIMARY KEY(GUID),
|
||||
CONSTRAINT FK_TBPMO_LANGUAGE_OBJECT_SCREEN_ID FOREIGN KEY(SCREEN_ID) REFERENCES TBPMO_SCREEN(GUID)
|
||||
)
|
||||
GO
|
||||
------------------------------------------------------------------------------
|
||||
|
||||
CREATE TRIGGER TBPMO_LANGUAGE_OBJECT_AFT_UPD ON TBPMO_LANGUAGE_OBJECT
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_LANGUAGE_OBJECT.GUID = INSERTED.GUID
|
||||
END
|
||||
GO
|
||||
|
||||
CREATE FUNCTION [dbo].[FNPMO_GETOBJECTCAPTION](@pLANG_TYPE VARCHAR(5), @pOBJ_NAME VARCHAR(100), @pSCREEN_ID INT)
|
||||
RETURNS VARCHAR(100)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @PMOOBJ_CAPTION VARCHAR(100)
|
||||
|
||||
SELECT @PMOOBJ_CAPTION = CAPTION FROM
|
||||
TBPMO_LANGUAGE_OBJECT AS T
|
||||
WHERE
|
||||
T.LANGUAGE_TYPE = @pLANG_TYPE AND
|
||||
T.SCREEN_ID = @pSCREEN_ID AND
|
||||
T.PMO_OBJECT_NAME = @pOBJ_NAME
|
||||
|
||||
RETURN(ISNULL(@PMOOBJ_CAPTION,''))
|
||||
END
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_CONSTRUCTOR_AFT_UPD] ON [dbo].[TBPMO_FORM_CONSTRUCTOR]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5), @CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@LANGUAGE = [LANGUAGE],
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'CONSTR_MENUE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBPMO_FORM_CONSTRUCTOR SET CHANGED_WHEN = GETDATE()
|
||||
FROM INSERTED WHERE TBPMO_FORM_CONSTRUCTOR.GUID = INSERTED.GUID
|
||||
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = 1)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @FORM_TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = 1
|
||||
ELSE
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,1,@PMO_OBJECT_NAME,@FORM_TITLE)
|
||||
END
|
||||
GO
|
||||
|
||||
@@ -0,0 +1,250 @@
|
||||
ALTER TABLE TBPMO_FORM_VIEW
|
||||
ADD LANGUAGE VARCHAR(5) NOT NULL DEFAULT 'de-DE'
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_VIEW_AFT_UPD] ON [dbo].[TBPMO_FORM_VIEW]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@LANGUAGE = [LANGUAGE],
|
||||
@SCREEN_ID = SCREEN_ID,
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBPMO_FORM_VIEW SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_FORM_VIEW.GUID = INSERTED.GUID
|
||||
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @FORM_TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID
|
||||
ELSE
|
||||
BEGIN TRY
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 72'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 84'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
CREATE TRIGGER [dbo].[TBPMO_FORM_VIEW_AFT_INS] ON [dbo].[TBPMO_FORM_VIEW]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@LANGUAGE = [LANGUAGE],
|
||||
@SCREEN_ID = SCREEN_ID,
|
||||
@ADDED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE TRIGGER [dbo].[TBPMO_FORM_CONSTRUCTOR_AFT_INS] ON [dbo].[TBPMO_FORM_CONSTRUCTOR]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@LANGUAGE = [LANGUAGE],
|
||||
@ADDED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'CONSTR_MENUE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
(@LANGUAGE,1,@PMO_OBJECT_NAME,@FORM_TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
ALTER VIEW [dbo].[VWPMO_CONSTRUCTOR_FORMS] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T2.GUID,
|
||||
T1.GUID FORM_VIEW_ID,
|
||||
T1.SCREEN_ID,
|
||||
T2.CONSTRUCT_ID,
|
||||
T.PARENT_ID,
|
||||
T2.SEQUENCE,
|
||||
T2.LEVEL1_SELECT,
|
||||
T.GUID AS FORM_ID,
|
||||
T1.FORM_TITLE,
|
||||
T2.SQL_SELECT_EBENE1,
|
||||
T2.SQL_SELECT_EBENE2,
|
||||
T2.SQL_QUICK_VIEW,
|
||||
T2.COLUMN_NAME1,
|
||||
T2.COLUMN_NAME2,
|
||||
T.FORM_TYPE_ID,
|
||||
T2.LOAD_DIRECT
|
||||
FROM
|
||||
tbpmo_form T,
|
||||
TBPMO_FORM_VIEW T1,
|
||||
TBPMO_FORM_CONSTRUCTOR_DETAIL T2
|
||||
where
|
||||
T2.FORM_ID = T.GUID AND
|
||||
T.GUID = T1.FORM_ID
|
||||
ORDER BY
|
||||
T2.CONSTRUCT_ID,T.PARENT_ID,T2.SEQUENCE
|
||||
GO
|
||||
|
||||
|
||||
DECLARE @ID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@FORM_TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
|
||||
DECLARE c_FORM_VIEW CURSOR FOR
|
||||
SELECT GUID ,SCREEN_ID, FORM_TITLE, LANGUAGE FROM TBPMO_FORM_VIEW
|
||||
|
||||
|
||||
BEGIN
|
||||
OPEN c_FORM_VIEW
|
||||
FETCH NEXT FROM c_FORM_VIEW INTO @ID, @SCREEN_ID,@FORM_TITLE,@LANGUAGE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@ID)
|
||||
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE)
|
||||
|
||||
FETCH NEXT FROM c_FORM_VIEW INTO @ID, @SCREEN_ID,@FORM_TITLE,@LANGUAGE
|
||||
END
|
||||
CLOSE c_FORM_VIEW
|
||||
DEALLOCATE c_FORM_VIEW
|
||||
|
||||
END
|
||||
GO
|
||||
--############## DOKUMENTART #####################
|
||||
ALTER TABLE TBDD_DOKUMENTART
|
||||
ADD LANGUAGE VARCHAR(5) NOT NULL DEFAULT 'de-DE'
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBDD_DOKUMENTART_AFT_UPD] ON [dbo].[TBDD_DOKUMENTART]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@DA_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@DA_TITLE = BEZEICHNUNG,
|
||||
@LANGUAGE = [LANGUAGE],
|
||||
@SCREEN_ID = 1,
|
||||
@CHANGED_WHO = GEANDERTWER
|
||||
FROM INSERTED
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'DOCTYPE_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBDD_DOKUMENTART SET GEAENDERTWANN = GETDATE() FROM INSERTED
|
||||
WHERE TBDD_DOKUMENTART.GUID = INSERTED.GUID
|
||||
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @DA_TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID
|
||||
ELSE
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@DA_TITLE)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
CREATE TRIGGER [dbo].[TBDD_DOKUMENTART_AFT_INS] ON [dbo].[TBDD_DOKUMENTART]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@DA_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@DA_TITLE = BEZEICHNUNG,
|
||||
@LANGUAGE = [LANGUAGE],
|
||||
@SCREEN_ID = 1,
|
||||
@ADDED_WHO = ERSTELLTWER
|
||||
FROM INSERTED
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'DOCTYPE_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@DA_TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
|
||||
|
||||
@@ -0,0 +1,572 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.6.1' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
ALTER TABLE TBPMO_FORM
|
||||
ADD REDUNDANT_ENTITY INTEGER NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER TABLE TBPMO_DOCSEARCH_RESULTLIST_CONFIG
|
||||
ADD EDITABLE BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER PROCEDURE PRPMO_COPY_ENTITY (@pFORM_ID INT, @pADDEDWHO VARCHAR(50))
|
||||
AS
|
||||
DECLARE
|
||||
@NEW_FORM_ID INT,
|
||||
@PARENT_ID INT,
|
||||
@NAME VARCHAR(100),
|
||||
@LEVEL VARCHAR(10),
|
||||
@SHOW_FORM_CONSTR BIT,
|
||||
@FORM_TYPE_ID INT,
|
||||
@CONTROL_GUID INTEGER,
|
||||
@CONTROL_TYPE_ID INT,
|
||||
@CONTROL_NAME VARCHAR(100)
|
||||
,@COL_NAME VARCHAR(100)
|
||||
,@REQUIRED BIT
|
||||
,@DEFAULT_VALUE VARCHAR(100)
|
||||
,@SQL_COMMAND_1 VARCHAR(2000)
|
||||
,@SQL_COMMAND_2 VARCHAR(2000)
|
||||
,@CONNECTION_ID_1 SMALLINT
|
||||
,@CONNECTION_ID_2 SMALLINT
|
||||
,@READ_ONLY BIT
|
||||
,@VALIDATION BIT
|
||||
,@MULTILINE BIT
|
||||
,@PARENT_CONTROL_ID INT
|
||||
,@MASTER_DATA_ID INT
|
||||
,@FORMAT_TYPE VARCHAR(50)
|
||||
,@SHOW_COLUMN BIT
|
||||
,@STATIC_LIST VARCHAR(2000)
|
||||
|
||||
SELECT @PARENT_ID = PARENT_ID, @NAME = 'COPY_' + NAME,@LEVEL = [LEVEL],@SHOW_FORM_CONSTR = SHOW_FORM_CONSTRUCT, @FORM_TYPE_ID = FORM_TYPE_ID FROM TBPMO_FORM WHERE GUID = @pFORM_ID
|
||||
|
||||
INSERT INTO TBPMO_FORM (
|
||||
PARENT_ID,NAME,LEVEL,ADDED_WHO,SHOW_FORM_CONSTRUCT,FORM_TYPE_ID) VALUES (
|
||||
@PARENT_ID,@NAME,@LEVEL,@pADDEDWHO,@SHOW_FORM_CONSTR,@FORM_TYPE_ID)
|
||||
|
||||
SELECT @NEW_FORM_ID = MAX(GUID) FROM TBPMO_FORM
|
||||
INSERT INTO TBPMO_FORM_VIEW (FORM_ID, SCREEN_ID, FORM_TITLE, DESCRIPTION, ADDED_WHO) VALUES
|
||||
(@NEW_FORM_ID, 1, 'UNDEFINED_FORMTITLE', '', @pADDEDWHO)
|
||||
|
||||
DECLARE c_CONTROL CURSOR FOR SELECT GUID,[CONTROL_TYPE_ID]
|
||||
,'COPY_' + [NAME]
|
||||
,[COL_NAME]
|
||||
,[REQUIRED]
|
||||
,[DEFAULT_VALUE]
|
||||
,[SQL_COMMAND_1]
|
||||
,[SQL_COMMAND_2]
|
||||
,[CONNECTION_ID_1]
|
||||
,[CONNECTION_ID_2]
|
||||
,[READ_ONLY]
|
||||
,[VALIDATION]
|
||||
,[MULTILINE]
|
||||
,[PARENT_CONTROL_ID]
|
||||
,[MASTER_DATA_ID]
|
||||
,[FORMAT_TYPE]
|
||||
,[SHOW_COLUMN],STATIC_LIST FROM TBPMO_CONTROL WHERE FORM_ID = @pFORM_ID ORDER BY PARENT_CONTROL_ID
|
||||
|
||||
|
||||
BEGIN
|
||||
OPEN c_CONTROL
|
||||
FETCH NEXT FROM c_CONTROL INTO @CONTROL_GUID,@CONTROL_TYPE_ID,
|
||||
@CONTROL_NAME
|
||||
,@COL_NAME
|
||||
,@REQUIRED
|
||||
,@DEFAULT_VALUE
|
||||
,@SQL_COMMAND_1
|
||||
,@SQL_COMMAND_2
|
||||
,@CONNECTION_ID_1
|
||||
,@CONNECTION_ID_2
|
||||
,@READ_ONLY
|
||||
,@VALIDATION
|
||||
,@MULTILINE
|
||||
,@PARENT_CONTROL_ID
|
||||
,@MASTER_DATA_ID
|
||||
,@FORMAT_TYPE
|
||||
,@SHOW_COLUMN
|
||||
,@STATIC_LIST
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF @PARENT_CONTROL_ID > 0
|
||||
BEGIN
|
||||
DECLARE @CTRLNAME VARCHAR(100)
|
||||
SELECT @CTRLNAME = 'COPY_' + [NAME] FROM TBPMO_CONTROL WHERE GUID = @PARENT_CONTROL_ID
|
||||
PRINT 'PCTRID = ' + CONVERT(VARCHAR(10),@PARENT_CONTROL_ID)
|
||||
PRINT '@CTRLNAME = ' + @CTRLNAME
|
||||
SELECT @PARENT_CONTROL_ID = GUID FROM TBPMO_CONTROL WHERE NAME = @CTRLNAME AND FORM_ID = @NEW_FORM_ID
|
||||
PRINT 'NEW PCTRID = ' + CONVERT(VARCHAR(10),@PARENT_CONTROL_ID)
|
||||
END
|
||||
|
||||
INSERT INTO TBPMO_CONTROL (
|
||||
FORM_ID
|
||||
,[CONTROL_TYPE_ID]
|
||||
,[NAME]
|
||||
,[COL_NAME]
|
||||
,[REQUIRED]
|
||||
,[DEFAULT_VALUE]
|
||||
,[SQL_COMMAND_1]
|
||||
,[SQL_COMMAND_2]
|
||||
,[CONNECTION_ID_1]
|
||||
,[CONNECTION_ID_2]
|
||||
,[READ_ONLY]
|
||||
,[VALIDATION]
|
||||
,[MULTILINE]
|
||||
,[PARENT_CONTROL_ID]
|
||||
,[MASTER_DATA_ID]
|
||||
,[FORMAT_TYPE]
|
||||
,[SHOW_COLUMN]
|
||||
,[STATIC_LIST]
|
||||
,ADDED_WHO
|
||||
) VALUES (
|
||||
@NEW_FORM_ID
|
||||
,@CONTROL_TYPE_ID
|
||||
,@CONTROL_NAME
|
||||
,@COL_NAME
|
||||
,@REQUIRED
|
||||
,@DEFAULT_VALUE
|
||||
,@SQL_COMMAND_1
|
||||
,@SQL_COMMAND_2
|
||||
,@CONNECTION_ID_1
|
||||
,@CONNECTION_ID_2
|
||||
,@READ_ONLY
|
||||
,@VALIDATION
|
||||
,@MULTILINE
|
||||
,@PARENT_CONTROL_ID
|
||||
,@MASTER_DATA_ID
|
||||
,@FORMAT_TYPE
|
||||
,@SHOW_COLUMN
|
||||
,@STATIC_LIST
|
||||
,@pADDEDWHO
|
||||
)
|
||||
DECLARE @NEW_CONTROLID INTEGER
|
||||
SELECT @NEW_CONTROLID = MAX(GUID) FROM TBPMO_CONTROL
|
||||
|
||||
DECLARE
|
||||
@SCREEN_ID INTEGER
|
||||
,@CONTROL_TEXT VARCHAR(100)
|
||||
,@X_LOC FLOAT
|
||||
,@Y_LOC FLOAT
|
||||
,@HEIGHT INTEGER
|
||||
,@WIDTH INTEGER
|
||||
,@FONT_FAMILY VARCHAR(50)
|
||||
,@FONT_COLOR INTEGER
|
||||
,@FONT_SIZE INTEGER
|
||||
,@FONT_STYLE INTEGER
|
||||
,@TAB_INDEX INTEGER
|
||||
,@TAB_STOP BIT
|
||||
,@BACK_COLOR INTEGER
|
||||
|
||||
SELECT @SCREEN_ID = [SCREEN_ID], @CONTROL_TEXT = [CONTROL_TEXT],@X_LOC = [X_LOC],
|
||||
@Y_LOC = [Y_LOC],@HEIGHT = [HEIGHT], @WIDTH = [WIDTH],@FONT_FAMILY = [FONT_FAMILY],
|
||||
@FONT_COLOR = [FONT_COLOR], @FONT_SIZE = [FONT_SIZE],@FONT_STYLE = [FONT_STYLE],
|
||||
@TAB_INDEX = [TAB_INDEX], @TAB_STOP = [TAB_STOP], @BACK_COLOR = [BACK_COLOR] FROM TBPMO_CONTROL_SCREEN WHERE CONTROL_ID = @CONTROL_GUID
|
||||
INSERT INTO TBPMO_CONTROL_SCREEN (
|
||||
CONTROL_ID,
|
||||
SCREEN_ID
|
||||
,CONTROL_TEXT
|
||||
,X_LOC
|
||||
,Y_LOC
|
||||
,HEIGHT
|
||||
,WIDTH
|
||||
,FONT_FAMILY
|
||||
,FONT_COLOR
|
||||
,FONT_SIZE
|
||||
,FONT_STYLE
|
||||
,TAB_INDEX
|
||||
,TAB_STOP
|
||||
,BACK_COLOR
|
||||
,ADDED_WHO)
|
||||
VALUES(
|
||||
@NEW_CONTROLID
|
||||
,@SCREEN_ID
|
||||
,@CONTROL_TEXT
|
||||
,@X_LOC
|
||||
,@Y_LOC
|
||||
,@HEIGHT
|
||||
,@WIDTH
|
||||
,@FONT_FAMILY
|
||||
,@FONT_COLOR
|
||||
,@FONT_SIZE
|
||||
,@FONT_STYLE
|
||||
,@TAB_INDEX
|
||||
,@TAB_STOP
|
||||
,@BACK_COLOR
|
||||
,@pADDEDWHO
|
||||
)
|
||||
DECLARE @NEW_ID INT
|
||||
SELECT @NEW_ID = MAX(GUID) FROM TBPMO_CONTROL_SCREEN WHERE CONTROL_TEXT = @CONTROL_TEXT
|
||||
|
||||
INSERT INTO TBPMO_CONTROL_LANGUAGE ([LANGUAGE_TYPE] ,[CONTROL_SCREEN_ID],[CAPTION],[ADDED_WHO]) VALUES (
|
||||
'de-DE',@NEW_ID,@CONTROL_TEXT,@pADDEDWHO)
|
||||
INSERT INTO TBPMO_CONTROL_LANGUAGE ([LANGUAGE_TYPE] ,[CONTROL_SCREEN_ID],[CAPTION],[ADDED_WHO]) VALUES (
|
||||
'en-EN',@NEW_ID,@CONTROL_TEXT,@pADDEDWHO)
|
||||
|
||||
FETCH NEXT FROM c_CONTROL INTO @CONTROL_GUID,@CONTROL_TYPE_ID,
|
||||
@CONTROL_NAME
|
||||
,@COL_NAME
|
||||
,@REQUIRED
|
||||
,@DEFAULT_VALUE
|
||||
,@SQL_COMMAND_1
|
||||
,@SQL_COMMAND_2
|
||||
,@CONNECTION_ID_1
|
||||
,@CONNECTION_ID_2
|
||||
,@READ_ONLY
|
||||
,@VALIDATION
|
||||
,@MULTILINE
|
||||
,@PARENT_CONTROL_ID
|
||||
,@MASTER_DATA_ID
|
||||
,@FORMAT_TYPE
|
||||
,@SHOW_COLUMN
|
||||
,@STATIC_LIST
|
||||
END
|
||||
|
||||
CLOSE c_CONTROL
|
||||
DEALLOCATE c_CONTROL
|
||||
END
|
||||
|
||||
ALTER FUNCTION [dbo].[FNPMO_DOC_GET_IDX](@pDOCID INTEGER, @pENTITY INTEGER, @DOCIDX VARCHAR(20))
|
||||
RETURNS VARCHAR(250)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @HEADER_CAPTION VARCHAR(30), @VALUE VARCHAR(250), @RESULT VARCHAR(250), @REDUNDANT_ID INTEGER
|
||||
SELECT @HEADER_CAPTION = HEADER_CAPTION FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE ENTITY_ID = @pENTITY AND COLUMN_VIEW = @DOCIDX
|
||||
IF @HEADER_CAPTION IS NULL
|
||||
BEGIN
|
||||
SELECT @REDUNDANT_ID = REDUNDANT_ENTITY FROM TBPMO_FORM WHERE GUID = @pENTITY
|
||||
IF @REDUNDANT_ID <> 0
|
||||
SELECT @RESULT = dbo.FNPMO_DOC_GET_IDX(@pDOCID,@REDUNDANT_ID,@DOCIDX)
|
||||
ELSE
|
||||
SET @RESULT = 'NO CONFIGURATION'
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT @VALUE = VALUE FROM VWPMO_DOC_INDICES WHERE DocID = @pDOCID AND COLUMN_CAPTION = @HEADER_CAPTION
|
||||
IF @VALUE IS NOT NULL
|
||||
SET @RESULT = @VALUE
|
||||
ELSE
|
||||
SET @RESULT = ''
|
||||
END
|
||||
RETURN @RESULT
|
||||
END
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_DOC_RECORD_LINK_AFT_INS] ON [dbo].[TBPMO_DOC_RECORD_LINK]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@RECORD_ID INTEGER,
|
||||
@DOC_ID INTEGER,
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@ENTITY_ID INTEGER
|
||||
SELECT
|
||||
@RECORD_ID = RECORD_ID,
|
||||
@DOC_ID = DOC_ID,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SELECT @ENTITY_ID = FORM_ID FROM TBPMO_RECORD WHERE GUID = @RECORD_ID
|
||||
--Den Defaultvalue der DropdownListe eintragen
|
||||
IF (SELECT COUNT(GUID) FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE ENTITY_ID = @ENTITY_ID AND TYPE_ID = 4) >= 1
|
||||
BEGIN
|
||||
INSERT INTO TBPMO_DOC_VALUES (DocID,CONFIG_ID,VALUE,ADDED_WHO)
|
||||
SELECT @DOC_ID,T.GUID,T1.VALUE,@ADDED_WHO FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG T, TBPMO_DOCRESULT_DROPDOWN_ITEMS T1 WHERE T.GUID = T1.CONFIG_ID AND T1.[DEFAULT] = 1 AND T.ENTITY_ID = @ENTITY_ID AND T.TYPE_ID = 4
|
||||
END
|
||||
/*###### KUNDEN-INDIVIDUELL - BEGIN ####################################################################*/
|
||||
--DECLARE
|
||||
-- @NODE_CONFIG_ID INTEGER,
|
||||
-- @MATERIAL VARCHAR(50)
|
||||
|
||||
--IF @ADDED_WHO <> 'ZSG-IMPORT'
|
||||
-- BEGIN
|
||||
-- SELECT @NODE_CONFIG_ID = NODE_CONFIG_ID FROM TBPMO_STRUCTURE_NODES WHERE GUID = (SELECT NODE_GUID FROM TBPMO_RECORD WHERE GUID = @RECORD_ID )
|
||||
-- IF @NODE_CONFIG_ID IN (7,8,14)
|
||||
|
||||
-- IF EXISTS(SELECT GUID FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = 14 AND RECORD_ID = @RECORD_ID)
|
||||
-- BEGIN
|
||||
-- DECLARE @RECID_LINK INTEGER
|
||||
-- SELECT @MATERIAL = UPPER(LTRIM(RTRIM(VALUE))) FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = 14 AND RECORD_ID = @RECORD_ID
|
||||
-- DECLARE curs_RECORD CURSOR LOCAL FOR
|
||||
-- SELECT RECORD_ID FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = 14 AND UPPER(LTRIM(RTRIM(VALUE))) = @MATERIAL AND RECORD_ID <> @RECORD_ID
|
||||
-- OPEN curs_RECORD
|
||||
-- FETCH NEXT FROM curs_RECORD INTO @RECID_LINK
|
||||
-- WHILE @@FETCH_STATUS = 0
|
||||
-- BEGIN
|
||||
-- IF NOT EXISTS(SELECT GUID FROM TBPMO_DOC_RECORD_LINK WHERE DOC_ID = @DOC_ID AND RECORD_ID = @RECID_LINK)
|
||||
-- INSERT INTO TBPMO_DOC_RECORD_LINK (RECORD_ID,DOC_ID,COMMENT, ADDED_WHO) VALUES
|
||||
-- (@RECID_LINK,@DOC_ID,'MATERIAL INSERT',@ADDED_WHO)
|
||||
-- FETCH NEXT FROM curs_RECORD INTO @RECID_LINK
|
||||
-- END
|
||||
|
||||
-- CLOSE curs_RECORD
|
||||
-- DEALLOCATE curs_RECORD
|
||||
-- END
|
||||
-- END
|
||||
/*###### KUNDEN-INDIVIDUELL - ENDE ####################################################################*/
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_CONSTRUCTOR_USER_AFT_INS] ON [dbo].[TBPMO_CONSTRUCTOR_USER]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@USER_ID INTEGER,
|
||||
@CONSTRUCT_ID INTEGER,
|
||||
@ADDED_WHO VARCHAR(50)
|
||||
SELECT
|
||||
@CONSTRUCT_ID = CONSTRUCT_ID,
|
||||
@USER_ID = GUID,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
DECLARE @ENTITY_ID INTEGER
|
||||
|
||||
DECLARE c_USER CURSOR FOR
|
||||
SELECT
|
||||
FORM_ID FROM
|
||||
VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = 2 AND DOCUMENT_VIEW = 1
|
||||
OPEN c_USER
|
||||
FETCH NEXT FROM c_USER INTO @ENTITY_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
INSERT INTO TBPMO_USER_RIGHTS_JOBS (USER_ID,[ENTITY_ID],COMMENT,ADDED_WHO) VALUES
|
||||
(@USER_ID,@ENTITY_ID,'USER ADDED TO CONSTRUCTOR','TBPMO_CONSTRUCTOR_USER_AFT_INS')
|
||||
|
||||
FETCH NEXT FROM c_USER INTO @ENTITY_ID
|
||||
END
|
||||
CLOSE c_USER
|
||||
DEALLOCATE c_USER
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_RIGHT_USER
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
USER_ID INTEGER NOT NULL,
|
||||
ENTITY_ID INTEGER NOT NULL,
|
||||
EDIT_REC BIT NOT NULL DEFAULT 1,
|
||||
ADD_REC BIT NOT NULL DEFAULT 0,
|
||||
DELETE_REC BIT NOT NULL DEFAULT 0,
|
||||
ADD_DOC BIT NOT NULL DEFAULT 0,
|
||||
READ_ONLY_DOC BIT NOT NULL DEFAULT 0,
|
||||
DELETE_DOC BIT NOT NULL DEFAULT 0,
|
||||
FILES_VISIBLE BIT NOT NULL DEFAULT 1,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHEN DATETIME
|
||||
CONSTRAINT PK_TBPMO_RIGHT_USER PRIMARY KEY (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_RIGHT_USER_AFT_UPD ON TBPMO_RIGHT_USER
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_RIGHT_USER SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_RIGHT_USER.GUID = INSERTED.GUID
|
||||
GO
|
||||
ALTER TABLE TBPMO_KONFIGURATION
|
||||
ADD WIKI_STRING VARCHAR(500) NOT NULL DEFAULT ''
|
||||
GO
|
||||
ALTER PROCEDURE [dbo].[PRPMO_DELETE_RESULTFILE](@pDOCID INT, @pRECORDID INT, @DELETE_FILE INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE @COUNT INT
|
||||
SELECT @COUNT = COUNT(GUID) FROM TBPMO_DOC_RECORD_LINK WHERE DOC_ID = @pDOCID
|
||||
IF @COUNT = 1 OR (@DELETE_FILE = 1 AND @COUNT > 1)
|
||||
BEGIN
|
||||
DELETE FROM TBPMO_DOC_INDICES WHERE DocID = @pDOCID
|
||||
DELETE FROM TBPMO_DOC_RECORD_LINK WHERE Doc_ID = @pDOCID
|
||||
DELETE FROM TBPMO_DOCRESULT_LIST WHERE DocID = @pDOCID
|
||||
END
|
||||
ELSE IF @COUNT > 1 and @DELETE_FILE = 0
|
||||
BEGIN
|
||||
DELETE FROM TBPMO_DOC_RECORD_LINK WHERE Doc_ID = @pDOCID AND RECORD_ID = @pRECORDID
|
||||
END
|
||||
ELSE IF @DELETE_FILE = 1
|
||||
BEGIN
|
||||
DELETE FROM TBPMO_DOC_INDICES WHERE DocID = @pDOCID
|
||||
DELETE FROM TBPMO_DOC_RECORD_LINK WHERE Doc_ID = @pDOCID
|
||||
DELETE FROM TBPMO_DOCRESULT_LIST WHERE DocID = @pDOCID
|
||||
END
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_DOCSEARCH_RESULTLIST_CONFIG_AFT_DEL ON TBPMO_DOCSEARCH_RESULTLIST_CONFIG
|
||||
FOR DELETE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@CONFIG_ID INTEGER,
|
||||
@LANGUAGE VARCHAR(5)
|
||||
|
||||
SELECT
|
||||
@CONFIG_ID = deleted.GUID,
|
||||
@LANGUAGE = deleted.LANGUAGE
|
||||
FROM deleted
|
||||
|
||||
DELETE FROM TBPMO_DOC_VALUES WHERE CONFIG_ID = @CONFIG_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
DROP TABLE TBPMO_DOCRESULT_DROPDOWN_ITEMS
|
||||
CREATE TABLE TBPMO_DOCRESULT_DROPDOWN_ITEMS
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1)
|
||||
,CONFIG_ID INTEGER NOT NULL
|
||||
,VALUE VARCHAR(100) NOT NULL
|
||||
,SEQUENCE TINYINT NOT NULL DEFAULT 0
|
||||
,[DEFAULT] BIT NOT NULL DEFAULT 0
|
||||
,COLOR VARCHAR(50) NOT NULL DEFAULT ''
|
||||
,ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT'
|
||||
,ADDED_WHEN DATETIME DEFAULT GETDATE()
|
||||
,CHANGED_WHO VARCHAR(50)
|
||||
,CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_DOCRESULT_DROPDOWN_ITEMS PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_DOCRESULT_DROPDOWN_ITEMSCONFIG_ID FOREIGN KEY (CONFIG_ID) REFERENCES TBPMO_DOCSEARCH_RESULTLIST_CONFIG (GUID),
|
||||
CONSTRAINT UQ_TBPMO_DOCRESULT_DROPDOWN_ITEMS UNIQUE (CONFIG_ID,VALUE),
|
||||
CONSTRAINT UQ2_TBPMO_DOCRESULT_DROPDOWN_ITEMS UNIQUE (CONFIG_ID,[DEFAULT]),
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_DOCRESULT_DROPDOWN_ITEMS_AFT_UPD ON TBPMO_DOCRESULT_DROPDOWN_ITEMS
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_DOCRESULT_DROPDOWN_ITEMS SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_DOCRESULT_DROPDOWN_ITEMS.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
ALTER FUNCTION [dbo].[FNPMO_DOC_GET_DROPDOWN](@pDOCID INTEGER, @pENTITY INTEGER, @DOC_DD VARCHAR(20), @LANGUAGE VARCHAR(5))
|
||||
RETURNS VARCHAR(250)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @HEADER_CAPTION VARCHAR(30),
|
||||
@CONFIG_ID INTEGER, @VALUE VARCHAR(250), @RESULT VARCHAR(250)
|
||||
SELECT
|
||||
@HEADER_CAPTION = HEADER_CAPTION,
|
||||
@CONFIG_ID = GUID FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE
|
||||
ENTITY_ID = @pENTITY AND COLUMN_VIEW = @DOC_DD AND LANGUAGE = @LANGUAGE
|
||||
|
||||
IF @HEADER_CAPTION IS NULL
|
||||
SET @RESULT = 'NO DROP-DOWN CONFIGURATION'
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT @VALUE = VALUE FROM TBPMO_DOC_VALUES WHERE DocID = @pDOCID AND CONFIG_ID = @CONFIG_ID
|
||||
IF @VALUE IS NOT NULL
|
||||
SET @RESULT = @VALUE
|
||||
ELSE
|
||||
SET @RESULT = ''
|
||||
END
|
||||
RETURN @RESULT
|
||||
END
|
||||
GO
|
||||
CREATE TABLE TBPMO_CONTROL_ENTITY_LINK
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
ORIGIN_CTRL_ID INTEGER NOT NULL,
|
||||
LINKED_CTRL_ID INTEGER NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_CONTROL_ENTITY_LINK PRIMARY KEY (GUID),
|
||||
CONSTRAINT UNIQUE_ORIGIN_CTRL_ID_LINKED_CONTROL_ID UNIQUE(ORIGIN_CTRL_ID,LINKED_CTRL_ID),
|
||||
CONSTRAINT FK_TBPMO_CONTROL_ENTITY_LINK_ORIGIN_CTRL_ID FOREIGN KEY (ORIGIN_CTRL_ID) REFERENCES TBPMO_CONTROL (GUID),
|
||||
CONSTRAINT FK_TBPMO_CONTROL_ENTITY_LINKED_CONTROL_ID FOREIGN KEY (LINKED_CTRL_ID) REFERENCES TBPMO_CONTROL (GUID),
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_CONTROL_ENTITY_LINK_AFT_UPD ON TBPMO_CONTROL_ENTITY_LINK
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_CONTROL_ENTITY_LINK SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CONTROL_ENTITY_LINK.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_CHART_ENTITY
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
ENTITY_ID INTEGER NOT NULL,
|
||||
GROUP_ID VARCHAR(50) NOT NULL DEFAULT '',
|
||||
SQL_COMMAND VARCHAR(MAX) NOT NULL,
|
||||
TYPE_CHART VARCHAR(30) NOT NULL,
|
||||
ARGUMENT VARCHAR(30) NOT NULL,
|
||||
VALUE VARCHAR(30) NOT NULL,
|
||||
TITLE VARCHAR(30) NOT NULL DEFAULT '',
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_CHART_ENTITY PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_CHART_ENTITY_ENTITY_ID FOREIGN KEY (ENTITY_ID) REFERENCES TBPMO_FORM (GUID),
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_CHART_ENTITY_AFT_UPD ON TBPMO_CHART_ENTITY
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_CHART_ENTITY SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CHART_ENTITY.GUID = INSERTED.GUID
|
||||
GO
|
||||
ALTER VIEW [dbo].[VWPMO_WF_ACTIVE] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
W_T.GUID AS WF_TASK_ID
|
||||
,R.GUID AS WF_ID
|
||||
,W_T.RECORD_ID
|
||||
,T.STATE_ID
|
||||
,T4.GUID FORM_VIEW_ID
|
||||
,R.DESCRIPTION
|
||||
,R.MANUALLY
|
||||
,R.CREATE_ON_REC_CREATE
|
||||
,R.CREATE_ON_FOLL_UP
|
||||
,W_T.COMMENT
|
||||
,W_T.DUE_DATE
|
||||
,W_T.ADDED_WHEN
|
||||
,W_T.CHANGED_WHO
|
||||
,W_T.CHANGED_WHEN
|
||||
,W_T.TASK_DATE
|
||||
,T.FINAL
|
||||
,T.ENTITY_ID
|
||||
,T5.COLOR
|
||||
,dbo.FNPMO_GET_ENTITY_COLUMN_CONTENT(W_T.RECORD_ID) AS RECORD_DESCRIPTION
|
||||
,FINISHED
|
||||
FROM
|
||||
TBPMO_WORKFLOW_ENTITY_STATE T,
|
||||
TBPMO_WORKFLOW_TASK W_T
|
||||
,TBPMO_WORKFLOW R
|
||||
,TBPMO_FORM T3
|
||||
,TBPMO_FORM_VIEW T4
|
||||
,TBPMO_WORKFLOW_TASK_STATE T5
|
||||
,TBPMO_RECORD REC
|
||||
WHERE
|
||||
--W_T.RECORD_ID = 95 AND
|
||||
--TBPMO_WORKFLOW_ENTITY_STATE
|
||||
T.WF_ID = R.GUID AND
|
||||
T.ENTITY_ID = T3.GUID AND
|
||||
T.STATE_ID = T5.GUID AND
|
||||
W_T.RECORD_ID = REC.GUID AND
|
||||
T.ENTITY_ID = REC.FORM_ID AND
|
||||
W_T.WF_ID = R.GUID AND
|
||||
R.GUID = R.GUID AND
|
||||
T3.GUID = T4.FORM_ID AND
|
||||
W_T.STATE_ID = T5.GUID AND
|
||||
T4.SCREEN_ID = 1 AND
|
||||
((T.FINAL = 1 AND W_T.DUE_DATE IS NULL) OR T.FINAL = 0) AND
|
||||
W_T.ACTIVE = 1
|
||||
ORDER BY W_T.RECORD_ID,W_T.GUID
|
||||
|
||||
GO
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -0,0 +1,57 @@
|
||||
DECLARE @ID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@DT_TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
|
||||
DECLARE c_DOKART CURSOR FOR
|
||||
SELECT GUID,BEZEICHNUNG, 'de-DE' FROM TBDD_DOKUMENTART
|
||||
|
||||
BEGIN
|
||||
OPEN c_DOKART
|
||||
FETCH NEXT FROM c_DOKART INTO @ID, @DT_TITLE,@LANGUAGE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @PMO_OBJECT_NAME = 'DOCTYPE_TITLE' + CONVERT(VARCHAR(5),@ID)
|
||||
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = 1)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,1,@PMO_OBJECT_NAME,@DT_TITLE)
|
||||
|
||||
FETCH NEXT FROM c_DOKART INTO @ID, @DT_TITLE,@LANGUAGE
|
||||
END
|
||||
CLOSE c_DOKART
|
||||
DEALLOCATE c_DOKART
|
||||
|
||||
END
|
||||
GO
|
||||
DECLARE @ID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@DT_TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
|
||||
DECLARE c_DOKART CURSOR FOR
|
||||
SELECT GUID,BEZEICHNUNG, 'en-US' FROM TBDD_DOKUMENTART
|
||||
|
||||
BEGIN
|
||||
OPEN c_DOKART
|
||||
FETCH NEXT FROM c_DOKART INTO @ID, @DT_TITLE,@LANGUAGE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @PMO_OBJECT_NAME = 'DOCTYPE_TITLE' + CONVERT(VARCHAR(5),@ID)
|
||||
SET @DT_TITLE = 'Object ' +@PMO_OBJECT_NAME + ' not translated'
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = 1)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,1,@PMO_OBJECT_NAME,@DT_TITLE)
|
||||
|
||||
FETCH NEXT FROM c_DOKART INTO @ID, @DT_TITLE,@LANGUAGE
|
||||
END
|
||||
CLOSE c_DOKART
|
||||
DEALLOCATE c_DOKART
|
||||
|
||||
END
|
||||
@@ -0,0 +1,44 @@
|
||||
DECLARE @SCREEN_ID INT,
|
||||
@FORM_VIEW_ID INTEGER,
|
||||
@FORM_TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100),
|
||||
@CAPTION_TEMP VARCHAR(100)
|
||||
|
||||
DECLARE c_FORM_VIEW CURSOR FOR
|
||||
SELECT GUID,SCREEN_ID,'FORMVIEW_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME,'en-US'
|
||||
from TBPMO_FORM_VIEW --WHERE GUID
|
||||
--[dbo].[FNPMO_GETOBJECTCAPTION]('en-US','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), SCREEN_ID) = 'CAPTION (OBJ) NOT TRANSLATED'
|
||||
|
||||
|
||||
|
||||
BEGIN
|
||||
OPEN c_FORM_VIEW
|
||||
FETCH NEXT FROM c_FORM_VIEW INTO @FORM_VIEW_ID,@SCREEN_ID,@PMO_OBJECT_NAME,@LANGUAGE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF EXISTS(SELECT CAPTION FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE)
|
||||
BEGIN
|
||||
--SELECT @CAPTION_TEMP = 'Not translated ' + FORM_TITLE FROM TBPMO_FORM_VIEW WHERE GUID = @FORM_VIEW_ID
|
||||
PRINT 'UPDATE: ' + @CAPTION_TEMP
|
||||
--UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @CAPTION_TEMP WHERE GUID = (
|
||||
--SELECT GUID FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
--LANGUAGE_TYPE = 'de-DE'
|
||||
--)
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT @CAPTION_TEMP = 'Not translated ' + FORM_TITLE FROM TBPMO_FORM_VIEW WHERE GUID = @FORM_VIEW_ID
|
||||
PRINT 'INSERT: ' + @CAPTION_TEMP + '#' + CONVERT(VARCHAR(5),@FORM_VIEW_ID)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION_TEMP)
|
||||
END
|
||||
FETCH NEXT FROM c_FORM_VIEW INTO @FORM_VIEW_ID,@SCREEN_ID,@PMO_OBJECT_NAME,@LANGUAGE
|
||||
END
|
||||
CLOSE c_FORM_VIEW
|
||||
DEALLOCATE c_FORM_VIEW
|
||||
|
||||
END
|
||||
@@ -0,0 +1,48 @@
|
||||
DECLARE @GUID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@FORM_VIEW_ID INTEGER,
|
||||
@FORM_TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100),
|
||||
@CAPTION_TEMP VARCHAR(100)
|
||||
|
||||
DECLARE c_FORM_VIEW CURSOR FOR
|
||||
SELECT GUID,SCREEN_ID,'FORMVIEW_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME,'de-DE'
|
||||
from TBPMO_FORM_VIEW --WHERE GUID --WHERE GUID = 3
|
||||
--[dbo].[FNPMO_GETOBJECTCAPTION]('en-US','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), SCREEN_ID) = 'CAPTION (OBJ) NOT TRANSLATED'
|
||||
|
||||
BEGIN
|
||||
OPEN c_FORM_VIEW
|
||||
FETCH NEXT FROM c_FORM_VIEW INTO @FORM_VIEW_ID,@SCREEN_ID,@PMO_OBJECT_NAME,@LANGUAGE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
DECLARE @CAPTION VARCHAR(50)
|
||||
IF EXISTS(SELECT CAPTION FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE)
|
||||
BEGIN
|
||||
--SELECT @CAPTION = CAPTION FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
--LANGUAGE_TYPE = @LANGUAGE
|
||||
|
||||
--PRINT 'SELECT CAPTION FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = ' + @PMO_OBJECT_NAME + ' AND LANGUAGE_TYPE = ' + @LANGUAGE
|
||||
--SELECT @CAPTION_TEMP = 'Not translated ' + FORM_TITLE FROM TBPMO_FORM_VIEW WHERE GUID = @FORM_VIEW_ID
|
||||
PRINT 'UPDATE: ' + @CAPTION_TEMP
|
||||
--UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @CAPTION_TEMP WHERE GUID = (
|
||||
--SELECT GUID FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
--LANGUAGE_TYPE = 'de-DE'
|
||||
--)
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT @CAPTION_TEMP = FORM_TITLE FROM TBPMO_FORM_VIEW WHERE GUID = @FORM_VIEW_ID
|
||||
PRINT 'INSERT: ' + @CAPTION_TEMP + '#' + CONVERT(VARCHAR(5),@FORM_VIEW_ID)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION_TEMP)
|
||||
END
|
||||
FETCH NEXT FROM c_FORM_VIEW INTO @FORM_VIEW_ID,@SCREEN_ID,@PMO_OBJECT_NAME,@LANGUAGE
|
||||
END
|
||||
CLOSE c_FORM_VIEW
|
||||
DEALLOCATE c_FORM_VIEW
|
||||
|
||||
END
|
||||
@@ -0,0 +1,13 @@
|
||||
/*#################### Update 2.4.4.2 #########################*/
|
||||
CREATE TABLE TBPMO_CONSTRUCTOR_USER
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
CONSTRUCT_ID INTEGER NOT NULL,
|
||||
[USER_ID] INTEGER NOT NULL,
|
||||
ADDED_WHEN DATETIME NOT NULL DEFAULT GETDATE(),
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
CONSTRAINT PK_TBPMO_CONSTRUCTOR_USER PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_CONSTRUCTOR_USER_CID FOREIGN KEY (CONSTRUCT_ID) REFERENCES TBPMO_FORM_CONSTRUCTOR (GUID),
|
||||
CONSTRAINT FK_TTBPMO_CONSTRUCTOR_USER_UID FOREIGN KEY (USER_ID) REFERENCES TBDD_USER (GUID)
|
||||
)
|
||||
GO
|
||||
Binary file not shown.
@@ -0,0 +1,30 @@
|
||||
CREATE PROCEDURE [dbo].[PRPMO_DELETE_CONTROL](@pCONTROL_ID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = @pCONTROL_ID
|
||||
DELETE FROM TBPMO_CONTROL_LANGUAGE WHERE CONTROL_SCREEN_ID IN (SELECT GUID FROM TBPMO_CONTROL_SCREEN WHERE CONTROL_ID = @pCONTROL_ID)
|
||||
DELETE FROM TBPMO_CONTROL_SCREEN WHERE CONTROL_ID = @pCONTROL_ID
|
||||
DELETE FROM TBPMO_FUNCTION_GENERAL WHERE CONTROL_ID = @pCONTROL_ID
|
||||
DELETE FROM TBPMO_CONTROL_IMAGE WHERE CONTROL_ID = @pCONTROL_ID
|
||||
DELETE FROM TBPMO_CONTROL WHERE GUID = @pCONTROL_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE PROCEDURE [dbo].[PRPMO_RECORD_CREATE_WORKFLOWTASKS](@RECORD_ID INTEGER)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_WORKFLOW_TASK WHERE RECORD_ID = @RECORD_ID
|
||||
INSERT INTO TBPMO_WORKFLOW_TASK (RECORD_ID,WF_ID,STATE_ID,ACTIVE)
|
||||
SELECT @RECORD_ID, T.WF_ID,1,1 FROM TBPMO_WORKFLOW_FORM T, TBPMO_RECORD T1 WHERE T.FORM_ID = T1.FORM_ID AND T1.GUID = @RECORD_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
Binary file not shown.
@@ -0,0 +1,588 @@
|
||||
ALTER TABLE TBDD_MODULES
|
||||
ADD PRODUCT_VERSION VARCHAR(10) NOT NULL DEFAULT '1.0.0.0'
|
||||
GO
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.4.4' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
ALTER VIEW [dbo].[VWPMO_GUI_ENTITY] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
TBPMO_FORM.GUID AS ID,
|
||||
TBPMO_FORM.PARENT_ID,
|
||||
TBPMO_FORM.LEVEL,
|
||||
TBPMO_FORM.FORM_TYPE_ID,
|
||||
TBPMO_FORM.NAME AS Name,
|
||||
TBPMO_FORM_VIEW.GUID As FormViewID,
|
||||
TBPMO_FORM_VIEW.FORM_TITLE AS Title
|
||||
FROM
|
||||
TBPMO_FORM INNER JOIN
|
||||
TBPMO_FORM_VIEW ON TBPMO_FORM.GUID = TBPMO_FORM_VIEW.FORM_ID
|
||||
WHERE
|
||||
(TBPMO_FORM.FORM_TYPE_ID IN (1, 2, 3, 5))
|
||||
ORDER BY
|
||||
TBPMO_FORM.PARENT_ID, Title
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_WORKFLOW_ENTITY_STATE
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
WF_ID INTEGER NOT NULL,
|
||||
ENTITY_ID INTEGER NOT NULL,
|
||||
STATE_ID INTEGER NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CONSTRAINT PK_TBPMO_WORKFLOW_ENTITY_STATE PRIMARY KEY (GUID),
|
||||
CONSTRAINT UNIQUE_ENTITY_ID_STATE_ID UNIQUE(WF_ID,ENTITY_ID,STATE_ID),
|
||||
CONSTRAINT FK_TBPMO_WORKFLOW_ENTITY_STATE_WF_ID FOREIGN KEY (WF_ID) REFERENCES TBPMO_WORKFLOW (GUID),
|
||||
CONSTRAINT FK_TBPMO_WORKFLOW_ENTITY_STATE_STATE_ID FOREIGN KEY (STATE_ID) REFERENCES TBPMO_WORKFLOW_TASK_STATE (GUID),
|
||||
CONSTRAINT FK_TBPMO_WORKFLOW_ENTITY_STATE_ENTITY_ID FOREIGN KEY (ENTITY_ID) REFERENCES TBPMO_FORM (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_WORKFLOW_TASK_STATE_DELETE
|
||||
ON TBPMO_WORKFLOW_TASK_STATE
|
||||
FOR DELETE
|
||||
AS
|
||||
DELETE FROM TBPMO_WORKFLOW_ENTITY_STATE WHERE STATE_ID = (
|
||||
SELECT GUID FROM DELETED)
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_WORKFLOW_TASK
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
RECORD_ID INTEGER NOT NULL,
|
||||
WF_ID INTEGER NOT NULL,
|
||||
COMMENT VARCHAR(500),
|
||||
DUE_DATE DATE,
|
||||
TASK_DATE DATE,
|
||||
STATE_ID INTEGER NOT NULL DEFAULT 1,
|
||||
ACTIVE BIT NOT NULL DEFAULT 0,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_WORKFLOW_TASK PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_WORKFLOW_TASK_RECORD_ID FOREIGN KEY (RECORD_ID) REFERENCES TBPMO_RECORD (GUID),
|
||||
CONSTRAINT FK_TBPMO_WORKFLOW_TASK_WF_ID FOREIGN KEY (WF_ID) REFERENCES TBPMO_WORKFLOW (GUID),
|
||||
CONSTRAINT FK_TBPMO_WORKFLOW_TASK_STATE_ID FOREIGN KEY (STATE_ID) REFERENCES TBPMO_WORKFLOW_ENTITY_STATE (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_WORKFLOW_TASK_AFT_UPD ON TBPMO_WORKFLOW_TASK
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_WORKFLOW_TASK SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WORKFLOW_TASK.GUID = INSERTED.GUID
|
||||
GO
|
||||
--###############################################################################
|
||||
CREATE TABLE TBPMO_WORKFLOW_TASK_USER
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
WF_TASK_ID INTEGER NOT NULL,
|
||||
[USER_ID] INTEGER NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
CONSTRAINT PK_TBPMO_WF_TASK_USER PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_WF_TASK_USER_WF_TASK_ID FOREIGN KEY (WF_TASK_ID) REFERENCES TBPMO_WORKFLOW_TASK (GUID),
|
||||
CONSTRAINT FK_TBPMO_WF_TASK_USER_USER_ID FOREIGN KEY (USER_ID) REFERENCES TBDD_USER (GUID)
|
||||
)
|
||||
GO
|
||||
|
||||
ALTER PROCEDURE [dbo].[PRPMO_CREATE_WF_TASKS] (@FORM_ID INTEGER, @RECORD_ID INTEGER)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE
|
||||
@WF_ID INTEGER,
|
||||
@TITLE VARCHAR(50),
|
||||
@SEQUENCE INTEGER,
|
||||
@MELDUNG VARCHAR(250)--,
|
||||
--@STATE_ID INTEGER
|
||||
|
||||
DECLARE c_TASK CURSOR FOR
|
||||
SELECT T.WF_ID
|
||||
FROM TBPMO_WORKFLOW_FORM T, TBPMO_WORKFLOW T1
|
||||
WHERE T.WF_ID = T1.GUID AND
|
||||
T.FORM_ID = @FORM_ID ORDER BY T.SEQUENCE
|
||||
|
||||
OPEN c_TASK
|
||||
FETCH NEXT FROM c_TASK INTO @WF_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
DELETE FROM TBPMO_WORKFLOW_TASK_USER WHERE WF_TASK_ID IN (SELECT GUID FROM TBPMO_WORKFLOW_TASK WHERE RECORD_ID = @RECORD_ID AND WF_ID = @WF_ID)
|
||||
DELETE FROM TBPMO_WORKFLOW_TASK WHERE GUID IN (SELECT GUID FROM TBPMO_WORKFLOW_TASK WHERE RECORD_ID = @RECORD_ID AND WF_ID = @WF_ID)
|
||||
--SELECT @STATE_ID = STATE_ID FROM TBPMO_WORKFLOW_ENTITY_STATE WHERE ENTITY_ID = @FORM_ID and WF_ID = @WF_ID
|
||||
--IF @STATE_ID IS NOT NULL
|
||||
BEGIN
|
||||
--INSERT DES TASKS
|
||||
INSERT INTO TBPMO_WORKFLOW_TASK(
|
||||
RECORD_ID,
|
||||
WF_ID,
|
||||
ACTIVE,
|
||||
STATE_ID)
|
||||
VALUES (
|
||||
@RECORD_ID,
|
||||
@WF_ID,
|
||||
1,
|
||||
1)
|
||||
END
|
||||
|
||||
FETCH NEXT FROM c_TASK INTO @WF_ID
|
||||
END
|
||||
CLOSE c_TASK
|
||||
DEALLOCATE c_TASK
|
||||
END
|
||||
|
||||
|
||||
GO
|
||||
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_WORKFLOW_TASK_STATE_AFT_UPD] ON [dbo].[TBPMO_WORKFLOW_TASK_STATE]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@STATE_DESC VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@STATE_DESC = STATE_DESC,
|
||||
@SCREEN_ID = 1,
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE USERNAME = @CHANGED_WHO
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'WF_STATE_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBPMO_WORKFLOW_TASK_STATE SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WORKFLOW_TASK_STATE.GUID = INSERTED.GUID
|
||||
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @STATE_DESC,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID
|
||||
ELSE
|
||||
BEGIN TRY
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@STATE_DESC)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 72'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 84'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_WORKFLOW_TASK_STATE_AFT_INS] ON [dbo].[TBPMO_WORKFLOW_TASK_STATE]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@STATE_DESC VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@STATE_DESC = STATE_DESC,
|
||||
@SCREEN_ID = 1,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@ADDED_WHO)
|
||||
SET @PMO_OBJECT_NAME = 'WF_STATE_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
IF @LANGUAGE is not null
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@STATE_DESC,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
DECLARE @GUID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@FORM_VIEW_ID INTEGER,
|
||||
@FORM_TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100),
|
||||
@CAPTION VARCHAR(100)
|
||||
|
||||
DECLARE c_STATE CURSOR FOR
|
||||
SELECT GUID,1,'en-US','WF_STATE_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME,STATE_DESC
|
||||
from TBPMO_WORKFLOW_TASK_STATE
|
||||
UNION
|
||||
SELECT GUID,1,'de-DE','WF_STATE_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME,STATE_DESC
|
||||
from TBPMO_WORKFLOW_TASK_STATE ORDER BY GUID
|
||||
|
||||
|
||||
BEGIN
|
||||
OPEN c_STATE
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@LANGUAGE,@PMO_OBJECT_NAME,@CAPTION
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = @LANGUAGE)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@LANGUAGE,@PMO_OBJECT_NAME,@CAPTION
|
||||
END
|
||||
CLOSE c_STATE
|
||||
DEALLOCATE c_STATE
|
||||
|
||||
END
|
||||
GO
|
||||
--'#####################################################
|
||||
ALTER TRIGGER [dbo].[TBPMO_WORKFLOW_AFT_UPD] ON [dbo].[TBPMO_WORKFLOW]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@TITLE = TITLE,
|
||||
@SCREEN_ID = 1,
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE USERNAME = @CHANGED_WHO
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'TASK_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBPMO_WORKFLOW SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WORKFLOW.GUID = INSERTED.GUID
|
||||
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID
|
||||
ELSE
|
||||
BEGIN TRY
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@TITLE)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN Trigger: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
CREATE TRIGGER [dbo].[TBPMO_WORKFLOW_AFT_INS] ON [dbo].[TBPMO_WORKFLOW]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@TITLE = TITLE,
|
||||
@SCREEN_ID = 1,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE USERNAME = @ADDED_WHO
|
||||
SET @PMO_OBJECT_NAME = 'TASK_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
DECLARE @GUID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100),
|
||||
@CAPTION VARCHAR(100)
|
||||
|
||||
DECLARE c_STATE CURSOR FOR
|
||||
SELECT GUID,1,'en-US','TASK_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME,TITLE
|
||||
from TBPMO_WORKFLOW
|
||||
UNION
|
||||
SELECT GUID,1,'de-DE','TASK_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME,TITLE
|
||||
from TBPMO_WORKFLOW ORDER BY GUID
|
||||
|
||||
|
||||
BEGIN
|
||||
OPEN c_STATE
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@LANGUAGE,@PMO_OBJECT_NAME,@CAPTION
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = @LANGUAGE)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@LANGUAGE,@PMO_OBJECT_NAME,@CAPTION
|
||||
END
|
||||
CLOSE c_STATE
|
||||
DEALLOCATE c_STATE
|
||||
|
||||
END
|
||||
GO
|
||||
--##################################
|
||||
ALTER TRIGGER [dbo].[TBPMO_RECORD_AFT_INS] ON [dbo].[TBPMO_RECORD]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@RECORD_ID INTEGER,
|
||||
@MAX_ID INTEGER,
|
||||
@FORM_ID INTEGER,
|
||||
@WF_ID INTEGER,
|
||||
@PARENT_ID INTEGER
|
||||
SELECT
|
||||
@FORM_ID = FORM_ID,
|
||||
@RECORD_ID = GUID
|
||||
FROM INSERTED
|
||||
|
||||
IF EXISTS(SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @FORM_ID AND GUID <> @RECORD_ID)
|
||||
SELECT @MAX_ID = MAX(RECORD_ENTITY_ID) + 1
|
||||
FROM TBPMO_RECORD WHERE FORM_ID = @FORM_ID AND GUID <> @RECORD_ID
|
||||
ELSE
|
||||
SET @MAX_ID = 1
|
||||
|
||||
UPDATE TBPMO_RECORD SET RECORD_ENTITY_ID = @MAX_ID FROM INSERTED WHERE TBPMO_RECORD.GUID = INSERTED.GUID
|
||||
|
||||
--Überprüfen ob für die Entity_ID Workflows definiert sind?
|
||||
IF EXISTS(
|
||||
SELECT * FROM TBPMO_WORKFLOW_FORM where FORM_ID = @FORM_ID
|
||||
)
|
||||
BEGIN
|
||||
EXECUTE dbo.PRPMO_CREATE_WF_TASKS @FORM_ID, @RECORD_ID
|
||||
END
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
ALTER VIEW [dbo].[VWPMO_WF_ACTIVE] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T.GUID AS WF_TASK_ID,
|
||||
T.WF_ID ,
|
||||
T1.TITLE,
|
||||
T.RECORD_ID,
|
||||
T.STATE_ID,
|
||||
T2.STATE_DESC,
|
||||
T2.COLOR,
|
||||
T.COMMENT,
|
||||
T.DUE_DATE,
|
||||
T.TASK_DATE,
|
||||
'' AS USERNAME,
|
||||
T.ADDED_WHEN,
|
||||
T.CHANGED_WHO,
|
||||
T.CHANGED_WHEN
|
||||
FROM
|
||||
TBPMO_WORKFLOW_TASK AS T,
|
||||
TBPMO_WORKFLOW AS T1,
|
||||
TBPMO_WORKFLOW_TASK_STATE T2
|
||||
WHERE
|
||||
T.WF_ID = T1.GUID AND
|
||||
T.STATE_ID = T2.GUID
|
||||
ORDER BY T.GUID
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_VIEW_AFT_UPD] ON [dbo].[TBPMO_FORM_VIEW]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@SCREEN_ID = SCREEN_ID,
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@CHANGED_WHO)
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBPMO_FORM_VIEW SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_FORM_VIEW.GUID = INSERTED.GUID
|
||||
|
||||
IF @LANGUAGE is not null
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @FORM_TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID
|
||||
ELSE
|
||||
BEGIN TRY
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 72'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 84'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_VIEW_AFT_INS] ON [dbo].[TBPMO_FORM_VIEW]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@SCREEN_ID = SCREEN_ID,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@ADDED_WHO)
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
IF @LANGUAGE is not null
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_CONSTRUCTOR_AFT_INS] ON [dbo].[TBPMO_FORM_CONSTRUCTOR]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@ADDED_WHO)
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'CONSTR_MENUE' + CONVERT(VARCHAR(5),@GUID)
|
||||
IF @LANGUAGE is not null
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
(@LANGUAGE,1,@PMO_OBJECT_NAME,@FORM_TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_CONSTRUCTOR_AFT_UPD] ON [dbo].[TBPMO_FORM_CONSTRUCTOR]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5), @CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@LANGUAGE = [LANGUAGE],
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@CHANGED_WHO)
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'CONSTR_MENUE' + CONVERT(VARCHAR(5),@GUID)
|
||||
IF @LANGUAGE is not null
|
||||
UPDATE TBPMO_FORM_CONSTRUCTOR SET CHANGED_WHEN = GETDATE()
|
||||
FROM INSERTED WHERE TBPMO_FORM_CONSTRUCTOR.GUID = INSERTED.GUID
|
||||
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = 1)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @FORM_TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = 1
|
||||
ELSE
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,1,@PMO_OBJECT_NAME,@FORM_TITLE)
|
||||
END
|
||||
GO
|
||||
|
||||
ALTER TABLE TBPMO_CONSTRUCTOR_USER
|
||||
ADD HOME_MENUE BIT NOT NULL DEFAULT 1
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_CONSTRUCTOR_DETAIL_AFT_INS] ON [dbo].[TBPMO_FORM_CONSTRUCTOR_DETAIL]
|
||||
FOR INSERT
|
||||
AS
|
||||
DECLARE @CONSTRUCT_ID INTEGER,
|
||||
@PARENT_ID INTEGER,
|
||||
@EXISTS as INTEGER
|
||||
BEGIN
|
||||
SELECT @CONSTRUCT_ID = CONSTRUCT_ID, @PARENT_ID = PARENT_ID FROM INSERTED
|
||||
IF @PARENT_ID = 0
|
||||
BEGIN
|
||||
SELECT @EXISTS = COUNT(*) FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE CONSTRUCT_ID = @CONSTRUCT_ID AND PARENT_ID = @PARENT_ID
|
||||
IF @EXISTS > 1
|
||||
BEGIN
|
||||
ROLLBACK TRANSACTION
|
||||
RAISERROR('ONLY ONE FORM WITH PARENT_ID 0 IS ALLOWED WITHIN CONSTRUCT-ID',16,10)
|
||||
END
|
||||
END
|
||||
END
|
||||
GO
|
||||
|
||||
|
||||
|
||||
1049
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.5.sql
Normal file
1049
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.5.sql
Normal file
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,78 @@
|
||||
CREATE FUNCTION [dbo].[FN_SPLIT_STRING]
|
||||
(
|
||||
@Input NVARCHAR(MAX),
|
||||
@Character CHAR(1)
|
||||
)
|
||||
RETURNS @Output TABLE (
|
||||
Item NVARCHAR(1000)
|
||||
)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @StartIndex INT, @EndIndex INT
|
||||
|
||||
SET @StartIndex = 1
|
||||
IF SUBSTRING(@Input, LEN(@Input) - 1, LEN(@Input)) <> @Character
|
||||
BEGIN
|
||||
SET @Input = @Input + @Character
|
||||
END
|
||||
|
||||
WHILE CHARINDEX(@Character, @Input) > 0
|
||||
BEGIN
|
||||
SET @EndIndex = CHARINDEX(@Character, @Input)
|
||||
|
||||
INSERT INTO @Output(Item)
|
||||
SELECT SUBSTRING(@Input, @StartIndex, @EndIndex - 1)
|
||||
|
||||
SET @Input = SUBSTRING(@Input, @EndIndex + 1, LEN(@Input))
|
||||
END
|
||||
|
||||
RETURN
|
||||
END
|
||||
|
||||
GO
|
||||
|
||||
--FUNKTION ZUR AKTUALISIERUNG der DATEN
|
||||
|
||||
|
||||
BEGIN
|
||||
DECLARE
|
||||
@GUID INTEGER,
|
||||
@CONTROL_ID INTEGER,
|
||||
@RECORD_ID INTEGER,
|
||||
@VALUE VARCHAR(MAX),
|
||||
@NEW_VALUE VARCHAR(MAX),
|
||||
@INDEX INTEGER,
|
||||
@ADDED_WHO VARCHAR(50)
|
||||
|
||||
DECLARE c_Values CURSOR FOR
|
||||
SELECT GUID,CONTROL_ID,RECORD_ID,VALUE,ADDED_WHO FROM TBPMO_CONTROL_VALUE WHERE VALUE LIKE '%;%' AND CONTROL_ID NOT IN (SELECT GUID FROM TBPMO_CONTROL WHERE CONTROL_TYPE_ID = 2) ORDER BY RECORD_ID,CONTROL_ID
|
||||
OPEN c_Values
|
||||
FETCH NEXT FROM c_Values INTO @GUID,@CONTROL_ID,@RECORD_ID,@VALUE,@ADDED_WHO
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @INDEX = 0
|
||||
--#####
|
||||
DECLARE c_NEWVALUES CURSOR FOR
|
||||
SELECT Item FROM dbo.FN_SPLIT_STRING(@VALUE, ';')
|
||||
OPEN c_NEWVALUES
|
||||
FETCH NEXT FROM c_NEWVALUES INTO @NEW_VALUE
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @NEW_VALUE = LTRIM(@NEW_VALUE)
|
||||
IF @INDEX = 0
|
||||
UPDATE TBPMO_CONTROL_VALUE SET VALUE = @NEW_VALUE WHERE GUID = @GUID
|
||||
ELSE
|
||||
INSERT INTO TBPMO_CONTROL_VALUE (CONTROL_ID,RECORD_ID,VALUE,ADDED_WHO) VALUES
|
||||
(@CONTROL_ID,@RECORD_ID,@NEW_VALUE,@ADDED_WHO)
|
||||
PRINT CONVERT(VARCHAR(5),@CONTROL_ID) + '#' + CONVERT(VARCHAR(5),@INDEX) + '-' + @NEW_VALUE
|
||||
SET @INDEX = @INDEX + 1
|
||||
FETCH NEXT FROM c_NEWVALUES INTO @NEW_VALUE
|
||||
END
|
||||
CLOSE c_NEWVALUES
|
||||
DEALLOCATE c_NEWVALUES
|
||||
--#####
|
||||
FETCH NEXT FROM c_Values INTO @GUID,@CONTROL_ID,@RECORD_ID,@VALUE,@ADDED_WHO
|
||||
END
|
||||
CLOSE c_Values
|
||||
DEALLOCATE c_Values
|
||||
END
|
||||
606
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.6.sql
Normal file
606
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.6.sql
Normal file
@@ -0,0 +1,606 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.4.6' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
ALTER TABLE TBPMO_WD_OBJECTTYPE
|
||||
ADD IDXNAME_RECORDID VARCHAR(100)
|
||||
GO
|
||||
ALTER TABLE TBPMO_WD_OBJECTTYPE
|
||||
ADD IDXNAME_DOCTYPE VARCHAR(100)
|
||||
GO
|
||||
CREATE FUNCTION [dbo].[FNPMO_GET_ENTITY_COLUMN_CONTENT](@pRECORD_ID INTEGER)
|
||||
RETURNS VARCHAR(2500)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE
|
||||
@COLUMN1 VARCHAR(100),
|
||||
@ENTITY INTEGER, @CONTROL_ID INTEGER, @RESULT VARCHAR(2500)
|
||||
|
||||
SELECT @ENTITY = FORM_ID FROM TBPMO_RECORD WHERE GUID = @pRECORD_ID
|
||||
|
||||
SELECT @COLUMN1 = COLUMN_NAME1 FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE FORM_ID = @ENTITY
|
||||
SELECT @CONTROL_ID = GUID FROm TBPMO_CONTROL WHERE COL_NAME = @COLUMN1
|
||||
SELECT @RESULT = VALUE FROM VWPMO_VALUES WHERE RECORD_ID = @pRECORD_ID AND CONTROL_ID = @CONTROL_ID
|
||||
RETURN(@RESULT)
|
||||
END
|
||||
|
||||
GO
|
||||
CREATE PROCEDURE [dbo].[PRPMO_DELETE_USER](@pUSER_ID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
IF OBJECT_ID(N'dbo.TBGI_FOLDERWATCH_USER', N'U') IS NOT NULL
|
||||
DELETE FROM TBGI_FOLDERWATCH_USER WHERE USER_ID = @pUSER_ID
|
||||
IF OBJECT_ID(N'dbo.TBHOTKEY_USER_PROFILE', N'U') IS NOT NULL
|
||||
DELETE FROM TBHOTKEY_USER_PROFILE WHERE USER_ID = @pUSER_ID
|
||||
|
||||
DELETE FROM TBDD_CLIENT_USER WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBDD_GROUPS_USER WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBPMO_CONSTRUCTOR_USER_SQL WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBPMO_CONSTRUCTOR_USER WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBPMO_FOLDERWATCH_USER WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBPMO_FOLLUPEMAIL_USER WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBPMO_FOLLUPEMAIL_RECORD WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBPMO_USER_CONSTR_VIEW_TYPE WHERE USER_ID = @pUSER_ID
|
||||
DELETE FROM TBDD_USER WHERE GUID = @pUSER_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE PROCEDURE [dbo].[PRPMO_DELETE_DOCTYPE](@pDOCID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_INDEX_MAN WHERE DOK_ID = @pDOCID
|
||||
DELETE FROM TBDD_INDEX_AUTOM WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_USRGRP_DOKTYPE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBPMO_CLIENT_DOCTYPE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBPMO_TEMPLATE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_DOKUMENTART WHERE GUID = @pDOCID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER FUNCTION [dbo].[FNPMO_GETOBJECTCAPTION](@pLANG_TYPE VARCHAR(5), @pOBJ_NAME VARCHAR(100), @pSCREEN_ID INT)
|
||||
RETURNS VARCHAR(100)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @PMOOBJ_CAPTION VARCHAR(100)
|
||||
|
||||
SELECT @PMOOBJ_CAPTION = CAPTION FROM
|
||||
TBPMO_LANGUAGE_OBJECT AS T
|
||||
WHERE
|
||||
T.LANGUAGE_TYPE = @pLANG_TYPE AND
|
||||
T.SCREEN_ID = @pSCREEN_ID AND
|
||||
T.PMO_OBJECT_NAME = @pOBJ_NAME
|
||||
|
||||
IF @PMOOBJ_CAPTION is null AND @pLANG_TYPE <> 'de-DE'
|
||||
SELECT @PMOOBJ_CAPTION = CAPTION FROM
|
||||
TBPMO_LANGUAGE_OBJECT AS T
|
||||
WHERE
|
||||
T.LANGUAGE_TYPE = 'de-DE' AND
|
||||
T.SCREEN_ID = @pSCREEN_ID AND
|
||||
T.PMO_OBJECT_NAME = @pOBJ_NAME
|
||||
|
||||
|
||||
RETURN(ISNULL(@PMOOBJ_CAPTION,'CAPTION (OBJ) NOT TRANSLATED'))
|
||||
END
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_WORKFLOW_TASK_STATE_AFT_INS] ON [dbo].[TBPMO_WORKFLOW_TASK_STATE]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@STATE_DESC VARCHAR(50),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@STATE_DESC = STATE_DESC,
|
||||
@SCREEN_ID = 1,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SET @PMO_OBJECT_NAME = 'WF_STATE_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
('de-DE',@SCREEN_ID,@PMO_OBJECT_NAME,@STATE_DESC,@ADDED_WHO)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
('en-US',@SCREEN_ID,@PMO_OBJECT_NAME,@STATE_DESC,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_WORKFLOW_AFT_INS] ON [dbo].[TBPMO_WORKFLOW]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@TITLE = TITLE,
|
||||
@SCREEN_ID = 1,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE USERNAME = @ADDED_WHO
|
||||
SET @PMO_OBJECT_NAME = 'TASK_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
('de-DE',@SCREEN_ID,@PMO_OBJECT_NAME,@TITLE,@ADDED_WHO)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
('en-US',@SCREEN_ID,@PMO_OBJECT_NAME,@TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_VIEW_AFT_INS] ON [dbo].[TBPMO_FORM_VIEW]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@SCREEN_ID = SCREEN_ID,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@ADDED_WHO)
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
('de-DE',@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE,@ADDED_WHO)
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION,ADDED_WHO) VALUES
|
||||
('en-US',@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE,@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
DECLARE @GUID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100),
|
||||
@CAPTION VARCHAR(100)
|
||||
|
||||
DECLARE c_STATE CURSOR FOR
|
||||
SELECT GUID,1,'WF_STATE_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME,STATE_DESC
|
||||
from TBPMO_WORKFLOW_TASK_STATE
|
||||
|
||||
BEGIN
|
||||
OPEN c_STATE
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@PMO_OBJECT_NAME,@CAPTION
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = 'de-DE')
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
('de-DE',@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = 'en-US')
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
('en-US',@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@PMO_OBJECT_NAME,@CAPTION
|
||||
END
|
||||
CLOSE c_STATE
|
||||
DEALLOCATE c_STATE
|
||||
|
||||
END
|
||||
GO
|
||||
DECLARE @GUID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100),
|
||||
@CAPTION VARCHAR(100)
|
||||
|
||||
DECLARE c_STATE CURSOR FOR
|
||||
SELECT GUID,1,'FORMVIEW_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME, FORM_TITLE
|
||||
from TBPMO_FORM_VIEW
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
BEGIN
|
||||
OPEN c_STATE
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@PMO_OBJECT_NAME,@CAPTION
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = 'de-DE')
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
('de-DE',@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = 'en-US')
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
('en-US',@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@PMO_OBJECT_NAME,@CAPTION
|
||||
END
|
||||
CLOSE c_STATE
|
||||
DEALLOCATE c_STATE
|
||||
END
|
||||
GO
|
||||
DECLARE @GUID INTEGER,
|
||||
@SCREEN_ID INT,
|
||||
@TITLE VARCHAR(100),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@PMO_OBJECT_NAME VARCHAR(100),
|
||||
@CAPTION VARCHAR(100)
|
||||
|
||||
DECLARE c_STATE CURSOR FOR
|
||||
SELECT GUID,1,'TASK_TITLE' + CONVERT(VARCHAR(5), GUID) as OBJ_NAME, TITLE FROM TBPMO_WORKFLOW
|
||||
|
||||
BEGIN
|
||||
OPEN c_STATE
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@PMO_OBJECT_NAME,@CAPTION
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = 'de-DE')
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
('de-DE',@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
IF NOT EXISTS(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND LANGUAGE_TYPE = 'en-US')
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT
|
||||
(LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
('en-US',@SCREEN_ID,@PMO_OBJECT_NAME, @CAPTION)
|
||||
|
||||
FETCH NEXT FROM c_STATE INTO @GUID, @SCREEN_ID,@PMO_OBJECT_NAME,@CAPTION
|
||||
END
|
||||
CLOSE c_STATE
|
||||
DEALLOCATE c_STATE
|
||||
END
|
||||
GO
|
||||
CREATE TABLE TBPMO_WD_IMPORT_PROFILE
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
NAME VARCHAR(100) NOT NULL,
|
||||
WD_SEARCH VARCHAR(1000) NOT NULL,
|
||||
UNIQUE_DOC_SQL VARCHAR(5000),
|
||||
SQL_DOCTYPE VARCHAR(5000) NOT NULL DEFAULT 'select GUID from TBDD_DOKUMENTART where BEZEICHNUNG = ''@DOKTYPE_STRING''',
|
||||
SQL_PARENT_RECORD VARCHAR(5000) NOT NULL DEFAULT '',
|
||||
NEW_OBJECTTYPE VARCHAR(100) NOT NULL,
|
||||
OLD_OBJECTTYPE VARCHAR(100) NOT NULL,
|
||||
IDX_FILE_WORKED VARCHAR(100) NOT NULL DEFAULT '',
|
||||
ONLY_RECORD_CREATING BIT NOT NULL DEFAULT 0,
|
||||
ENTITY_ID INTEGER NOT NULL,
|
||||
CONNECTION_ID INTEGER,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_WD_IMPORT_PROFILE PRIMARY KEY (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_WD_IMPORT_PROFILE_AFT_UPD ON TBPMO_WD_IMPORT_PROFILE
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_WD_IMPORT_PROFILE SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WD_IMPORT_PROFILE.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_WD_IMPORT_PROFILE_IDX
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
PROFILE_ID INTEGER NOT NULL,
|
||||
STRING1 VARCHAR(200) NOT NULL,
|
||||
STRING2 VARCHAR(200) NOT NULL,
|
||||
SQL1 VARCHAR(5000),
|
||||
SQL2 VARCHAR(5000),
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'Digital Data',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_WD_IMPORT_PROFILE_IDX PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_WD_IMPORT_PROFILE_IDX_1 FOREIGN KEY (PROFILE_ID) REFERENCES TBPMO_WD_IMPORT_PROFILE (GUID),
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_WD_IMPORT_PROFILE_IDX_AFT_UPD ON TBPMO_WD_IMPORT_PROFILE_IDX
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_WD_IMPORT_PROFILE_IDX SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WD_IMPORT_PROFILE_IDX.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_WD_IMPORT_PROFILE_AFT_INS ON TBPMO_WD_IMPORT_PROFILE
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@GUID INTEGER,@ADDED_WHO VARCHAR(50)
|
||||
SELECT
|
||||
@GUID = GUID,@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
INSERT INTO TBPMO_WD_IMPORT_PROFILE_IDX (PROFILE_ID,STRING1,STRING2,ADDED_WHO) VALUES
|
||||
(@GUID,'DOCTYPE_ORIGIN','SET INDEXNAME',@ADDED_WHO)
|
||||
INSERT INTO TBPMO_WD_IMPORT_PROFILE_IDX (PROFILE_ID,STRING1,STRING2,ADDED_WHO) VALUES
|
||||
(@GUID,'INDEX_DOCTYPE','SET INDEXNAME',@ADDED_WHO)
|
||||
INSERT INTO TBPMO_WD_IMPORT_PROFILE_IDX (PROFILE_ID,STRING1,STRING2,ADDED_WHO) VALUES
|
||||
(@GUID,'INDEX_RECORD_ID','SET INDEXNAME',@ADDED_WHO)
|
||||
INSERT INTO TBPMO_WD_IMPORT_PROFILE_IDX (PROFILE_ID,STRING1,STRING2,ADDED_WHO) VALUES
|
||||
(@GUID,'INDEX_ENTITY_ID','SET INDEXNAME',@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER TBDD_DOKUMENTART_AFT_INS2 ON TBDD_DOKUMENTART
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@ADDED_WHO VARCHAR(50),
|
||||
@OBJEKTTYP VARCHAR(50),
|
||||
@GUID INTEGER
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@ADDED_WHO = ERSTELLTWER,
|
||||
@OBJEKTTYP = OBJEKTTYP
|
||||
FROM INSERTED
|
||||
|
||||
INSERT INTO TBPMO_CLIENT_DOCTYPE (CLIENT_ID,DOCTYPE_ID)
|
||||
SELECT T.CLIENT_ID,@GUID FROM TBDD_CLIENT_USER T, TBDD_USER T1 WHERE T.USER_ID = T1.GUID AND UPPER(T1.USERNAME) = UPPER(@ADDED_WHO)
|
||||
|
||||
IF OBJECT_ID(N'dbo.TBPMO_WD_OBJECTTYPE', N'U') IS NOT NULL
|
||||
IF @OBJEKTTYP IS NOT NULL
|
||||
IF @OBJEKTTYP <> ''
|
||||
BEGIN
|
||||
DECLARE @IDX_DOC VARCHAR(50),@IDX_REC VARCHAR(50)
|
||||
SELECT @IDX_DOC = IDXNAME_DOCTYPE,
|
||||
@IDX_REC = IDXNAME_RECORDID FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = @OBJEKTTYP
|
||||
IF @IDX_REC IS NOT NULL
|
||||
INSERT INTO TBDD_INDEX_AUTOM (DOCTYPE_ID,INDEXNAME,VALUE,ACTIVE,ADDED_WHO) VALUES
|
||||
(@GUID,@IDX_REC,'@Record-ID',1,@ADDED_WHO)
|
||||
IF @IDX_DOC IS NOT NULL
|
||||
INSERT INTO TBDD_INDEX_AUTOM (DOCTYPE_ID,INDEXNAME,VALUE,ACTIVE,ADDED_WHO) VALUES
|
||||
(@GUID,@IDX_DOC,'@Dokart',1,@ADDED_WHO)
|
||||
END
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER TBDD_DOKUMENTART_AFT_UPD ON TBDD_DOKUMENTART
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@DA_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@DA_TITLE = BEZEICHNUNG,
|
||||
@SCREEN_ID = 1,
|
||||
@CHANGED_WHO = GEANDERTWER
|
||||
FROM INSERTED
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@CHANGED_WHO)
|
||||
SET @PMO_OBJECT_NAME = 'DOCTYPE_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBDD_DOKUMENTART SET GEAENDERTWANN = GETDATE() FROM INSERTED
|
||||
WHERE TBDD_DOKUMENTART.GUID = INSERTED.GUID
|
||||
IF UPDATE (BEZEICHNUNG)
|
||||
BEGIN
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @DA_TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID
|
||||
ELSE
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@DA_TITLE)
|
||||
END
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TRIGGER TBPMO_FORM_VIEW_AFT_UPD ON TBPMO_FORM_VIEW
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_TITLE VARCHAR(50),
|
||||
@LANGUAGE VARCHAR(5),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@GUID INTEGER,
|
||||
@SCREEN_ID INTEGER,
|
||||
@PMO_OBJECT_NAME VARCHAR(100)
|
||||
SELECT
|
||||
@GUID = GUID,
|
||||
@FORM_TITLE = FORM_TITLE,
|
||||
@SCREEN_ID = SCREEN_ID,
|
||||
@CHANGED_WHO = CHANGED_WHO
|
||||
FROM INSERTED
|
||||
SELECT @LANGUAGE = [LANGUAGE] FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@CHANGED_WHO)
|
||||
SET @PMO_OBJECT_NAME = 'FORMVIEW_TITLE' + CONVERT(VARCHAR(5),@GUID)
|
||||
|
||||
UPDATE TBPMO_FORM_VIEW SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_FORM_VIEW.GUID = INSERTED.GUID
|
||||
IF UPDATE (FORM_TITLE)
|
||||
BEGIN
|
||||
IF @LANGUAGE is not null
|
||||
If exists(SELECT * FROM TBPMO_LANGUAGE_OBJECT WHERE PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID)
|
||||
UPDATE TBPMO_LANGUAGE_OBJECT SET CAPTION = @FORM_TITLE,CHANGED_WHO = @CHANGED_WHO WHERE
|
||||
PMO_OBJECT_NAME = @PMO_OBJECT_NAME AND
|
||||
LANGUAGE_TYPE = @LANGUAGE AND SCREEN_ID = @SCREEN_ID
|
||||
ELSE
|
||||
BEGIN TRY
|
||||
INSERT INTO TBPMO_LANGUAGE_OBJECT (LANGUAGE_TYPE,SCREEN_ID,PMO_OBJECT_NAME,CAPTION) VALUES
|
||||
(@LANGUAGE,@SCREEN_ID,@PMO_OBJECT_NAME,@FORM_TITLE)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 72'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
END
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW 84'
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE FUNCTION [dbo].[FNPMO_GET_ENTITY_COLUMN_CONTENT](@pRECORD_ID INTEGER)
|
||||
RETURNS VARCHAR(2500)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE
|
||||
@COLUMN1 VARCHAR(100),
|
||||
@ENTITY INTEGER, @CONTROL_ID INTEGER, @RESULT VARCHAR(2500)
|
||||
|
||||
SELECT @ENTITY = FORM_ID FROM TBPMO_RECORD WHERE GUID = @pRECORD_ID
|
||||
|
||||
SELECT @COLUMN1 = COLUMN_NAME1 FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE FORM_ID = @ENTITY
|
||||
SELECT @CONTROL_ID = GUID FROm TBPMO_CONTROL WHERE COL_NAME = @COLUMN1
|
||||
SELECT @RESULT = VALUE FROM VWPMO_VALUES WHERE RECORD_ID = @pRECORD_ID AND CONTROL_ID = @CONTROL_ID
|
||||
RETURN(@RESULT)
|
||||
END
|
||||
GO
|
||||
GRANT EXECUTE ON [dbo].[FNPMO_GET_ENTITY_COLUMN_CONTENT] TO [DD_ECM] WITH GRANT OPTION
|
||||
GO
|
||||
ALTER VIEW VWPMO_WF_ACTIVE AS
|
||||
SELECT
|
||||
T.GUID AS WF_TASK_ID
|
||||
,T1.GUID AS WF_ID
|
||||
,T.RECORD_ID
|
||||
,T.STATE_ID
|
||||
,T4.GUID FORM_VIEW_ID
|
||||
,T.COMMENT
|
||||
,T.DUE_DATE
|
||||
,T.ADDED_WHEN
|
||||
,T.CHANGED_WHO
|
||||
,T.CHANGED_WHEN
|
||||
,T.TASK_DATE
|
||||
,T2.FINAL
|
||||
,T2.ENTITY_ID
|
||||
,T5.COLOR
|
||||
,dbo.FNPMO_GET_ENTITY_COLUMN_CONTENT(T.RECORD_ID) AS RECORD_DESCRIPTION
|
||||
--,(SELECT COLUMN_NAME1 FROM ))
|
||||
--, @USER AS USERNAME
|
||||
FROM
|
||||
TBPMO_WORKFLOW_TASK T
|
||||
,TBPMO_WORKFLOW T1
|
||||
,TBPMO_WORKFLOW_ENTITY_STATE T2
|
||||
,TBPMO_FORM T3
|
||||
,TBPMO_FORM_VIEW T4
|
||||
,TBPMO_WORKFLOW_TASK_STATE T5
|
||||
WHERE
|
||||
T.WF_ID = T1.GUID AND
|
||||
T1.GUID = T1.GUID AND
|
||||
T2.WF_ID = t1.GUID AND
|
||||
T2.ENTITY_ID = T3.GUID AND
|
||||
T2.STATE_ID = T.STATE_ID AND
|
||||
T3.GUID = T4.FORM_ID AND
|
||||
T.STATE_ID = T5.GUID AND
|
||||
T4.SCREEN_ID = 1 AND
|
||||
((T2.FINAL = 1 AND T.DUE_DATE IS NULL) OR T2.FINAL = 0) AND
|
||||
T.ACTIVE = 1
|
||||
GO
|
||||
CREATE PROCEDURE PRPMO_DELETE_RECORD(@pRECORD_ID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID = @pRECORD_ID OR RECORD2_ID = @pRECORD_ID
|
||||
DELETE FROM TBPMO_WORKFLOW_TASK WHERE RECORD_ID = @pRECORD_ID
|
||||
DELETE FROM TBPMO_CONTROL_VALUE WHERE RECORD_ID = @pRECORD_ID
|
||||
DELETE FROM TBPMO_FOLLUPEMAIL_RECORD WHERE RECORD_ID = @pRECORD_ID
|
||||
DELETE FROM TBPMO_RECORD WHERE GUID = @pRECORD_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
GRANT EXECUTE ON [dbo].[PRPMO_DELETE_RECORD] TO [DD_ECM]
|
||||
GO
|
||||
CREATE TABLE TBPMO_RIGHT_GROUP
|
||||
(
|
||||
GUID INTEGER IDENTITY(1,1), -- Eindeutiger Tabellenschlüssel
|
||||
ENTITY_ID INTEGER NOT NULL,
|
||||
GROUP_ID INTEGER NOT NULL,
|
||||
EDIT_REC BIT NOT NULL DEFAULT 1,
|
||||
ADD_REC BIT NOT NULL DEFAULT 1,
|
||||
DELETE_REC BIT NOT NULL DEFAULT 0,
|
||||
ADD_DOC BIT NOT NULL DEFAULT 1,
|
||||
VIEW_DOC BIT NOT NULL DEFAULT 1,
|
||||
DELETE_DOC BIT NOT NULL DEFAULT 0,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_RIGHT_GROUP PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_RIGHT_GROUP_ENTITY_ID FOREIGN KEY (ENTITY_ID) REFERENCES TBPMO_FORM (GUID),
|
||||
CONSTRAINT FK_TBPMO_RIGHT_GROUP_GROUP_ID FOREIGN KEY (GROUP_ID) REFERENCES TBDD_USER_GROUPS (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_RIGHT_GROUP_AFT_UPD ON TBPMO_RIGHT_GROUP
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
UPDATE TBPMO_RIGHT_GROUP SET CHANGED_WHEN = GETDATE() FROM INSERTED
|
||||
WHERE TBPMO_RIGHT_GROUP.GUID = INSERTED.GUID
|
||||
END
|
||||
GO
|
||||
|
||||
--DECLARE @GROUPID INT
|
||||
|
||||
--DECLARE c_GROUPS CURSOR FOR SELECT GUID FROM TBDD_USER_GROUPS
|
||||
|
||||
--BEGIN
|
||||
-- OPEN c_GROUPS
|
||||
-- FETCH NEXT FROM c_GROUPS INTO @GROUPID
|
||||
|
||||
-- WHILE @@FETCH_STATUS = 0
|
||||
-- BEGIN
|
||||
-- IF NOT EXISTS(SELECT GUID FROM TBPMO_RIGHT_GROUP WHERE ENTITY_ID = 93 AND GROUP_ID = @GROUPID)
|
||||
-- INSERT INTO TBPMO_RIGHT_GROUP (ENTITY_ID,GROUP_ID,ADDED_WHO) VALUES (93,@GROUPID,'Digital Data')
|
||||
|
||||
-- FETCH NEXT FROM c_GROUPS INTO @GROUPID
|
||||
-- END
|
||||
|
||||
-- CLOSE c_GROUPS
|
||||
-- DEALLOCATE c_GROUPS
|
||||
--END
|
||||
52
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.7.sql
Normal file
52
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.7.sql
Normal file
@@ -0,0 +1,52 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.4.7' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD CONTROL_DOCTYPE_MATCH INTEGER NOT NULL DEFAULT '0'
|
||||
GO
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD SQL_RIGHT_READ_AND_VIEW_ONLY VARCHAR(5000) NOT NULL DEFAULT ''
|
||||
GO
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD SQL_QUICK_VIEW VARCHAR(MAX) NOT NULL DEFAULT ''
|
||||
GO
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD LOAD_DIRECT BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER VIEW VWPMO_CONSTRUCTOR_FORMS AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T2.GUID,
|
||||
T1.GUID FORM_VIEW_ID,
|
||||
T1.SCREEN_ID,
|
||||
T2.CONSTRUCT_ID,
|
||||
T.PARENT_ID,
|
||||
T2.SEQUENCE,
|
||||
T2.LEVEL1_SELECT,
|
||||
T.GUID AS FORM_ID,
|
||||
T1.FORM_TITLE,
|
||||
T2.SQL_SELECT_EBENE1,
|
||||
T2.SQL_SELECT_EBENE2,
|
||||
T2.SQL_QUICK_VIEW,
|
||||
T2.COLUMN_NAME1,
|
||||
T2.COLUMN_NAME2,
|
||||
T.FORM_TYPE_ID,
|
||||
T2.LOAD_DIRECT,
|
||||
T2.CONTROL_DOCTYPE_MATCH,
|
||||
T2.SQL_RIGHT_READ_AND_VIEW_ONLY
|
||||
FROM
|
||||
tbpmo_form T,
|
||||
TBPMO_FORM_VIEW T1,
|
||||
TBPMO_FORM_CONSTRUCTOR_DETAIL T2
|
||||
where
|
||||
T2.FORM_ID = T.GUID AND
|
||||
T.GUID = T1.FORM_ID
|
||||
ORDER BY
|
||||
T2.CONSTRUCT_ID,T.PARENT_ID,T2.SEQUENCE
|
||||
GO
|
||||
ALTER TABLE TBPMO_RECORD
|
||||
ADD IN_WORK BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER TABLE TBPMO_RECORD
|
||||
ADD IN_WORK_WHO VARCHAR(100)
|
||||
GO
|
||||
|
||||
|
||||
90
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.8.sql
Normal file
90
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.8.sql
Normal file
@@ -0,0 +1,90 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.4.8' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
ALTER VIEW VWPMO_CONTROL_SCREEN AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T.GUID CONTROL_ID,
|
||||
T.NAME CONTROL_NAME,
|
||||
T.REQUIRED CONTROL_REQUIRED,
|
||||
T.DEFAULT_VALUE CONTROL_DEF_VALUE,
|
||||
T.READ_ONLY CONTROL_READ_ONLY,
|
||||
T.MULTILINE CONTROL_MULTILINE,
|
||||
T.PARENT_CONTROL_ID CONTROL_PARENT_ID,
|
||||
T.COL_NAME CONTROL_COL_NAME,
|
||||
T.SHOW_COLUMN CONTROL_SHOW_COLUMN,
|
||||
T.CONNECTION_ID_1 CONTROL_CONNID_1,
|
||||
T.SQL_COMMAND_1 CONTROL_SQLCOMMAND_1,
|
||||
T.SQL_COMMAND_2 CONTROL_SQLCOMMAND_2,
|
||||
T.STATIC_LIST CONTROL_STATIC_LIST,
|
||||
T4.GUID CTRLTYPE_ID,
|
||||
T4.TYPE_NAME CTRLTYPE_NAME,
|
||||
T.FORMAT_TYPE CONTROL_FORMAT_TYPE,
|
||||
T.FORM_ID,
|
||||
T3.NAME FORM_NAME,
|
||||
T3.LEVEL FORM_LEVEL,
|
||||
T1.SCREEN_ID SCREEN_ID,
|
||||
T2.NAME SCREEN_NAME,
|
||||
T1.GUID CTRLSCR_ID,
|
||||
T1.CONTROL_TEXT CTRLSCR_CAPTION,
|
||||
T1.X_LOC CTRLSCR_X_LOC,
|
||||
T1.Y_LOC CTRLSCR_Y_LOC,
|
||||
T1.HEIGHT CTRLSCR_HEIGHT,
|
||||
T1.WIDTH CTRLSCR_WIDTH,
|
||||
T1.FONT_FAMILY CTRLSCR_FONT_FAMILY,
|
||||
T1.FONT_COLOR CTRLSCR_FONT_COLOR,
|
||||
T1.FONT_SIZE CTRLSCR_FONT_SIZE,
|
||||
T1.FONT_STYLE CTRLSCR_FONT_STYLE,
|
||||
T1.TAB_INDEX CTRLSCR_TAB_INDEX,
|
||||
T1.TAB_STOP CTRLSCR_TAB_STOP,
|
||||
T1.BACK_COLOR CTRLSCR_BACK_COLOR,
|
||||
T.MASTER_DATA_ID CTRLSCR_MASTER_DATA_ID
|
||||
FROM
|
||||
TBPMO_CONTROL T,
|
||||
TBPMO_CONTROL_SCREEN T1,
|
||||
TBPMO_SCREEN T2,
|
||||
TBPMO_FORM T3,
|
||||
TBPMO_CONTROL_TYPE T4
|
||||
WHERE
|
||||
T.FORM_ID = T3.GUID AND
|
||||
T.GUID = T1.CONTROL_ID AND
|
||||
T1.SCREEN_ID = T2.GUID AND
|
||||
T.CONTROL_TYPE_ID = T4.GUID
|
||||
ORDER BY
|
||||
T1.SCREEN_ID,
|
||||
T.FORM_ID,
|
||||
T1.TAB_STOP
|
||||
GO
|
||||
ALTER TABLE TBPMO_FORM_CONSTRUCTOR_DETAIL
|
||||
ADD SQL_RIGHT_WINDREAM_VIEW VARCHAR(5000) NOT NULL DEFAULT ''
|
||||
GO
|
||||
ALTER VIEW [dbo].[VWPMO_CONSTRUCTOR_FORMS] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T2.GUID,
|
||||
T1.GUID FORM_VIEW_ID,
|
||||
T1.SCREEN_ID,
|
||||
T2.CONSTRUCT_ID,
|
||||
T.PARENT_ID,
|
||||
T2.SEQUENCE,
|
||||
T2.LEVEL1_SELECT,
|
||||
T.GUID AS FORM_ID,
|
||||
T1.FORM_TITLE,
|
||||
T2.SQL_SELECT_EBENE1,
|
||||
T2.SQL_SELECT_EBENE2,
|
||||
T2.SQL_QUICK_VIEW,
|
||||
T2.COLUMN_NAME1,
|
||||
T2.COLUMN_NAME2,
|
||||
T.FORM_TYPE_ID,
|
||||
T2.LOAD_DIRECT,
|
||||
T2.CONTROL_DOCTYPE_MATCH,
|
||||
T2.SQL_RIGHT_READ_AND_VIEW_ONLY,
|
||||
T2.SQL_RIGHT_WINDREAM_VIEW
|
||||
FROM
|
||||
tbpmo_form T,
|
||||
TBPMO_FORM_VIEW T1,
|
||||
TBPMO_FORM_CONSTRUCTOR_DETAIL T2
|
||||
where
|
||||
T2.FORM_ID = T.GUID AND
|
||||
T.GUID = T1.FORM_ID
|
||||
ORDER BY
|
||||
T2.CONSTRUCT_ID,T.PARENT_ID,T2.SEQUENCE
|
||||
GO
|
||||
|
||||
373
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.9.sql
Normal file
373
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.4.9.sql
Normal file
@@ -0,0 +1,373 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.4.9' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
CREATE TABLE TBPMO_SAP_FUBA
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
NAME VARCHAR(100) NOT NULL,
|
||||
COMMENT VARCHAR(500),
|
||||
Method VARCHAR(50) NOT NULL DEFAULT 'TABLE',
|
||||
TableName VARCHAR(100) NOT NULL,
|
||||
Host VARCHAR(100) NOT NULL,
|
||||
SystemNumber VARCHAR(30) NOT NULL,
|
||||
UserName VARCHAR(50) NOT NULL,
|
||||
[Password] VARCHAR(100) NOT NULL,
|
||||
Client VARCHAR(100) NOT NULL,
|
||||
[Language] VARCHAR(20) NOT NULL,
|
||||
TempTableName VARCHAR(100) NOT NULL,
|
||||
FuBa_SplitCharacter VARCHAR(1) NOT NULL DEFAULT ';',
|
||||
WHERE_CLAUSE VARCHAR(500),
|
||||
ACTIVE BIT NOT NULL DEFAULT 0,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_SAP_FUBA PRIMARY KEY (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_SAP_FUBA_AFT_UPD ON TBPMO_SAP_FUBA
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_SAP_FUBA SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_SAP_FUBA.GUID = INSERTED.GUID
|
||||
GO
|
||||
INSERT INTO TBPMO_CONTROL_TYPE (TYPE_NAME) VALUES ('DatagridviewCheckable')
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_SAP_FUBA_AFT_UPD ON TBPMO_SAP_FUBA
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_SAP_FUBA SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_SAP_FUBA.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
|
||||
ALTER VIEW VWPMO_CONTROL_HINT AS
|
||||
SELECT
|
||||
T2.FORM_ID,
|
||||
T1.CONTROL_ID,
|
||||
T.HINT
|
||||
FROM
|
||||
TBPMO_CONTROL_LANGUAGE T,
|
||||
TBPMO_CONTROL_SCREEN T1,
|
||||
TBPMO_CONTROL T2
|
||||
WHERE
|
||||
T.CONTROL_SCREEN_ID = T1.GUID
|
||||
AND T1.CONTROL_ID = T2.GUID
|
||||
AND T1.SCREEN_ID = 1
|
||||
AND (HINT IS NOT NULL AND HINT <> '')
|
||||
GO
|
||||
|
||||
ALTER TABLE TBDD_USER
|
||||
ADD WAN_ENVIRONMENT BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
UPDATE TBDD_USER SET WAN_ENVIRONMENT = 1
|
||||
|
||||
GO
|
||||
--RENAME TBDD_EMAIL_ACCOUNT in OLD
|
||||
CREATE TABLE TBDD_EMAIL_ACCOUNT
|
||||
(
|
||||
GUID INTEGER IDENTITY(0,1),
|
||||
NAME VARCHAR(50),
|
||||
EMAIL_FROM VARCHAR(100) NOT NULL,
|
||||
EMAIL_SMTP VARCHAR(100) NOT NULL,
|
||||
EMAIL_USER VARCHAR(100) NOT NULL,
|
||||
EMAIL_PW VARCHAR(100) NOT NULL DEFAULT '',
|
||||
PORT INTEGER NOT NULL DEFAULT '25',
|
||||
ACTIVE BIT NOT NULL DEFAULT 1,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT' NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBDD_EMAIL_ACCOUNT PRIMARY KEY (GUID)
|
||||
)
|
||||
GO
|
||||
DROP TRIGGER TBDD_EMAIL_ACCOUNT_AFT_UPD
|
||||
GO
|
||||
CREATE TRIGGER TBDD_EMAIL_ACCOUNT_AFT_UPD ON TBDD_EMAIL_ACCOUNT
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
UPDATE TBDD_EMAIL_ACCOUNT SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBDD_EMAIL_ACCOUNT.GUID = INSERTED.GUID
|
||||
END
|
||||
GO
|
||||
|
||||
INSERT INTO TBDD_EMAIL_ACCOUNT (NAME,
|
||||
EMAIL_FROM,
|
||||
EMAIL_SMTP ,
|
||||
EMAIL_USER,
|
||||
EMAIL_PW,
|
||||
ACTIVE) SELECT NAME,
|
||||
EMAIL_FROM,
|
||||
EMAIL_SMTP ,
|
||||
EMAIL_USER,
|
||||
EMAIL_PW,
|
||||
ACTIVE FROM TBDD_EMAIL_ACCOUNT_OLD
|
||||
|
||||
ALTER TABLE TBPMO_FOLLOW_UP_EMAIL
|
||||
ADD CTRL_USER_DIRECT INTEGER NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER TABLE TBPMO_FOLLOW_UP_EMAIL
|
||||
ADD CTRL_GROUP_DIRECT INTEGER NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER VIEW VWPMO_FOLLOW_UP_EMAIL AS
|
||||
SELECT
|
||||
T1.GUID FOLLOW_UP_ID,
|
||||
T1.NAME,
|
||||
T1.FOLLOW_UP_SEQUENCE,
|
||||
T1.FOLLOW_UP_DAYS,
|
||||
T1.FOLLOW_UP_TIME_SPAN,
|
||||
CONVERT(CHAR(5),GETDATE(),108) NOW_TIME,
|
||||
T.RECORD_ID,
|
||||
CONVERT(DATE,T.VALUE) VALUE,
|
||||
T1.EMAIL_SUBJECT,
|
||||
T1.EMAIL_BODY,
|
||||
T1.PROCESS_SELECT1,
|
||||
T1.PROCESS_SELECT2,
|
||||
T1.PROCESS_SELECT3,
|
||||
T1.PROCESS_SELECT4,
|
||||
T1.PROCESS_SELECT5,
|
||||
T1.PROCESS_SELECT6,
|
||||
T1.PROCESS_SELECT7,
|
||||
T1.PROCESS_SELECT8,
|
||||
T1.PROCESS_SELECT9,
|
||||
T1.PROCESS_SELECT10,
|
||||
T1.TIME_UNITY,
|
||||
T1.TIME_DIST,
|
||||
CASE T1.TIME_UNITY
|
||||
WHEN 'Month' THEN
|
||||
DATEDIFF(month, getdate(),convert(Date,T.value))
|
||||
WHEN 'Week' THEN
|
||||
DATEDIFF(week, getdate(),convert(Date,T.value))
|
||||
END TIME_SPAN,
|
||||
T1.DEPENDENT_DATE_CTRL_ID,
|
||||
T1.DEPENDENT_DONE_CTRL_ID,
|
||||
(SELECT VALUE FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = T1.DEPENDENT_DONE_CTRL_ID AND RECORD_ID = T.RECORD_ID) DONE_VALUE,
|
||||
T2.GUID AS CONSTRUCTOR_ID,
|
||||
T2.FORM_TITLE AS CONSTRUCTOR_TITLE,
|
||||
T1.CTRL_USER_DIRECT,
|
||||
T1.CTRL_GROUP_DIRECT
|
||||
FROM
|
||||
VWPMO_VALUES T,
|
||||
TBPMO_FOLLOW_UP_EMAIL T1,
|
||||
TBPMO_FORM_CONSTRUCTOR T2
|
||||
WHERE
|
||||
T1.ACTIVE = 1 AND
|
||||
(SELECT VALUE FROM TBPMO_CONTROL_VALUE WHERE CONTROL_ID = T1.DEPENDENT_DONE_CTRL_ID AND RECORD_ID = T.RECORD_ID) = 'False' And
|
||||
T.CONTROL_ID = T1.DEPENDENT_DATE_CTRL_ID AND
|
||||
T1.CONSTRUCTOR_ID = T2.GUID AND
|
||||
T1.TIME_SPAN =
|
||||
CASE T1.TIME_UNITY
|
||||
WHEN 'Month' THEN
|
||||
DATEDIFF(month, getdate(),convert(Date,T.value))
|
||||
WHEN 'Week' THEN
|
||||
DATEDIFF(week, getdate(),convert(Date,T.value))
|
||||
END
|
||||
|
||||
GO
|
||||
ALTER TABLE TBPMO_CONTROL_VALUE
|
||||
ADD CHANGE_STEP INTEGER NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER TABLE TBPMO_CONTROL_VALUE
|
||||
ADD REDO BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
CREATE TABLE TBPMO_CONTROL_VALUE_CHANGE_HISTORY
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
RECORD_ID INTEGER,
|
||||
CONTROL_ID INTEGER,
|
||||
VALUE VARCHAR(MAX),
|
||||
CHANGE_STEP INTEGER,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_CONTROL_VALUE_CHANGE_HISTORY_CHANGE_HISTORY PRIMARY KEY (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_CONTROL_VALUE_CHANGE_HISTORY_CHANGE_HISTORY_UPD ON TBPMO_CONTROL_VALUE_CHANGE_HISTORY
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_CONTROL_VALUE_CHANGE_HISTORY SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CONTROL_VALUE_CHANGE_HISTORY.GUID = INSERTED.GUID
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_CONTROL_VALUE_AFT_UPD] ON [dbo].[TBPMO_CONTROL_VALUE]
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@CONTROL_ID INTEGER,
|
||||
@RECORD_ID INTEGER,
|
||||
@VALUE_NEW VARCHAR(MAX),
|
||||
@VALUE_OLD VARCHAR(MAX),
|
||||
@CHANGED_WHO VARCHAR(50),
|
||||
@CHANGE_STEP INTEGER,
|
||||
@REDO BIT
|
||||
IF UPDATE (VALUE)
|
||||
BEGIN
|
||||
SELECT
|
||||
@CONTROL_ID = DELETED.CONTROL_ID,
|
||||
@RECORD_ID = DELETED.RECORD_ID,
|
||||
@VALUE_OLD = DELETED.VALUE
|
||||
FROM DELETED
|
||||
--RAISERROR (@VALUE , 16, 1)
|
||||
SELECT
|
||||
@CHANGE_STEP = CHANGE_STEP,
|
||||
@CHANGED_WHO = CHANGED_WHO,
|
||||
@VALUE_NEW = VALUE,
|
||||
@REDO = REDO
|
||||
FROM INSERTED
|
||||
|
||||
IF @REDO = 0
|
||||
IF @VALUE_OLD <> @VALUE_NEW AND NOT EXISTS(SELECT GUID FROM TBPMO_CONTROL_VALUE_CHANGE_HISTORY WHERE RECORD_ID = @RECORD_ID AND CONTROL_ID = @CONTROL_ID AND VALUE = @VALUE_OLD AND CHANGE_STEP = @CHANGE_STEP)
|
||||
INSERT INTO TBPMO_CONTROL_VALUE_CHANGE_HISTORY (RECORD_ID,CONTROL_ID,VALUE,CHANGE_STEP,ADDED_WHO) VALUES
|
||||
(@RECORD_ID,@CONTROL_ID,@VALUE_OLD,@CHANGE_STEP,@CHANGED_WHO)
|
||||
--Update des Logs für loggen von Datensatzänderungen
|
||||
IF EXISTS(SELECT LOG_UPDATE FROM TBPMO_RECORD_LOG_CONFIG WHERE CONTROL_ID = @CONTROL_ID AND LOG_UPDATE = 1)
|
||||
BEGIN
|
||||
If @VALUE_OLD <> @VALUE_NEW
|
||||
BEGIN
|
||||
DECLARE @LOG VARCHAR(1000)
|
||||
SET @LOG = 'Update of Value - OLD-VALUE: ' + @VALUE_OLD + ' / NEW VALUE: ' + @VALUE_NEW
|
||||
INSERT INTO TBPMO_RECORD_LOG (RECORD_ID,CONTROL_ID,LOG_DESCRIPTION,ADDED_WHO) VALUES
|
||||
(@RECORD_ID,@CONTROL_ID,@LOG,@CHANGED_WHO)
|
||||
END
|
||||
END
|
||||
END
|
||||
--Generelle Updates (Datum und Recor-Änderungen)
|
||||
UPDATE TBPMO_CONTROL_VALUE SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CONTROL_VALUE.GUID = INSERTED.GUID
|
||||
UPDATE TBPMO_RECORD SET CHANGED_WHO = @CHANGED_WHO WHERE TBPMO_RECORD.GUID = @RECORD_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE PROCEDURE [dbo].[PRPMO_REDO_RECORD_CHANGES] (@RECORD_ID INTEGER)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE
|
||||
@CHANGE_STEP INTEGER,
|
||||
@CONTROL_ID INTEGER,
|
||||
@GUID INTEGER,
|
||||
@VALUE VARCHAR(MAX)
|
||||
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
SELECT MAX(GUID),CONTROL_ID, CHANGE_STEP FROM TBPMO_CONTROL_VALUE_CHANGE_HISTORY WHERE RECORD_ID = @RECORD_ID GROUP BY CONTROL_ID, CHANGE_STEP, RECORD_ID
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @GUID,@CONTROL_ID,@CHANGE_STEP
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SELECT @VALUE = VALUE FROM TBPMO_CONTROL_VALUE_CHANGE_HISTORY WHERE GUID = @GUID
|
||||
UPDATE TBPMO_CONTROL_VALUE SET VALUE = @VALUE, REDO = 1 WHERE RECORD_ID = @RECORD_ID AND CONTROL_ID = @CONTROL_ID
|
||||
DELETE FROM TBPMO_CONTROL_VALUE_CHANGE_HISTORY WHERE GUID = @GUID
|
||||
UPDATE TBPMO_CONTROL_VALUE SET REDO = 0 WHERE RECORD_ID = @RECORD_ID AND CONTROL_ID = @CONTROL_ID
|
||||
FETCH NEXT FROM c_REDO INTO @GUID,@CONTROL_ID,@CHANGE_STEP
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
END
|
||||
GO
|
||||
ALTER TABLE TBPMO_RECORD
|
||||
ADD COLOR VARCHAR(50) NOT NULL DEFAULT ''
|
||||
GO
|
||||
|
||||
|
||||
ALTER PROCEDURE [dbo].[PRPMO_CREATE_SQL](@pFORM_ID INT)
|
||||
AS
|
||||
DECLARE @COL_NAME VARCHAR(50),
|
||||
@SQL_BEGIN VARCHAR(1000),
|
||||
@SQL_END VARCHAR(2000),
|
||||
@SQL VARCHAR(5000),
|
||||
@CONTROL_ID INT,
|
||||
@RESULT VARCHAR(8000),
|
||||
@TYPEID INT,
|
||||
@TABINDEX INT,
|
||||
@SQL_LBL VARCHAR(2000)
|
||||
|
||||
DECLARE c_SPALTENNAMEN CURSOR FOR SELECT T.GUID,'['+T.COL_NAME+']' AS 'COL_NAME', T2.GUID,T1.TAB_INDEX FROM TBPMO_CONTROL T, TBPMO_CONTROL_SCREEN T1, TBPMO_CONTROL_TYPE T2 WHERE
|
||||
T.SHOW_COLUMN = 1 AND T.[COL_NAME] <> '' AND T.GUID = T1.CONTROL_ID AND T.CONTROL_TYPE_ID = T2.GUID AND T.FORM_ID = @pFORM_ID AND LEN(ISNULL(T.COL_NAME,'')) > 0 and t.CONTROL_TYPE_ID not in (1,5) UNION
|
||||
SELECT T.GUID,'['+T.NAME+']' AS 'COL_NAME', T2.GUID,T1.TAB_INDEX FROM TBPMO_CONTROL T, TBPMO_CONTROL_SCREEN T1, TBPMO_CONTROL_TYPE T2 WHERE
|
||||
T.GUID = T1.CONTROL_ID AND T.CONTROL_TYPE_ID = T2.GUID AND T.FORM_ID = @pFORM_ID and t.CONTROL_TYPE_ID = 1 AND LEN(ISNULL(t.SQL_COMMAND_1,'')) > 0 ORDER BY TAB_INDEX
|
||||
BEGIN
|
||||
SET @SQL_BEGIN = 'SELECT T.GUID AS [Record-ID],T.COLOR AS ROW_COLOR, T.FORM_ID AS [Form-ID],'
|
||||
SET @SQL_END = ',T.ADDED_WHO as AddedWho,T.ADDED_WHEN as AddedWhen, T.CHANGED_WHO As ChangedWho, T.CHANGED_WHEN As ChangedWhen FROM TBPMO_RECORD T, TBPMO_FORM T1 WHERE T.FORM_ID = T1.GUID AND T.FORM_ID = @FORM_ID'
|
||||
|
||||
SET @SQL_END = REPLACE(@SQL_END,'@FORM_ID',@pFORM_ID)
|
||||
|
||||
OPEN c_SPALTENNAMEN
|
||||
FETCH NEXT FROM c_SPALTENNAMEN INTO @CONTROL_ID,@COL_NAME,@TYPEID,@TABINDEX
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @COL_NAME = REPLACE(@COL_NAME,'lbl','')
|
||||
IF LEN(ISNULL(@SQL,'')) = 0
|
||||
BEGIN
|
||||
IF @TYPEID = 10 OR @TYPEID = 11
|
||||
SET @SQL = 'ISNULL((SELECT CASE WHEN UPPER(RTRIM(LTRIM(T5.VALUE))) = ''TRUE'' THEN 1 ELSE 0 END FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + '),0) AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 6
|
||||
SET @SQL = '(SELECT T6.IMG FROM TBPMO_CONTROL_IMAGE T6 WHERE T6.RECORD_ID = T.GUID AND T6.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 1
|
||||
BEGIN
|
||||
SELECT @SQL_LBL = SQL_COMMAND_1 FROM TBPMO_CONTROL WHERE GUID = @CONTROL_ID
|
||||
SET @SQL_LBL = REPLACE(UPPER(@SQL_LBL),'@RECORD_ID','T.GUID')
|
||||
SET @SQL = '(' + @SQL_LBL + ') AS ' + @COL_NAME
|
||||
END
|
||||
ELSE IF @TYPEID = 12 OR @TYPEID = 7 OR @TYPEID = 14
|
||||
SET @SQL = '(SELECT [dbo].[FNPMO_GET_CONTROL_VALUES](' + CONVERT(VARCHAR(20),@CONTROL_ID) + ', T.GUID)) AS ' + @COL_NAME
|
||||
ELSE
|
||||
SET @SQL = '(SELECT T5.VALUE FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
IF (@TYPEID = 10) OR (@TYPEID = 11)
|
||||
SET @SQL = @SQL + ',ISNULL((SELECT CASE WHEN UPPER(RTRIM(LTRIM(T5.VALUE))) = ''TRUE'' THEN 1 ELSE 0 END FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + '),0) AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 6
|
||||
SET @SQL = @SQL + ',(SELECT T6.IMG FROM TBPMO_CONTROL_IMAGE T6 WHERE T6.RECORD_ID = T.GUID AND T6.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 1
|
||||
BEGIN
|
||||
SELECT @SQL_LBL = SQL_COMMAND_1 FROM TBPMO_CONTROL WHERE GUID = @CONTROL_ID
|
||||
SET @SQL_LBL = REPLACE(UPPER(@SQL_LBL),'@RECORD_ID','T.GUID')
|
||||
SET @SQL = @SQL + ',(' + @SQL_LBL + ') AS ' + @COL_NAME
|
||||
END
|
||||
ELSE IF @TYPEID = 12 OR @TYPEID = 7 OR @TYPEID = 14
|
||||
SET @SQL = @SQL + ',(SELECT [dbo].[FNPMO_GET_CONTROL_VALUES](' + CONVERT(VARCHAR(20),@CONTROL_ID) + ', T.GUID)) AS ' + @COL_NAME
|
||||
ELSE
|
||||
SET @SQL = @SQL + ',(SELECT T5.VALUE FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
END
|
||||
|
||||
FETCH NEXT FROM c_SPALTENNAMEN INTO @CONTROL_ID,@COL_NAME,@TYPEID,@TABINDEX
|
||||
END
|
||||
|
||||
CLOSE c_SPALTENNAMEN
|
||||
DEALLOCATE c_SPALTENNAMEN
|
||||
|
||||
SET @RESULT = @SQL_BEGIN + @SQL + @SQL_END
|
||||
|
||||
IF EXISTS (SELECT FORM_ID FROM TBPMO_FORM_SQL WHERE FORM_ID = @pFORM_ID)
|
||||
UPDATE TBPMO_FORM_SQL SET SQL_COMMAND = @RESULT WHERE FORM_ID = @pFORM_ID
|
||||
ELSE
|
||||
INSERT INTO TBPMO_FORM_SQL(FORM_ID,SQL_COMMAND) VALUES(@pFORM_ID,@RESULT)
|
||||
END
|
||||
GO
|
||||
/*UPDATE DER SQLS*/
|
||||
BEGIN
|
||||
DECLARE
|
||||
@ENTITY_ID INTEGER
|
||||
|
||||
DECLARE c_REDO CURSOR FOR
|
||||
SELECT GUID FROM TBPMO_FORM
|
||||
OPEN c_REDO
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
EXEC DBO.PRPMO_CREATE_SQL @ENTITY_ID
|
||||
FETCH NEXT FROM c_REDO INTO @ENTITY_ID
|
||||
END
|
||||
CLOSE c_REDO
|
||||
DEALLOCATE c_REDO
|
||||
END
|
||||
GO
|
||||
EXEC PRPMO_CREATE_TEMP_VIEWS
|
||||
GO
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -0,0 +1,15 @@
|
||||
CREATE FUNCTION [dbo].[FNPMO_GET_CONTROL_CAPTION](@pLANG_TYPE VARCHAR(5), @pSCREEN_ID INTEGER,@pCONTROL_ID INTEGER )
|
||||
RETURNS VARCHAR(100)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE @CAPTION VARCHAR(100),
|
||||
@CTRL_SCREEN_ID INTEGER
|
||||
|
||||
SELECT @CTRL_SCREEN_ID = GUID FROM TBPMO_CONTROL_SCREEN WHERE
|
||||
CONTROL_ID = @pCONTROL_ID AND SCREEN_ID = @pSCREEN_ID
|
||||
|
||||
SELECT @CAPTION = CAPTION FROM TBPMO_CONTROL_LANGUAGE WHERE LANGUAGE_TYPE = @pLANG_TYPE AND
|
||||
CONTROL_SCREEN_ID = @CTRL_SCREEN_ID
|
||||
|
||||
RETURN(ISNULL(@CAPTION,''))
|
||||
END
|
||||
Binary file not shown.
39
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.0.sql
Normal file
39
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.0.sql
Normal file
@@ -0,0 +1,39 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.5.0' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_WD_NAMECONVENTION_FORMAT
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
ID INTEGER NOT NULL,
|
||||
PATTERN VARCHAR(50) NOT NULL,
|
||||
FORMAT_RULE VARCHAR(100) NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_WD_NAMECONVENTION_FORMAT PRIMARY KEY (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_WD_NAMECONVENTION_FORMAT_UPD ON TBPMO_WD_NAMECONVENTION_FORMAT
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_WD_NAMECONVENTION_FORMAT SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_WD_NAMECONVENTION_FORMAT.GUID = INSERTED.GUID
|
||||
GO
|
||||
ALTER PROCEDURE [dbo].[PRPMO_DELETE_DOCTYPE](@pDOCID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_WD_NAMECONVENTION_FORMAT WHERE ID IN (SELECT GUID FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = @pDOCID)
|
||||
DELETE FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_INDEX_MAN WHERE DOK_ID = @pDOCID
|
||||
DELETE FROM TBDD_INDEX_AUTOM WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_USRGRP_DOKTYPE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBPMO_CLIENT_DOCTYPE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBPMO_TEMPLATE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_DOKUMENTART WHERE GUID = @pDOCID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
38
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.1.sql
Normal file
38
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.1.sql
Normal file
@@ -0,0 +1,38 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.5.1' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
ALTER TABLE TBDD_INDEX_MAN
|
||||
ADD SAVE_VALUE BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER VIEW VWDDINDEX_MAN
|
||||
AS
|
||||
SELECT TOP 2000
|
||||
T.GUID,
|
||||
T.NAME INDEXNAME,
|
||||
T.WD_INDEX,
|
||||
T.COMMENT,
|
||||
T.DATATYPE,
|
||||
T.DOK_ID,
|
||||
T1.BEZEICHNUNG DOKUMENTART,
|
||||
T1.KURZNAME,
|
||||
T.SUGGESTION,
|
||||
T.CONNECTION_ID,
|
||||
T2.BEZEICHNUNG CONNECTION,
|
||||
T2.SQL_PROVIDER,
|
||||
T2.SERVER,
|
||||
T2.DATENBANK,
|
||||
T2.USERNAME,
|
||||
T2.PASSWORD,
|
||||
T.SQL_RESULT,
|
||||
T.SQL_CHECK,
|
||||
T.OPTIONAL,
|
||||
T.SAVE_VALUE
|
||||
FROM
|
||||
TBDD_INDEX_MAN T
|
||||
INNER JOIN TBDD_DOKUMENTART T1 ON T.DOK_ID = T1.GUID AND T1.AKTIV = 1
|
||||
LEFT JOIN TBDD_CONNECTION T2 ON T.CONNECTION_ID = T2.GUID AND T2.AKTIV = 1
|
||||
WHERE
|
||||
T.ACTIVE = 1
|
||||
ORDER BY
|
||||
T.DOK_ID,
|
||||
T.GUID
|
||||
GO
|
||||
182
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.2.sql
Normal file
182
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.2.sql
Normal file
@@ -0,0 +1,182 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.5.2' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
CREATE PROCEDURE [dbo].[PRPMO_DELETE_ENTITY](@pENTITY_ID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_FORM_SQL WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_CLIENT_ENTITY WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_WORKFLOW_ENTITY_STATE WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_TEMPLATE_ENTITY WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_CONTROL WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD2_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD_LOG WHERE RECORD_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_FORM WHERE GUID = @pENTITY_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER TABLE TBPMO_CONTROL
|
||||
ADD VISIBLE BIT NOT NULL DEFAULT 1
|
||||
GO
|
||||
ALTER TABLE TBPMO_CONTROL
|
||||
ADD TREE_VIEW BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER VIEW VWPMO_CONTROL_SCREEN AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T.GUID CONTROL_ID,
|
||||
T.NAME CONTROL_NAME,
|
||||
T.REQUIRED CONTROL_REQUIRED,
|
||||
T.DEFAULT_VALUE CONTROL_DEF_VALUE,
|
||||
T.READ_ONLY CONTROL_READ_ONLY,
|
||||
T.MULTILINE CONTROL_MULTILINE,
|
||||
T.PARENT_CONTROL_ID CONTROL_PARENT_ID,
|
||||
T.COL_NAME CONTROL_COL_NAME,
|
||||
T.SHOW_COLUMN CONTROL_SHOW_COLUMN,
|
||||
T.CONNECTION_ID_1 CONTROL_CONNID_1,
|
||||
T.SQL_COMMAND_1 CONTROL_SQLCOMMAND_1,
|
||||
T.SQL_COMMAND_2 CONTROL_SQLCOMMAND_2,
|
||||
T.VISIBLE CONTROL_VISIBLE,
|
||||
T.TREE_VIEW CONTROL_TREE_VIEW,
|
||||
T.STATIC_LIST CONTROL_STATIC_LIST,
|
||||
T4.GUID CTRLTYPE_ID,
|
||||
T4.TYPE_NAME CTRLTYPE_NAME,
|
||||
T.FORMAT_TYPE CONTROL_FORMAT_TYPE,
|
||||
T.FORM_ID,
|
||||
T3.NAME FORM_NAME,
|
||||
T3.LEVEL FORM_LEVEL,
|
||||
T1.SCREEN_ID SCREEN_ID,
|
||||
T2.NAME SCREEN_NAME,
|
||||
T1.GUID CTRLSCR_ID,
|
||||
T1.CONTROL_TEXT CTRLSCR_CAPTION,
|
||||
T1.X_LOC CTRLSCR_X_LOC,
|
||||
T1.Y_LOC CTRLSCR_Y_LOC,
|
||||
T1.HEIGHT CTRLSCR_HEIGHT,
|
||||
T1.WIDTH CTRLSCR_WIDTH,
|
||||
T1.FONT_FAMILY CTRLSCR_FONT_FAMILY,
|
||||
T1.FONT_COLOR CTRLSCR_FONT_COLOR,
|
||||
T1.FONT_SIZE CTRLSCR_FONT_SIZE,
|
||||
T1.FONT_STYLE CTRLSCR_FONT_STYLE,
|
||||
T1.TAB_INDEX CTRLSCR_TAB_INDEX,
|
||||
T1.TAB_STOP CTRLSCR_TAB_STOP,
|
||||
T1.BACK_COLOR CTRLSCR_BACK_COLOR,
|
||||
T.MASTER_DATA_ID CTRLSCR_MASTER_DATA_ID
|
||||
FROM
|
||||
TBPMO_CONTROL T,
|
||||
TBPMO_CONTROL_SCREEN T1,
|
||||
TBPMO_SCREEN T2,
|
||||
TBPMO_FORM T3,
|
||||
TBPMO_CONTROL_TYPE T4
|
||||
WHERE
|
||||
T.FORM_ID = T3.GUID AND
|
||||
T.GUID = T1.CONTROL_ID AND
|
||||
T1.SCREEN_ID = T2.GUID AND
|
||||
T.CONTROL_TYPE_ID = T4.GUID
|
||||
ORDER BY
|
||||
T1.SCREEN_ID,
|
||||
T.FORM_ID,
|
||||
T1.TAB_STOP
|
||||
GO
|
||||
ALTER VIEW [dbo].[VWPMO_WF_ACTIVE] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
W_T.GUID AS WF_TASK_ID
|
||||
,R.GUID AS WF_ID
|
||||
,W_T.RECORD_ID
|
||||
,T.STATE_ID
|
||||
,T4.GUID FORM_VIEW_ID
|
||||
,W_T.COMMENT
|
||||
,W_T.DUE_DATE
|
||||
,W_T.ADDED_WHEN
|
||||
,W_T.CHANGED_WHO
|
||||
,W_T.CHANGED_WHEN
|
||||
,W_T.TASK_DATE
|
||||
,T.FINAL
|
||||
,T.ENTITY_ID
|
||||
,T5.COLOR
|
||||
,dbo.FNPMO_GET_ENTITY_COLUMN_CONTENT(W_T.RECORD_ID) AS RECORD_DESCRIPTION
|
||||
FROM
|
||||
TBPMO_WORKFLOW_ENTITY_STATE T,
|
||||
TBPMO_WORKFLOW_TASK W_T
|
||||
,TBPMO_WORKFLOW R
|
||||
,TBPMO_FORM T3
|
||||
,TBPMO_FORM_VIEW T4
|
||||
,TBPMO_WORKFLOW_TASK_STATE T5
|
||||
,TBPMO_RECORD REC
|
||||
WHERE
|
||||
--W_T.RECORD_ID = 95 AND
|
||||
--TBPMO_WORKFLOW_ENTITY_STATE
|
||||
T.WF_ID = R.GUID AND
|
||||
T.ENTITY_ID = T3.GUID AND
|
||||
T.STATE_ID = T5.GUID AND
|
||||
W_T.RECORD_ID = REC.GUID AND
|
||||
T.ENTITY_ID = REC.FORM_ID AND
|
||||
|
||||
|
||||
W_T.WF_ID = R.GUID AND
|
||||
R.GUID = R.GUID AND
|
||||
|
||||
|
||||
|
||||
T3.GUID = T4.FORM_ID AND
|
||||
W_T.STATE_ID = T5.GUID AND
|
||||
T4.SCREEN_ID = 1 AND
|
||||
((T.FINAL = 1 AND W_T.DUE_DATE IS NULL) OR T.FINAL = 0) AND
|
||||
W_T.ACTIVE = 1
|
||||
ORDER BY W_T.RECORD_ID,W_T.GUID
|
||||
|
||||
GO
|
||||
ALTER TRIGGER [dbo].[TBPMO_FORM_AFT_INS] ON [dbo].[TBPMO_FORM]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@FORM_ID INTEGER,
|
||||
@FORM_TYPE INTEGER,
|
||||
@ADDED_WHO VARCHAR(50)
|
||||
--@SQL_RECORD1 VARCHAR(500),
|
||||
--@SQL_RECORD2 VARCHAR(500)
|
||||
SELECT
|
||||
@FORM_ID = GUID,
|
||||
@FORM_TYPE = FORM_TYPE_ID,
|
||||
@ADDED_WHO = ADDED_WHO
|
||||
FROM INSERTED
|
||||
|
||||
IF @FORM_TYPE = 5
|
||||
BEGIN
|
||||
INSERT INTO TBPMO_CONTROL (
|
||||
FORM_ID, CONTROL_TYPE_ID, DEFAULT_VALUE, NAME, [COL_NAME]) VALUES (
|
||||
@FORM_ID,2,'GROUP_RECORD','txtGROUP_RECORD','GROUP_RECORD')
|
||||
DECLARE @CTRL_ID INTEGER
|
||||
SELECT @CTRL_ID = MAX(GUID) FROM TBPMO_CONTROL WHERE FORM_ID = @FORM_ID
|
||||
INSERT INTO TBPMO_CONTROL_SCREEN (
|
||||
CONTROL_ID, SCREEN_ID, CONTROL_TEXT, X_LOC, Y_LOC, HEIGHT, WIDTH, TAB_INDEX) VALUES (
|
||||
@CTRL_ID, 1, 'GROUP_RECORD', 5, 5, 22, 100,1)
|
||||
END
|
||||
|
||||
--EXEC dbo.PRPMO_CREATE_SQL @FORM_ID
|
||||
--EXEC dbo.PRPMO_CREATE_TEMP_VIEWS
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
BEGIN TRY
|
||||
INSERT INTO TBPMO_CLIENT_ENTITY (CLIENT_ID,ENTITY_ID)
|
||||
SELECT T.CLIENT_ID,@FORM_ID FROM TBDD_CLIENT_USER T, TBDD_USER T1 WHERE T.USER_ID = T1.GUID AND UPPER(T1.USERNAME) = UPPER(@ADDED_WHO)
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR INSERTING TBPMO_CLIENT_ENTITY-ERROR-MESSAGE: ' + CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
|
||||
|
||||
|
||||
GO
|
||||
|
||||
|
||||
240
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.3.sql
Normal file
240
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.3.sql
Normal file
@@ -0,0 +1,240 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.5.3' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
|
||||
ALTER TABLE TBPMO_FORM
|
||||
ADD DATE_FORMAT VARCHAR(10) NOT NULL DEFAULT'dd-MM-yyyy'
|
||||
GO
|
||||
ALTER PROCEDURE [dbo].[PRPMO_CREATE_SQL](@pFORM_ID INT)
|
||||
AS
|
||||
DECLARE @COL_NAME VARCHAR(50),
|
||||
@SQL_BEGIN VARCHAR(1000),
|
||||
@SQL_END VARCHAR(2000),
|
||||
@SQL VARCHAR(5000),
|
||||
@CONTROL_ID INT,
|
||||
@RESULT VARCHAR(8000),
|
||||
@TYPEID INT,
|
||||
@TABINDEX INT,
|
||||
@SQL_LBL VARCHAR(2000)
|
||||
|
||||
DECLARE c_SPALTENNAMEN CURSOR FOR SELECT T.GUID,'['+T.COL_NAME+']' AS 'COL_NAME', T2.GUID,T1.TAB_INDEX FROM TBPMO_CONTROL T, TBPMO_CONTROL_SCREEN T1, TBPMO_CONTROL_TYPE T2 WHERE
|
||||
T.SHOW_COLUMN = 1 AND T.[COL_NAME] <> '' AND T.GUID = T1.CONTROL_ID AND T.CONTROL_TYPE_ID = T2.GUID AND T.FORM_ID = @pFORM_ID AND LEN(ISNULL(T.COL_NAME,'')) > 0 and t.CONTROL_TYPE_ID not in (1,5) UNION
|
||||
SELECT T.GUID,'['+T.NAME+']' AS 'COL_NAME', T2.GUID,T1.TAB_INDEX FROM TBPMO_CONTROL T, TBPMO_CONTROL_SCREEN T1, TBPMO_CONTROL_TYPE T2 WHERE
|
||||
T.GUID = T1.CONTROL_ID AND T.CONTROL_TYPE_ID = T2.GUID AND T.FORM_ID = @pFORM_ID and t.CONTROL_TYPE_ID = 1 AND LEN(ISNULL(t.SQL_COMMAND_1,'')) > 0 ORDER BY TAB_INDEX
|
||||
BEGIN
|
||||
SET @SQL_BEGIN = 'SELECT T.GUID AS [Record-ID],T.COLOR AS ROW_COLOR, T.FORM_ID AS [Form-ID],'
|
||||
SET @SQL_END = ',T.ADDED_WHO as AddedWho,T.ADDED_WHEN as AddedWhen, T.CHANGED_WHO As ChangedWho, T.CHANGED_WHEN As ChangedWhen FROM TBPMO_RECORD T, TBPMO_FORM T1 WHERE T.FORM_ID = T1.GUID AND T.FORM_ID = @FORM_ID'
|
||||
|
||||
SET @SQL_END = REPLACE(@SQL_END,'@FORM_ID',@pFORM_ID)
|
||||
|
||||
OPEN c_SPALTENNAMEN
|
||||
FETCH NEXT FROM c_SPALTENNAMEN INTO @CONTROL_ID,@COL_NAME,@TYPEID,@TABINDEX
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SET @COL_NAME = REPLACE(@COL_NAME,'lbl','')
|
||||
IF LEN(ISNULL(@SQL,'')) = 0
|
||||
BEGIN
|
||||
IF @TYPEID = 10 OR @TYPEID = 11
|
||||
SET @SQL = 'ISNULL((SELECT CASE WHEN UPPER(RTRIM(LTRIM(T5.VALUE))) = ''TRUE'' THEN 1 ELSE 0 END FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + '),0) AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 6
|
||||
SET @SQL = '(SELECT T6.IMG FROM TBPMO_CONTROL_IMAGE T6 WHERE T6.RECORD_ID = T.GUID AND T6.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 1
|
||||
BEGIN
|
||||
SELECT @SQL_LBL = SQL_COMMAND_1 FROM TBPMO_CONTROL WHERE GUID = @CONTROL_ID
|
||||
SET @SQL_LBL = REPLACE(UPPER(@SQL_LBL),'@RECORD_ID','T.GUID')
|
||||
SET @SQL = '(' + @SQL_LBL + ') AS ' + @COL_NAME
|
||||
END
|
||||
ELSE IF @TYPEID = 12 OR @TYPEID = 7 OR @TYPEID = 14
|
||||
SET @SQL = '(SELECT [dbo].[FNPMO_GET_CONTROL_VALUES](' + CONVERT(VARCHAR(20),@CONTROL_ID) + ', T.GUID)) AS ' + @COL_NAME
|
||||
ELSE
|
||||
SET @SQL = '(SELECT T5.VALUE FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
IF (@TYPEID = 10) OR (@TYPEID = 11)
|
||||
SET @SQL = @SQL + ',ISNULL((SELECT CASE WHEN UPPER(RTRIM(LTRIM(T5.VALUE))) = ''TRUE'' THEN 1 ELSE 0 END FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + '),0) AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 6
|
||||
SET @SQL = @SQL + ',(SELECT T6.IMG FROM TBPMO_CONTROL_IMAGE T6 WHERE T6.RECORD_ID = T.GUID AND T6.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
ELSE IF @TYPEID = 1
|
||||
BEGIN
|
||||
SELECT @SQL_LBL = SQL_COMMAND_1 FROM TBPMO_CONTROL WHERE GUID = @CONTROL_ID
|
||||
SET @SQL_LBL = REPLACE(UPPER(@SQL_LBL),'@RECORD_ID','T.GUID')
|
||||
SET @SQL = @SQL + ',(' + @SQL_LBL + ') AS ' + @COL_NAME
|
||||
END
|
||||
ELSE IF @TYPEID = 12 OR @TYPEID = 7 OR @TYPEID = 14
|
||||
SET @SQL = @SQL + ',(SELECT [dbo].[FNPMO_GET_CONTROL_VALUES](' + CONVERT(VARCHAR(20),@CONTROL_ID) + ', T.GUID)) AS ' + @COL_NAME
|
||||
ELSE
|
||||
SET @SQL = @SQL + ',(SELECT T5.VALUE FROM TBPMO_CONTROL_VALUE T5 WHERE T5.RECORD_ID = T.GUID AND T5.CONTROL_ID = ' + CONVERT(VARCHAR(20),@CONTROL_ID) + ') AS ' + @COL_NAME
|
||||
END
|
||||
|
||||
FETCH NEXT FROM c_SPALTENNAMEN INTO @CONTROL_ID,@COL_NAME,@TYPEID,@TABINDEX
|
||||
END
|
||||
|
||||
CLOSE c_SPALTENNAMEN
|
||||
DEALLOCATE c_SPALTENNAMEN
|
||||
|
||||
SET @RESULT = @SQL_BEGIN + @SQL + @SQL_END
|
||||
|
||||
IF EXISTS (SELECT FORM_ID FROM TBPMO_FORM_SQL WHERE FORM_ID = @pFORM_ID)
|
||||
UPDATE TBPMO_FORM_SQL SET SQL_COMMAND = @RESULT WHERE FORM_ID = @pFORM_ID
|
||||
ELSE
|
||||
INSERT INTO TBPMO_FORM_SQL(FORM_ID,SQL_COMMAND) VALUES(@pFORM_ID,@RESULT)
|
||||
END
|
||||
GO
|
||||
CREATE PROCEDURE [dbo].[PRPMO_DELETE_CONSTRUCTOR](@pCONSTR_ID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_CLIENT_CONSTRUCTOR WHERE CONSTRUCT_ID = @pCONSTR_ID
|
||||
DELETE FROM TBPMO_CONSTRUCTOR_USER WHERE CONSTRUCT_ID = @pCONSTR_ID
|
||||
DELETE FROM TBPMO_FOLLUPEMAIL_RECORD WHERE FOLLOW_UP_ID IN (SELECT GUID FROM TBPMO_FOLLOW_UP_EMAIL WHERE CONSTRUCTOR_ID = @pCONSTR_ID)
|
||||
DELETE FROM TBPMO_FOLLOW_UP_EMAIL WHERE CONSTRUCTOR_ID = @pCONSTR_ID
|
||||
DELETE FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE CONSTRUCT_ID = @pCONSTR_ID
|
||||
DELETE FROM TBPMO_FORM_CONSTRUCTOR WHERE GUID = @pCONSTR_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
ALTER PROCEDURE [dbo].[PRPMO_CREATE_CONSTRUCTOR](@pFORM_ID INT, @pNAME VARCHAR(50))
|
||||
AS
|
||||
DECLARE
|
||||
@NEW_CONSTR_ID INTEGER,
|
||||
@FORM_ID INTEGER,
|
||||
@PARENT_ID INTEGER,
|
||||
@PARENT_ID2 INTEGER,
|
||||
@LEVEL1_SELECT INTEGER,
|
||||
@SEQUENCE INTEGER,
|
||||
@SEQUENCE2 INTEGER,
|
||||
@SQL_SELECT_EBENE1 VARCHAR(4000)
|
||||
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_FORM_CONSTRUCTOR WHERE UPPER(FORM_TITLE) = UPPER(@pNAME))
|
||||
INSERT INTO TBPMO_FORM_CONSTRUCTOR (FORM_TITLE,SEQUENCE_MENU,ADDED_WHO, SHORT_TITLE) VALUES
|
||||
(@pNAME,1, 'CREATE_ROUTINE','SHORT-TITLE')
|
||||
|
||||
SELECT @NEW_CONSTR_ID = MAX(GUID) FROM TBPMO_FORM_CONSTRUCTOR WHERE UPPER(FORM_TITLE) = UPPER(@pNAME)
|
||||
|
||||
PRINT 'INSERT1 DURCH'
|
||||
|
||||
|
||||
PRINT 'INSERT2 DURCH'
|
||||
DECLARE c_ENTITY1 CURSOR FOR
|
||||
SELECT
|
||||
T.GUID, T.PARENT_ID, T.LEVEL
|
||||
FROM TBPMO_FORM T, TBPMO_FORM_VIEW T1 WHERE T.GUID = T1.FORM_ID AND T.SHOW_FORM_CONSTRUCT = 1 AND T1.SCREEN_ID = 1 AND T.PARENT_ID = @pFORM_ID ORDER BY T.LEVEL
|
||||
BEGIN
|
||||
OPEN c_ENTITY1
|
||||
FETCH NEXT FROM c_ENTITY1 INTO @FORM_ID,@PARENT_ID,@SEQUENCE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE CONSTRUCT_ID = @NEW_CONSTR_ID AND FORM_ID = @FORM_ID AND PARENT_ID = @PARENT_ID)
|
||||
BEGIN
|
||||
PRINT 'c_ENTITY1: SELECT * FROM TBPMO_FORM WHERE PARENT_ID = @' + CONVERT(VARCHAR(3),@FORM_ID)
|
||||
INSERT INTO TBPMO_FORM_CONSTRUCTOR_DETAIL (
|
||||
CONSTRUCT_ID
|
||||
,FORM_ID
|
||||
,PARENT_ID
|
||||
,LEVEL1_SELECT
|
||||
,SEQUENCE
|
||||
,SQL_SELECT_EBENE1
|
||||
,SQL_SELECT_EBENE2
|
||||
,ADDED_WHO
|
||||
) VALUES (
|
||||
@NEW_CONSTR_ID
|
||||
,@FORM_ID
|
||||
,@PARENT_ID
|
||||
,0
|
||||
,@SEQUENCE
|
||||
,'SELECT * FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@FORM_ID)
|
||||
,'SELECT T.* FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@PARENT_ID) + ' AS T, TBPMO_RECORD_CONNECT T1 WHERE T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = @RecordID'
|
||||
,'CREATE_ROUTINE2'
|
||||
)
|
||||
END
|
||||
|
||||
If EXISTS(SELECT * FROM TBPMO_FORM WHERE PARENT_ID = @FORM_ID)
|
||||
BEGIN
|
||||
PRINT 'c_ENTITY2: SELECT * FROM TBPMO_FORM WHERE PARENT_ID = ' + CONVERT(VARCHAR(3),@FORM_ID)
|
||||
--###############
|
||||
DECLARE c_ENTITY2 CURSOR FOR
|
||||
SELECT
|
||||
T.GUID, T.PARENT_ID, T.LEVEL
|
||||
FROM TBPMO_FORM T, TBPMO_FORM_VIEW T1 WHERE T.GUID = T1.FORM_ID AND T.SHOW_FORM_CONSTRUCT = 1 AND T1.SCREEN_ID = 1 AND T.PARENT_ID = @FORM_ID ORDER BY T.LEVEL
|
||||
BEGIN
|
||||
OPEN c_ENTITY2
|
||||
FETCH NEXT FROM c_ENTITY2 INTO @FORM_ID,@PARENT_ID2,@SEQUENCE2
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
INSERT INTO TBPMO_FORM_CONSTRUCTOR_DETAIL (
|
||||
CONSTRUCT_ID
|
||||
,FORM_ID
|
||||
,PARENT_ID
|
||||
,LEVEL1_SELECT
|
||||
,SEQUENCE
|
||||
,SQL_SELECT_EBENE1
|
||||
,SQL_SELECT_EBENE2
|
||||
,ADDED_WHO
|
||||
) VALUES (
|
||||
@NEW_CONSTR_ID
|
||||
,@FORM_ID
|
||||
,@PARENT_ID2
|
||||
,0
|
||||
,@SEQUENCE2
|
||||
,'SELECT * FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@FORM_ID)
|
||||
,'SELECT T.* FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@PARENT_ID2) + ' AS T, TBPMO_RECORD_CONNECT T1 WHERE T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = @RecordID'
|
||||
,'CREATE_ROUTINE3'
|
||||
)
|
||||
FETCH NEXT FROM c_ENTITY2 INTO @FORM_ID,@PARENT_ID2,@SEQUENCE2
|
||||
END
|
||||
CLOSE c_ENTITY2
|
||||
DEALLOCATE c_ENTITY2
|
||||
END
|
||||
END
|
||||
--###############
|
||||
|
||||
FETCH NEXT FROM c_ENTITY1 INTO @FORM_ID,@PARENT_ID,@SEQUENCE
|
||||
END
|
||||
|
||||
CLOSE c_ENTITY1
|
||||
DEALLOCATE c_ENTITY1
|
||||
END
|
||||
GO
|
||||
CREATE VIEW [dbo].[VWPMO_CONTROL_HINT] AS
|
||||
SELECT
|
||||
T2.FORM_ID,
|
||||
T1.CONTROL_ID,
|
||||
T.HINT
|
||||
FROM
|
||||
TBPMO_CONTROL_LANGUAGE T,
|
||||
TBPMO_CONTROL_SCREEN T1,
|
||||
TBPMO_CONTROL T2
|
||||
WHERE
|
||||
T.CONTROL_SCREEN_ID = T1.GUID
|
||||
AND T1.CONTROL_ID = T2.GUID
|
||||
AND T1.SCREEN_ID = 1
|
||||
AND (HINT IS NOT NULL AND HINT <> '')
|
||||
GO
|
||||
ALTER PROCEDURE [dbo].[PRPMO_DELETE_ENTITY](@pENTITY_ID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_FORM_SQL WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_CLIENT_ENTITY WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_WORKFLOW_ENTITY_STATE WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_TEMPLATE_ENTITY WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_CONTROL WHERE FORM_ID = @pENTITY_ID
|
||||
IF OBJECT_ID (N'TBPMO_DOCSEARCH_RESULTLIST_CONFIG', N'U') IS NOT NULL
|
||||
DELETE FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE [ENTITY_ID] = @pENTITY_ID
|
||||
DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD2_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD_LOG WHERE RECORD_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_FORM WHERE GUID = @pENTITY_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
@@ -0,0 +1,60 @@
|
||||
ALTER VIEW [dbo].[VWPMO_WD_DOC_SEARCH] AS
|
||||
SELECT
|
||||
T.dwDocID as DocID
|
||||
,[dbo].[FNPMO_GET_WINDREAM_VKT_INT](T.dwDocID,20006) AS [ENTITY_ID]
|
||||
,[dbo].[FNPMO_GET_WINDREAM_VKT_INT](T.dwDocID,20005) AS [RECORD_ID]
|
||||
,T.dwInteger24 AS [PARENT_ID]
|
||||
,dbo.FNPMO_GET_WINDREAM_FILE_PATH (T.dwDocID) + T.szLongName AS FULL_FILENAME
|
||||
,szLongName as [Filename],
|
||||
T.szText39 AS Doctype
|
||||
,T.dwVersionNumber AS [Version]
|
||||
,CAST(CAST(CONVERT(DATE,CONVERT(VARCHAR(10),T.dwCreationDate)) AS DATETIME) + CAST(STUFF(STUFF(REPLICATE('0',6-LEN(T.dwCreation_Time)) + convert(VARCHAR(6),T.dwCreation_Time),3,0,':'),6,0,':') AS DATETIME) AS DATETIME) AS Creation_DateTime
|
||||
,T1.szDocTypeName AS OBJECTTYPE
|
||||
FROM
|
||||
[172.24.12.41\BRAINPOOL].windream60.dbo.BaseAttributes T
|
||||
,[172.24.12.41\BRAINPOOL].windream60.dbo.ObjectType T1
|
||||
WHERE
|
||||
T.dwObjectTypeID = T1.dwObjectTypeID
|
||||
AND T.dwInteger23 is not null
|
||||
|
||||
GO
|
||||
|
||||
USE [DD_ECM]
|
||||
GO
|
||||
ALTER FUNCTION [dbo].[FNPMO_GET_WINDREAM_VKT_INT](@pdwDocID INTEGER,@pdwAttributID INTEGER)
|
||||
RETURNS VARCHAR(4000)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE
|
||||
@RESULT VARCHAR(4000),
|
||||
@VALUE INTEGER
|
||||
|
||||
|
||||
|
||||
DECLARE c_RESULT CURSOR FOR SELECT [dwValue] FROM [172.24.12.41\BRAINPOOL].windream60.[dbo].[Vector]
|
||||
where dwDocID = @pdwDocID and dwAttrID = @pdwAttributID
|
||||
|
||||
|
||||
BEGIN
|
||||
OPEN c_RESULT
|
||||
FETCH NEXT FROM c_RESULT INTO @VALUE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF LEN(@RESULT) > 0
|
||||
SET @RESULT = @RESULT + '#' + CONVERT(VARCHAR(30),@VALUE)
|
||||
ELSE
|
||||
SET @RESULT = '#' + CONVERT(VARCHAR(30),@VALUE)
|
||||
FETCH NEXT FROM c_RESULT INTO @VALUE
|
||||
END
|
||||
|
||||
CLOSE c_RESULT
|
||||
DEALLOCATE c_RESULT
|
||||
|
||||
RETURN(@RESULT)
|
||||
END
|
||||
END
|
||||
|
||||
|
||||
|
||||
|
||||
340
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.4.sql
Normal file
340
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.4.sql
Normal file
@@ -0,0 +1,340 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.5.4' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
CREATE TABLE TBPMO_DOCSEARCH_RESULTLIST_CONFIG
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
[ENTITY_ID] INTEGER NOT NULL,
|
||||
[LANGUAGE] VARCHAR(5) NOT NULL DEFAULT 'de-DE',
|
||||
COLUMN_VIEW VARCHAR(100) NOT NULL,
|
||||
HEADER_CAPTION VARCHAR(100) NOT NULL,
|
||||
WIDTH INTEGER NOT NULL DEFAULT 250,
|
||||
[TYPE_ID] TINYINT NOT NULL DEFAULT 1,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_DOCSEARCH_RESULTLIST_CONFIG PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_DOCSEARCH_RESULTLIST_CONFIG_ENTITY_ID FOREIGN KEY (ENTITY_ID) REFERENCES TBPMO_FORM (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_DOCSEARCH_RESULTLIST_CONFIG_AFT_UPD ON TBPMO_DOCSEARCH_RESULTLIST_CONFIG
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_DOCSEARCH_RESULTLIST_CONFIG SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_DOCSEARCH_RESULTLIST_CONFIG.GUID = INSERTED.GUID
|
||||
GO
|
||||
CREATE TABLE TBPMO_DOCSEARCH_VARIABLE_CONTROLS (
|
||||
GUID INT IDENTITY(1,1) NOT NULL,
|
||||
[ENTITY_ID] INT NOT NULL,
|
||||
OPTION1_CTRL INT NOT NULL DEFAULT 0,
|
||||
OPTION2_CTRL INT NOT NULL DEFAULT 0,
|
||||
OPTION3_CTRL INT NOT NULL DEFAULT 0,
|
||||
PTION4_CTRL INT NOT NULL DEFAULT 0,
|
||||
OPTION5_CTRL INT NOT NULL DEFAULT 0,
|
||||
OPTION6_CTRL INT NOT NULL DEFAULT 0,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT ('DEFAULT'),
|
||||
ADDED_WHEN DATETIME NULL DEFAULT (GETDATE()),
|
||||
CHANGED_WHO VARCHAR(50) NULL,
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_DOCSEARCH_VARIABLE_CONTROLS PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_DOCSEARCH_VARIABLE_CONTROLS_ENTITY_ID FOREIGN KEY (ENTITY_ID) REFERENCES TBPMO_FORM (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_DOCSEARCH_VARIABLE_CONTROLS_AFT_UPD ON TBPMO_DOCSEARCH_VARIABLE_CONTROLS
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_DOCSEARCH_VARIABLE_CONTROLS SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_DOCSEARCH_VARIABLE_CONTROLS.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_STRUCTURE_NODES
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
[ENTITY_ID] INTEGER NOT NULL,
|
||||
RECORD_ID INTEGER,
|
||||
ID1 VARCHAR(100) NOT NULL,
|
||||
ID2 VARCHAR(100),
|
||||
ID3 VARCHAR(100),
|
||||
ID4 VARCHAR(100),
|
||||
[TYPE_NODE] SMALLINT NOT NULL DEFAULT 1,
|
||||
CONTROL_ID INTEGER NOT NULL DEFAULT 0,
|
||||
PARENT_GUID INTEGER NOT NULL DEFAULT 0,
|
||||
BOOL1 BIT NOT NULL DEFAULT 0,
|
||||
BOOL2 BIT NOT NULL DEFAULT 0,
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_STRUCTURE_NODES PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_STRUCTURE_NODESG_ENTITY_ID FOREIGN KEY (ENTITY_ID) REFERENCES TBPMO_FORM (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_STRUCTURE_NODES_AFT_UPD ON TBPMO_STRUCTURE_NODES
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_STRUCTURE_NODES SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_STRUCTURE_NODES.GUID = INSERTED.GUID
|
||||
GO
|
||||
CREATE TABLE TBPMO_STRUCTURE_NODES_CONFIGURATION
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
NAME VARCHAR(50) NOT NULL,
|
||||
[ENTITY_ID] INTEGER NOT NULL,
|
||||
[TYPE_NODE] SMALLINT NOT NULL DEFAULT 1,
|
||||
NODE_IMAGE VARBINARY(MAX),
|
||||
CREATE_RECORD BIT NOT NULL DEFAULT 0,
|
||||
COMMENT VARCHAR(300),
|
||||
ADDED_WHO VARCHAR(50) NOT NULL DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_STRUCTURE_NODES_CONFIGURATION PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_STRUCTURE_NODES_CONFIGURATION_ENTITY_ID FOREIGN KEY (ENTITY_ID) REFERENCES TBPMO_FORM (GUID)
|
||||
)
|
||||
GO
|
||||
CREATE TRIGGER TBPMO_STRUCTURE_NODES_CONFIGURATION_AFT_UPD ON TBPMO_STRUCTURE_NODES_CONFIGURATION
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_STRUCTURE_NODES_CONFIGURATION SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_STRUCTURE_NODES_CONFIGURATION.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
ALTER PROCEDURE [dbo].[PRPMO_DELETE_ENTITY](@pENTITY_ID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_FORM_SQL WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_CLIENT_ENTITY WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_WORKFLOW_ENTITY_STATE WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_TEMPLATE_ENTITY WHERE ENTITY_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_CONTROL WHERE FORM_ID = @pENTITY_ID
|
||||
IF OBJECT_ID (N'TBPMO_DOCSEARCH_RESULTLIST_CONFIG', N'U') IS NOT NULL
|
||||
DELETE FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE [ENTITY_ID] = @pENTITY_ID
|
||||
IF OBJECT_ID (N'TBPMO_STRUCTURE_NODES', N'U') IS NOT NULL
|
||||
DELETE FROM TBPMO_STRUCTURE_NODES WHERE [ENTITY_ID] = @pENTITY_ID
|
||||
DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD2_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD_LOG WHERE RECORD_ID in (SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID)
|
||||
DELETE FROM TBPMO_RECORD WHERE FORM_ID = @pENTITY_ID
|
||||
DELETE FROM TBPMO_FORM WHERE GUID = @pENTITY_ID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
USE [DD_ECM]
|
||||
GO
|
||||
/****** Object: StoredProcedure [dbo].[PRPMO_CREATE_CONSTRUCTOR] Script Date: 30.06.2016 15:01:24 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
ALTER PROCEDURE [dbo].[PRPMO_CREATE_CONSTRUCTOR](@pFORM_ID INT, @pNAME VARCHAR(50))
|
||||
AS
|
||||
DECLARE
|
||||
@NEW_CONSTR_ID INTEGER,
|
||||
@FORM_ID INTEGER,
|
||||
@PARENT_ID INTEGER,
|
||||
@PARENT_ID2 INTEGER,
|
||||
@LEVEL1_SELECT INTEGER,
|
||||
@SEQUENCE INTEGER,
|
||||
@SEQUENCE2 INTEGER,
|
||||
@SQL_SELECT_EBENE1 VARCHAR(4000)
|
||||
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_FORM_CONSTRUCTOR WHERE UPPER(FORM_TITLE) = UPPER(@pNAME))
|
||||
INSERT INTO TBPMO_FORM_CONSTRUCTOR (FORM_TITLE,SEQUENCE_MENU,ADDED_WHO, SHORT_TITLE) VALUES
|
||||
(@pNAME,1, 'CREATE_ROUTINE','SHORT-TITLE')
|
||||
|
||||
SELECT @NEW_CONSTR_ID = MAX(GUID) FROM TBPMO_FORM_CONSTRUCTOR WHERE UPPER(FORM_TITLE) = UPPER(@pNAME)
|
||||
|
||||
DECLARE c_ENTITY0 CURSOR FOR
|
||||
SELECT T.GUID,T.LEVEL FROM TBPMO_FORM T, TBPMO_FORM_VIEW T1 WHERE
|
||||
T.GUID = T1.FORM_ID AND T.SHOW_FORM_CONSTRUCT = 1 AND T1.SCREEN_ID = 1 AND T.PARENT_ID = 0 AND T.GUID = @pFORM_ID ORDER BY T.LEVEL
|
||||
BEGIN
|
||||
OPEN c_ENTITY0
|
||||
FETCH NEXT FROM c_ENTITY0 INTO @FORM_ID,@SEQUENCE
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE CONSTRUCT_ID = @NEW_CONSTR_ID AND FORM_ID = @FORM_ID AND PARENT_ID = 0)
|
||||
INSERT INTO TBPMO_FORM_CONSTRUCTOR_DETAIL (
|
||||
CONSTRUCT_ID
|
||||
,FORM_ID
|
||||
,PARENT_ID
|
||||
,LEVEL1_SELECT
|
||||
,SEQUENCE
|
||||
,SQL_SELECT_EBENE1
|
||||
,SQL_SELECT_EBENE2
|
||||
,ADDED_WHO
|
||||
) VALUES (
|
||||
@NEW_CONSTR_ID
|
||||
,@FORM_ID
|
||||
,0
|
||||
,0
|
||||
,0
|
||||
,'SELECT * FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@FORM_ID)
|
||||
,''
|
||||
,'CREATE_ROUTINE2'
|
||||
)
|
||||
FETCH NEXT FROM c_ENTITY0 INTO @FORM_ID,@SEQUENCE
|
||||
END
|
||||
END
|
||||
CLOSE c_ENTITY0
|
||||
DEALLOCATE c_ENTITY0
|
||||
|
||||
DECLARE c_ENTITY1 CURSOR FOR
|
||||
SELECT
|
||||
T.GUID, T.PARENT_ID, T.LEVEL
|
||||
FROM TBPMO_FORM T, TBPMO_FORM_VIEW T1 WHERE T.GUID = T1.FORM_ID AND T.SHOW_FORM_CONSTRUCT = 1 AND T1.SCREEN_ID = 1 AND T.PARENT_ID = @FORM_ID ORDER BY T.LEVEL
|
||||
BEGIN
|
||||
OPEN c_ENTITY1
|
||||
FETCH NEXT FROM c_ENTITY1 INTO @FORM_ID,@PARENT_ID,@SEQUENCE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE CONSTRUCT_ID = @NEW_CONSTR_ID AND FORM_ID = @FORM_ID AND PARENT_ID = @PARENT_ID)
|
||||
BEGIN
|
||||
PRINT 'c_ENTITY1: SELECT * FROM TBPMO_FORM WHERE PARENT_ID = @' + CONVERT(VARCHAR(3),@FORM_ID)
|
||||
INSERT INTO TBPMO_FORM_CONSTRUCTOR_DETAIL (
|
||||
CONSTRUCT_ID
|
||||
,FORM_ID
|
||||
,PARENT_ID
|
||||
,LEVEL1_SELECT
|
||||
,SEQUENCE
|
||||
,SQL_SELECT_EBENE1
|
||||
,SQL_SELECT_EBENE2
|
||||
,ADDED_WHO
|
||||
) VALUES (
|
||||
@NEW_CONSTR_ID
|
||||
,@FORM_ID
|
||||
,@PARENT_ID
|
||||
,0
|
||||
,@SEQUENCE
|
||||
,'SELECT * FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@FORM_ID)
|
||||
,'SELECT T.* FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@PARENT_ID) + ' AS T, TBPMO_RECORD_CONNECT T1 WHERE T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = @RecordID'
|
||||
,'CREATE_ROUTINE2'
|
||||
)
|
||||
END
|
||||
|
||||
If EXISTS(SELECT * FROM TBPMO_FORM WHERE PARENT_ID = @FORM_ID)
|
||||
BEGIN
|
||||
PRINT 'c_ENTITY2: SELECT * FROM TBPMO_FORM WHERE PARENT_ID = ' + CONVERT(VARCHAR(3),@FORM_ID)
|
||||
--###############
|
||||
DECLARE c_ENTITY2 CURSOR FOR
|
||||
SELECT
|
||||
T.GUID, T.PARENT_ID, T.LEVEL
|
||||
FROM TBPMO_FORM T, TBPMO_FORM_VIEW T1 WHERE T.GUID = T1.FORM_ID AND T.SHOW_FORM_CONSTRUCT = 1 AND T1.SCREEN_ID = 1 AND T.PARENT_ID = @FORM_ID ORDER BY T.LEVEL
|
||||
BEGIN
|
||||
OPEN c_ENTITY2
|
||||
FETCH NEXT FROM c_ENTITY2 INTO @FORM_ID,@PARENT_ID2,@SEQUENCE2
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
INSERT INTO TBPMO_FORM_CONSTRUCTOR_DETAIL (
|
||||
CONSTRUCT_ID
|
||||
,FORM_ID
|
||||
,PARENT_ID
|
||||
,LEVEL1_SELECT
|
||||
,SEQUENCE
|
||||
,SQL_SELECT_EBENE1
|
||||
,SQL_SELECT_EBENE2
|
||||
,ADDED_WHO
|
||||
) VALUES (
|
||||
@NEW_CONSTR_ID
|
||||
,@FORM_ID
|
||||
,@PARENT_ID2
|
||||
,0
|
||||
,@SEQUENCE2
|
||||
,'SELECT * FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@FORM_ID)
|
||||
,'SELECT T.* FROM VWTEMP_PMO_FORM' + CONVERT(VARCHAR(5),@PARENT_ID2) + ' AS T, TBPMO_RECORD_CONNECT T1 WHERE T.[Record-ID] = T1.RECORD2_ID AND T1.RECORD1_ID = @RecordID'
|
||||
,'CREATE_ROUTINE3'
|
||||
)
|
||||
FETCH NEXT FROM c_ENTITY2 INTO @FORM_ID,@PARENT_ID2,@SEQUENCE2
|
||||
END
|
||||
CLOSE c_ENTITY2
|
||||
DEALLOCATE c_ENTITY2
|
||||
END
|
||||
END
|
||||
--###############
|
||||
|
||||
FETCH NEXT FROM c_ENTITY1 INTO @FORM_ID,@PARENT_ID,@SEQUENCE
|
||||
END
|
||||
|
||||
CLOSE c_ENTITY1
|
||||
DEALLOCATE c_ENTITY1
|
||||
END
|
||||
GO
|
||||
ALTER VIEW [dbo].[VWPMO_CONSTRUCTOR_FORMS] AS
|
||||
SELECT TOP 100 PERCENT
|
||||
T2.GUID,
|
||||
T1.GUID FORM_VIEW_ID,
|
||||
T1.SCREEN_ID,
|
||||
T2.CONSTRUCT_ID,
|
||||
T.PARENT_ID,
|
||||
T2.SEQUENCE,
|
||||
T2.LEVEL1_SELECT,
|
||||
T.GUID AS FORM_ID,
|
||||
T1.FORM_TITLE,
|
||||
T2.SQL_SELECT_EBENE1,
|
||||
T2.SQL_SELECT_EBENE2,
|
||||
T2.SQL_QUICK_VIEW,
|
||||
T2.COLUMN_NAME1,
|
||||
T2.COLUMN_NAME2,
|
||||
T.FORM_TYPE_ID,
|
||||
T2.LOAD_DIRECT,
|
||||
T2.CONTROL_DOCTYPE_MATCH,
|
||||
T2.SQL_RIGHT_READ_AND_VIEW_ONLY,
|
||||
T2.SQL_RIGHT_WINDREAM_VIEW,
|
||||
(SELECT COUNT(GUID) FROm TBPMO_CONTROL WHERE FORM_ID = T1.FORM_ID AND TREE_VIEW = 1) AS COUNT_TREEVIEW
|
||||
FROM
|
||||
tbpmo_form T,
|
||||
TBPMO_FORM_VIEW T1,
|
||||
TBPMO_FORM_CONSTRUCTOR_DETAIL T2
|
||||
where
|
||||
T2.FORM_ID = T.GUID AND
|
||||
T.GUID = T1.FORM_ID
|
||||
ORDER BY
|
||||
T2.CONSTRUCT_ID,T.PARENT_ID,T2.SEQUENCE
|
||||
GO
|
||||
ALTER TABLE TBPMO_RECORD
|
||||
ADD NODE_GUID INTEGER
|
||||
GO
|
||||
ALTER TABLE TBPMO_WORKFLOW
|
||||
ADD MANUALLY BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
|
||||
ALTER TRIGGER [dbo].[TBPMO_RECORD_AFT_INS] ON [dbo].[TBPMO_RECORD]
|
||||
WITH EXECUTE AS CALLER
|
||||
FOR INSERT
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE
|
||||
@RECORD_ID INTEGER,
|
||||
@MAX_ID INTEGER,
|
||||
@FORM_ID INTEGER,
|
||||
@WF_ID INTEGER,
|
||||
@PARENT_ID INTEGER
|
||||
SELECT
|
||||
@FORM_ID = FORM_ID,
|
||||
@RECORD_ID = GUID
|
||||
FROM INSERTED
|
||||
|
||||
IF EXISTS(SELECT GUID FROM TBPMO_RECORD WHERE FORM_ID = @FORM_ID AND GUID <> @RECORD_ID)
|
||||
SELECT @MAX_ID = MAX(RECORD_ENTITY_ID) + 1
|
||||
FROM TBPMO_RECORD WHERE FORM_ID = @FORM_ID AND GUID <> @RECORD_ID
|
||||
ELSE
|
||||
SET @MAX_ID = 1
|
||||
|
||||
UPDATE TBPMO_RECORD SET RECORD_ENTITY_ID = @MAX_ID FROM INSERTED WHERE TBPMO_RECORD.GUID = INSERTED.GUID
|
||||
|
||||
----Überprüfen ob für die Entity_ID Workflows definiert sind?
|
||||
IF EXISTS(
|
||||
SELECT DISTINCT T.[ENTITY_ID] FROM TBPMO_WORKFLOW_ENTITY_STATE T,TBPMO_WORKFLOW T1 where T.WF_ID = T1.GUID AND T1.MANUALLY = 0 AND T.[ENTITY_ID] = @FORM_ID
|
||||
)
|
||||
BEGIN
|
||||
EXECUTE dbo.PRPMO_CREATE_WF_TASKS @FORM_ID, @RECORD_ID
|
||||
END
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
348
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.5.sql
Normal file
348
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.5.sql
Normal file
@@ -0,0 +1,348 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.5.5' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
Create FUNCTION [dbo].[FNPMO_GET_WINDREAM_VKT_INT](@pdwDocID INTEGER,@pdwAttributID INTEGER)
|
||||
RETURNS VARCHAR(4000)
|
||||
AS
|
||||
BEGIN
|
||||
DECLARE
|
||||
@RESULT VARCHAR(4000),
|
||||
@VALUE INTEGER
|
||||
|
||||
|
||||
|
||||
DECLARE c_RESULT CURSOR FOR SELECT [dwValue] FROM [172.24.12.41\BRAINPOOL].[windream60].[dbo].[Vector]
|
||||
where dwDocID = @pdwDocID and dwAttrID = @pdwAttributID
|
||||
|
||||
|
||||
BEGIN
|
||||
OPEN c_RESULT
|
||||
FETCH NEXT FROM c_RESULT INTO @VALUE
|
||||
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF LEN(@RESULT) > 0
|
||||
SET @RESULT = @RESULT + CONVERT(VARCHAR(30),@VALUE) + '#'
|
||||
ELSE
|
||||
SET @RESULT = '#' + CONVERT(VARCHAR(30),@VALUE) + '#'
|
||||
FETCH NEXT FROM c_RESULT INTO @VALUE
|
||||
END
|
||||
|
||||
CLOSE c_RESULT
|
||||
DEALLOCATE c_RESULT
|
||||
|
||||
RETURN(@RESULT)
|
||||
END
|
||||
END
|
||||
|
||||
|
||||
CREATE TABLE TBPMO_INDEX_MAN
|
||||
(
|
||||
GUID INT IDENTITY(1,1),
|
||||
DOCTYPE_ID INT NOT NULL,
|
||||
[ENTITY_ID] INT NOT NULL,
|
||||
NAME VARCHAR(50) NOT NULL,
|
||||
COL_VISIBLE BIT DEFAULT 1 NOT NULL,
|
||||
COLUMN_CAPTION VARCHAR(50) DEFAULT '' NOT NULL,
|
||||
ECM_INDEX VARCHAR(50) DEFAULT '' NOT NULL,
|
||||
COMMENT VARCHAR(250),
|
||||
DATATYPE VARCHAR(50),
|
||||
SUGGESTION BIT DEFAULT 0 NOT NULL, -- 1 - Es wird Eingabe vorgeschlagen, bei 0 - manuelle Eingabe.
|
||||
DEFAULT_VALUE VARCHAR(100) NOT NULL DEFAULT '',
|
||||
CONNECTION_ID SMALLINT DEFAULT 0,
|
||||
SEQUENCE INTEGER NOT NULL DEFAULT 1,
|
||||
SQL_RESULT VARCHAR(2000) NOT NULL DEFAULT '',
|
||||
SQL_CHECK VARCHAR(2000) NOT NULL DEFAULT '',
|
||||
OPTIONAL BIT DEFAULT 0 NOT NULL,
|
||||
SAVE_VALUE BIT DEFAULT 0 NOT NULL,
|
||||
ACTIVE BIT DEFAULT 1 NOT NULL, -- 1 - Index aktiv, bei 0 - inaktiv.
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT' NOT NULL,
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_INDEX_MAN PRIMARY KEY(GUID),
|
||||
CONSTRAINT FK_TBPMO_INDEX_MAN_DOCTYPE_ID FOREIGN KEY(DOCTYPE_ID) REFERENCES TBDD_DOKUMENTART(GUID),
|
||||
CONSTRAINT FK_TBPMO_INDEX_MAN_CID FOREIGN KEY(CONNECTION_ID) REFERENCES TBDD_CONNECTION(GUID)
|
||||
)
|
||||
GO
|
||||
------------------------------------------------------------------------------
|
||||
CREATE TRIGGER TBPMO_INDEX_MAN_AFT_UPD ON TBPMO_INDEX_MAN
|
||||
FOR UPDATE
|
||||
AS
|
||||
BEGIN
|
||||
UPDATE TBPMO_INDEX_MAN SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_INDEX_MAN.GUID = INSERTED.GUID
|
||||
END
|
||||
GO
|
||||
CREATE TABLE TBPMO_DOC_INDICES
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
[DocID] INTEGER NOT NULL,
|
||||
[INDEX_ID] INTEGER NOT NULL,
|
||||
[VALUE] VARCHAR(MAX) NOT NULL,
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_DOC_INDICES PRIMARY KEY (GUID),
|
||||
CONSTRAINT FK_TBPMO_DOC_INDICES_INDEX_ID FOREIGN KEY([INDEX_ID]) REFERENCES TBPMO_INDEX_MAN(GUID),
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_DOC_INDICES_AFT_UPD ON TBPMO_DOC_INDICES
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_DOC_INDICES SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_DOC_INDICES.[DocID] = INSERTED.[DocID]
|
||||
GO
|
||||
ALTER TABLE TBPMO_DOCSEARCH_RESULTLIST_CONFIG
|
||||
ADD VISIBLE BIT NOT NULL DEFAULT 1
|
||||
CREATE TABLE TBPMO_DOCRESULT_LIST
|
||||
(
|
||||
[DocID] INTEGER NOT NULL,
|
||||
[ENTITY_ID] VARCHAR(500) NOT NULL,
|
||||
[RECORD_ID] VARCHAR(500) NOT NULL,
|
||||
[PARENT_ID] VARCHAR(500) NOT NULL,
|
||||
[DISPLAY_NAME] VARCHAR(250) NOT NULL,
|
||||
[FULL_FILENAME] VARCHAR(5000) NOT NULL,
|
||||
[Filename] VARCHAR(500) NOT NULL,
|
||||
[Doctype] VARCHAR(250) NOT NULL,
|
||||
[Version] SMALLINT NOT NULL DEFAULT 0,
|
||||
[Objecttype] VARCHAR(250) NOT NULL,
|
||||
Creation_DateTime DATETIME NOT NULL,
|
||||
Change_DateTime DATETIME,
|
||||
STRING1 VARCHAR(500),
|
||||
STRING2 VARCHAR(500),
|
||||
STRING3 VARCHAR(500),
|
||||
STRING4 VARCHAR(500),
|
||||
STRING5 VARCHAR(500),
|
||||
STRING6 VARCHAR(500),
|
||||
STRING7 VARCHAR(500),
|
||||
STRING8 VARCHAR(500),
|
||||
STRING9 VARCHAR(500),
|
||||
STRING10 VARCHAR(500),
|
||||
IN_WORK BIT NOT NULL DEFAULT 0,
|
||||
IN_WORK_USER VARCHAR(250),
|
||||
IN_WORK_COMMENT VARCHAR(500),
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_DOCRESULT_LIST PRIMARY KEY ([DocID])
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_DOCRESULT_LIST_AFT_UPD ON TBPMO_DOCRESULT_LIST
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_DOCRESULT_LIST SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_DOCRESULT_LIST.[DocID] = INSERTED.[DocID]
|
||||
GO
|
||||
USE [DD_ECM_RENOLIT]
|
||||
GO
|
||||
|
||||
CREATE VIEW [dbo].[VWPMO_WD_DOC_SYNC] AS
|
||||
SELECT
|
||||
T.dwDocID as DocID
|
||||
,[dbo].[FNPMO_GET_WINDREAM_VKT_INT](T.dwDocID,339) AS [ENTITY_ID]
|
||||
,[dbo].[FNPMO_GET_WINDREAM_VKT_INT](T.dwDocID,338) AS [RECORD_ID]
|
||||
,[dbo].[FNPMO_GET_WINDREAM_VKT_INT](T.dwDocID,340) AS [PARENT_ID]
|
||||
,dbo.FNPMO_GET_WINDREAM_FILE_PATH (T.dwDocID) + T.szLongName AS FULL_FILENAME
|
||||
,szLongName as [Filename],
|
||||
T.szText39 AS Doctype
|
||||
,T.dwVersionNumber AS [Version]
|
||||
,CAST(CAST(CONVERT(DATE,CONVERT(VARCHAR(10),T.dwCreationDate)) AS DATETIME) + CAST(STUFF(STUFF(REPLICATE('0',6-LEN(T.dwCreation_Time)) + convert(VARCHAR(6),T.dwCreation_Time),3,0,':'),6,0,':') AS DATETIME) AS DATETIME) AS Creation_DateTime
|
||||
,CAST(CAST(CONVERT(DATE,CONVERT(VARCHAR(10),T.dwChangeDate)) AS DATETIME) + CAST(STUFF(STUFF(REPLICATE('0',6-LEN(T.dwChange_Time)) + convert(VARCHAR(6),T.dwChange_Time),3,0,':'),6,0,':') AS DATETIME) AS DATETIME) AS Change_DateTime
|
||||
,T1.szDocTypeName AS OBJECTTYPE
|
||||
FROM
|
||||
[172.24.12.41\SDD_VMX02_APS02].windream60.dbo.BaseAttributes T
|
||||
,[172.24.12.41\SDD_VMX02_APS02].windream60.dbo.ObjectType T1
|
||||
WHERE
|
||||
--T.dwObjectTypeID > 23 AND
|
||||
T.dwObjectTypeID = T1.dwObjectTypeID
|
||||
AND [dbo].[FNPMO_GET_WINDREAM_VKT_INT](T.dwDocID,338) is not null
|
||||
|
||||
GO
|
||||
|
||||
|
||||
---
|
||||
|
||||
CREATE PROCEDURE [dbo].[PRPMO_DOCRESULT_CREATE]
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE @DocID INTEGER,
|
||||
@ENTITY_ID VARCHAR(500),
|
||||
@RECORD_ID VARCHAR(500),
|
||||
@PARENT_ID VARCHAR(500),
|
||||
@DISPLAY_NAME VARCHAR(250),
|
||||
@FULL_FILENAME VARCHAR(5000),
|
||||
@Filename VARCHAR(500),
|
||||
@Doctype VARCHAR(250),
|
||||
@Version SMALLINT,
|
||||
@Objecttype VARCHAR(250),
|
||||
@Creation_DateTime DATETIME,
|
||||
@Change_DateTime DATETIME
|
||||
DECLARE c_Values CURSOR LOCAL FOR
|
||||
select DocID,ISNULL([ENTITY_ID],0),RECORD_ID,ISNULL(PARENT_ID,0),[Filename],REPLACE(REPLACE(FULL_FILENAME,'\\\','\'),'\\','\'),[Filename],[Doctype],[Version],Objecttype,
|
||||
Creation_DateTime,Change_DateTime from VWPMO_WD_DOC_SEARCH --WHERE CONVERT(DATE,Creation_DateTime) = CONVERT(DATE,GETDATE())
|
||||
OPEN c_Values
|
||||
FETCH NEXT FROM c_Values INTO @DocID,@ENTITY_ID,@RECORD_ID,@PARENT_ID,@Filename,@FULL_FILENAME,
|
||||
@Filename,@Doctype,@Version,@Objecttype,@Creation_DateTime,@Change_DateTime
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT [DocID] FROM TBPMO_DOCRESULT_LIST WHERE DocID = @DocID)
|
||||
INSERT INTO TBPMO_DOCRESULT_LIST (
|
||||
[DocID],
|
||||
[ENTITY_ID],
|
||||
[RECORD_ID],
|
||||
[PARENT_ID],
|
||||
[DISPLAY_NAME],
|
||||
[FULL_FILENAME],
|
||||
[Filename],
|
||||
[Doctype],
|
||||
[Version],
|
||||
[Objecttype],
|
||||
Creation_DateTime,
|
||||
Change_DateTime)
|
||||
VALUES (
|
||||
@DocID,
|
||||
@ENTITY_ID,
|
||||
@RECORD_ID,
|
||||
@PARENT_ID,
|
||||
@Filename,
|
||||
@FULL_FILENAME,
|
||||
@Filename,
|
||||
@Doctype,
|
||||
@Version,
|
||||
@Objecttype,
|
||||
@Creation_DateTime,
|
||||
@Change_DateTime
|
||||
)
|
||||
--#####
|
||||
FETCH NEXT FROM c_Values INTO @DocID,@ENTITY_ID,@RECORD_ID,@PARENT_ID,@Filename,@FULL_FILENAME,
|
||||
@Filename,@Doctype,@Version,@Objecttype,@Creation_DateTime,@Change_DateTime
|
||||
END
|
||||
CLOSE c_Values
|
||||
DEALLOCATE c_Values
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
CREATE PROCEDURE [dbo].[PRPMO_DOCRESULT_CHANGE]
|
||||
AS
|
||||
BEGIN TRY
|
||||
DECLARE @DocID INTEGER,
|
||||
@ENTITY_ID VARCHAR(500),
|
||||
@RECORD_ID VARCHAR(500),
|
||||
@PARENT_ID VARCHAR(500),
|
||||
@DISPLAY_NAME VARCHAR(250),
|
||||
@FULL_FILENAME VARCHAR(5000),
|
||||
@Filename VARCHAR(500),
|
||||
@Doctype VARCHAR(250),
|
||||
@Version SMALLINT,
|
||||
@Objecttype VARCHAR(250),
|
||||
@Creation_DateTime DATETIME,
|
||||
@Change_DateTime DATETIME
|
||||
DECLARE c_Values CURSOR LOCAL FOR
|
||||
select DocID,ISNULL([ENTITY_ID],0),RECORD_ID,ISNULL(PARENT_ID,0),[Filename],REPLACE(REPLACE(FULL_FILENAME,'\\\','\'),'\\','\'),
|
||||
[Filename],ISNULL([Doctype],'') as Doctype,ISNULL([Version],0) as [Version],Objecttype,
|
||||
Creation_DateTime,Change_DateTime from VWPMO_WD_DOC_SYNC WHERE CONVERT(DATE,Creation_DateTime) = CONVERT(DATE,GETDATE())
|
||||
OPEN c_Values
|
||||
FETCH NEXT FROM c_Values INTO @DocID,@ENTITY_ID,@RECORD_ID,@PARENT_ID,@Filename,@FULL_FILENAME,
|
||||
@Filename,@Doctype,@Version,@Objecttype,
|
||||
@Creation_DateTime,@Change_DateTime
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT [DocID] FROM TBPMO_DOCRESULT_LIST WHERE DocID = @DocID)
|
||||
BEGIN
|
||||
PRINT 'INSERT NECESSARY'
|
||||
INSERT INTO TBPMO_DOCRESULT_LIST (
|
||||
[DocID],
|
||||
[ENTITY_ID],
|
||||
[RECORD_ID],
|
||||
[PARENT_ID],
|
||||
[DISPLAY_NAME],
|
||||
[FULL_FILENAME],
|
||||
[Filename],
|
||||
[Doctype],
|
||||
[Version],
|
||||
[Objecttype],
|
||||
Creation_DateTime,
|
||||
Change_DateTime)
|
||||
VALUES (
|
||||
@DocID,
|
||||
@ENTITY_ID,
|
||||
@RECORD_ID,
|
||||
@PARENT_ID,
|
||||
@Filename,
|
||||
@FULL_FILENAME,
|
||||
@Filename,
|
||||
@Doctype,
|
||||
@Version,
|
||||
@Objecttype,
|
||||
@Creation_DateTime,
|
||||
@Change_DateTime
|
||||
)
|
||||
END
|
||||
ELSE
|
||||
UPDATE TBPMO_DOCRESULT_LIST SET
|
||||
[ENTITY_ID] = @ENTITY_ID,
|
||||
[RECORD_ID] = @RECORD_ID,
|
||||
[PARENT_ID] = @PARENT_ID,
|
||||
[FULL_FILENAME] = @FULL_FILENAME,
|
||||
[Filename] = @Filename,
|
||||
[Doctype] = @Doctype,
|
||||
[Version] = @Version,
|
||||
[Objecttype] = @Objecttype,
|
||||
Change_DateTime = @Change_DateTime
|
||||
WHERE DocID = @DocID
|
||||
|
||||
--#####
|
||||
FETCH NEXT FROM c_Values INTO @DocID,@ENTITY_ID,@RECORD_ID,@PARENT_ID,@Filename,@FULL_FILENAME,
|
||||
@Filename,@Doctype,@Version,@Objecttype,@Creation_DateTime,@Change_DateTime
|
||||
END
|
||||
CLOSE c_Values
|
||||
DEALLOCATE c_Values
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'ERROR IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ROW: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - ERROR-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
GO
|
||||
|
||||
|
||||
|
||||
ALTER PROCEDURE [dbo].[PRPMO_DELETE_DOCTYPE](@pDOCID INT)
|
||||
AS
|
||||
BEGIN TRY
|
||||
DELETE FROM TBPMO_WD_NAMECONVENTION_FORMAT WHERE ID IN (SELECT GUID FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = @pDOCID)
|
||||
DELETE FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_INDEX_MAN WHERE DOK_ID = @pDOCID
|
||||
DELETE FROM TBDD_INDEX_AUTOM WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_USRGRP_DOKTYPE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBPMO_CLIENT_DOCTYPE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBPMO_TEMPLATE WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBPMO_INDEX_MAN WHERE DOCTYPE_ID = @pDOCID
|
||||
DELETE FROM TBDD_DOKUMENTART WHERE GUID = @pDOCID
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
PRINT 'FEHLER IN PROCEDURE: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
|
||||
+ ' - FEHLER-MESSAGE: '
|
||||
+ CONVERT(VARCHAR(500),ERROR_MESSAGE())
|
||||
END CATCH
|
||||
|
||||
GO
|
||||
|
||||
CREATE VIEW VWPMO_DOC_INDICES AS
|
||||
SELECT
|
||||
T.DocID,
|
||||
T.VALUE,
|
||||
T1.COLUMN_CAPTION,
|
||||
T1.GUID AS INDEX_ID,
|
||||
T1.NAME AS INDEX_NAME
|
||||
FROM
|
||||
TBPMO_DOC_INDICES T,
|
||||
TBPMO_INDEX_MAN T1
|
||||
WHERE
|
||||
T.INDEX_ID = T1.GUID AND
|
||||
T1.COL_VISIBLE = 1
|
||||
48
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.6.sql
Normal file
48
08_ADDI/SQL/UPDATE Archiv (added to main script)/2.4.5.6.sql
Normal file
@@ -0,0 +1,48 @@
|
||||
UPDATE TBDD_MODULES SET PRODUCT_VERSION = '2.4.5.6' where NAME = 'Record-Organizer'
|
||||
GO
|
||||
|
||||
CREATE TABLE TBPMO_DOC_USER_VIEW
|
||||
(
|
||||
GUID INTEGER NOT NULL IDENTITY(1,1),
|
||||
[USER_ID] INTEGER NOT NULL,
|
||||
[FILE_EXTENSION] VARCHAR(10) NOT NULL,
|
||||
[VIEWER] VARCHAR(100) NOT NULL DEFAULT 'DOC_VIEW',
|
||||
ADDED_WHO VARCHAR(50) DEFAULT 'DEFAULT',
|
||||
ADDED_WHEN DATETIME DEFAULT GETDATE(),
|
||||
CHANGED_WHO VARCHAR(50),
|
||||
CHANGED_WHEN DATETIME,
|
||||
CONSTRAINT PK_TBPMO_DOC_USER_VIEW PRIMARY KEY ([GUID]),
|
||||
CONSTRAINT FK_PK_TBPMO_DOC_USER_VIEW_USER_ID FOREIGN KEY(USER_ID) REFERENCES TBDD_USER(GUID)
|
||||
)
|
||||
GO
|
||||
|
||||
CREATE TRIGGER TBPMO_DOC_USER_VIEW_UPD ON TBPMO_DOC_USER_VIEW
|
||||
FOR UPDATE
|
||||
AS
|
||||
UPDATE TBPMO_DOC_USER_VIEW SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_DOC_USER_VIEW.GUID = INSERTED.GUID
|
||||
GO
|
||||
|
||||
ALTER TABLE TBPMO_WD_FORMVIEW_DOKTYPES
|
||||
ADD MANUAL_SUBFOLDER BIT NOT NULL DEFAULT 0
|
||||
GO
|
||||
ALTER TABLE [dbo].[TBPMO_INDEX_MAN] DROP CONSTRAINT [FK_TBPMO_INDEX_MAN_DOCTYPE_ID]
|
||||
GO
|
||||
ALTER TABLE [dbo].[TBPMO_INDEX_MAN] WITH CHECK ADD CONSTRAINT [FK_TBPMO_INDEX_MAN_DOCTYPE_ID] FOREIGN KEY([DOCTYPE_ID])
|
||||
REFERENCES [dbo].[TBDD_DOKUMENTART] ([GUID])
|
||||
GO
|
||||
ALTER TABLE [dbo].[TBPMO_INDEX_MAN] CHECK CONSTRAINT [FK_TBPMO_INDEX_MAN_DOCTYPE_ID]
|
||||
GO
|
||||
|
||||
ALTER TABLE [dbo].[TBPMO_DOC_INDICES] DROP CONSTRAINT [PK_TBPMO_DOC_INDICES]
|
||||
GO
|
||||
ALTER TABLE [dbo].[TBPMO_DOC_INDICES]
|
||||
ADD GUID INTEGER NOT NULL IDENTITY(1,1)
|
||||
GO
|
||||
ALTER TABLE [dbo].[TBPMO_DOC_INDICES] ADD CONSTRAINT [PK_TBPMO_DOC_INDICES] PRIMARY KEY CLUSTERED
|
||||
(
|
||||
[GUID] ASC
|
||||
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
|
||||
GO
|
||||
|
||||
|
||||
|
||||
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user