MS

08_ADDI/SQL/UPDATE_SCRIPTS/2.4.8.6.sql

@@ -0,0 +1,86 @@
+UPDATE TBDD_MODULES SET DB_VERSION = '2.4.8.6' where NAME = 'Record-Organizer' 
+GO 
+CREATE PROCEDURE [dbo].[PRPMO_CHECK_DOC_RECORD_LINK] (
+	@pRECORD_ID INTEGER,
+	@pDOC_ID INTEGER,
+	@pREASON_CODE VARCHAR(500),
+	@pWHO VARCHAR(50)
+	) 
+	AS
+BEGIN
+	IF NOT EXISTS(SELECT GUID FROM TBPMO_DOC_RECORD_LINK WHERE RECORD_ID = @pRECORD_ID AND DOC_ID = @pDOC_ID)
+		BEGIN
+			INSERT INTO TBPMO_DOC_RECORD_LINK (RECORD_ID,DOC_ID,COMMENT,ADDED_WHO) VALUES 
+			(@pRECORD_ID,@pDOC_ID,@pREASON_CODE,@pWHO)
+		END
+	ELSE
+		UPDATE TBPMO_DOC_RECORD_LINK SET CHANGED_WHO = @pWHO WHERE RECORD_ID = @pRECORD_ID AND DOC_ID = @pDOC_ID
+END
+GO
+CREATE TABLE TBPMO_CLIENT_CONNECTION_SWITCH
+(
+	GUID					INTEGER		IDENTITY(1,1),              	
+	[DESCRIPTION]			VARCHAR(100),	
+	SQL_CONNECTION			VARCHAR(MAX)	NOT NULL,
+	SQL_CONNECTION_PROXY	VARCHAR(MAX)	DEFAULT '',
+	WM_ALIAS				VARCHAR(250)	NOT NULL,
+	ACTIVE   				BIT				NOT NULL			DEFAULT 1,	
+	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_CLIENT_CONNECTION_SWITCH	PRIMARY KEY (GUID)
+)
+GO
+ ------------------------------------------------------------------------------
+CREATE TRIGGER TBPMO_CLIENT_CONNECTION_SWITCH_AFT_UPD ON TBPMO_CLIENT_CONNECTION_SWITCH
+FOR UPDATE
+AS
+	UPDATE TBPMO_CLIENT_CONNECTION_SWITCH SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CLIENT_CONNECTION_SWITCH.GUID = INSERTED.GUID
+GO
+
+
+CREATE TABLE TBPMO_CLIENT_CONN_SWITCH_USER
+(
+	GUID			INTEGER			NOT NULL	IDENTITY(1,1),
+	CONN_SWITCH_ID	INTEGER			NOT NULL,
+	USER_ID			INTEGER			NOT NULL,
+	ACTIVE			BIT				NOT NULL	DEFAULT 0,
+	ADDED_WHO		VARCHAR(50)		DEFAULT		'DEFAULT',
+	ADDED_WHEN		DATETIME 		NOT NULL	DEFAULT GETDATE(),
+	CHANGED_WHO		VARCHAR(50),
+	CHANGED_WHEN	DATETIME,
+	CONSTRAINT		PK_TBPMO_CLIENT_CONN_SWITCH_USER					PRIMARY KEY (GUID),
+	CONSTRAINT		UQ_PK_TBPMO_CLIENT_CONN_SWITCH_USER	UNIQUE([USER_ID],CONN_SWITCH_ID),
+	CONSTRAINT		FK_TBPMO_CLIENT_CONN_SWITCH_USER_SWITCH_ID	FOREIGN KEY (CONN_SWITCH_ID)  REFERENCES  TBPMO_CLIENT_CONNECTION_SWITCH (GUID),
+	CONSTRAINT		FK_TBPMO_CLIENT_CONN_SWITCH_USER_USER_ID			FOREIGN KEY (USER_ID)  REFERENCES  TBDD_USER (GUID)
+)
+GO
+CREATE TRIGGER TBPMO_CLIENT_CONN_SWITCH_USER_AFT_UPD ON TBPMO_CLIENT_CONN_SWITCH_USER
+FOR UPDATE
+AS
+	DECLARE 
+		@GUID		INTEGER,
+		@OLD_ACTIVE	BIT,
+		@NEW_ACTIVE	BIT,
+		--@IS_MAIN	BIT,
+		@USER_ID	INTEGER
+	SELECT 				
+		@NEW_ACTIVE = ACTIVE,
+		@USER_ID = USER_ID,
+		--@IS_MAIN = IS_MAIN,
+		@GUID = GUID
+	FROM INSERTED
+	IF UPDATE(ACTIVE)
+		BEGIN
+			SELECT 
+				@OLD_ACTIVE = DELETED.ACTIVE
+			FROM DELETED
+			
+			IF @NEW_ACTIVE = 1 AND @OLD_ACTIVE = 0
+				UPDATE TBPMO_CLIENT_CONN_SWITCH_USER SET ACTIVE = 0 WHERE USER_ID = @USER_ID AND GUID <> @GUID
+		END
+	
+	UPDATE TBPMO_CLIENT_CONN_SWITCH_USER SET CHANGED_WHEN = GETDATE() FROM INSERTED WHERE TBPMO_CLIENT_CONN_SWITCH_USER.GUID = INSERTED.GUID
+GO
+