This commit is contained in:
2021-12-07 16:30:02 +01:00
parent 029166c380
commit 51ed7e249d
188 changed files with 36975 additions and 0 deletions

View 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

View 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

View File

@@ -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

View 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*')

View 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

View 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

View 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

View 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

View File

@@ -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