USE [Elyse_DB]
GO
/****** Object:  StoredProcedure [authorising].[usp_DEL_doc_group_viewer_perm]    Script Date: Sat 05-09-2026 7:01:55 AM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author:		Silkwood Software
-- Create date: 03-10-2023
-- Description:	Initial creation
-- Deletes a doc group permission record.
-- Input is the sid_id of the user from the sid_list table and 
-- the document group id.  
-- Output is a status message and a transaction status.  
/*
COPYRIGHT NOTICE
This database schema and stored procedures are protected by copyright.
Copyright.  Silkwood Software Pty. Ltd. 2023
*/
-- =============================================
CREATE PROCEDURE [authorising].[usp_DEL_doc_group_viewer_perm] 

     @docgroupid bigint               = NULL,  -- Form group to delete ownership of
	 @user_sid_id bigint              = NULL,  -- User sid_id from the sid_list table
	 @notes nvarchar(1000)            = '',    -- Optional
	 @app_reference nvarchar(1000)    = '',    -- Optional
	 @message nvarchar(1000)          = '' OUTPUT,
	 @transaction_status nvarchar(50) = NULL OUTPUT


AS
BEGIN
	-- SET NOCOUNT ON added to prevent extra result sets from
	-- interfering with SELECT statements.
	SET NOCOUNT ON;

  DECLARE 
        @tempmessage nvarchar(300)           = '',
	    @transactionmessage nvarchar(300)    = '',     -- Communicates what was the outcome of the transaction
		@username nvarchar(150)              = ORIGINAL_LOGIN(),     -- The username 
		@connectedusersid varbinary(100)     = SUSER_SID(ORIGINAL_LOGIN()),   -- The SID of the connected user
		@userauthentication_status nchar(10) = 'Fail', -- The outcome of the authentication check of the user 
		@transaction_ready nchar(10)         = 'Ready',
		@data_validation_status nchar(10)    = 'Pass';

  SET @transaction_status = 'Transaction not attempted';  -- Parameters which have not been explicitly set might be output as null to calling functions 
  -- Connected user authentication
  -- Authenticate the connected user as an authoriser
  EXEC [internal].[usp_AUTHENTICATE_authoriser] 
		@user_authentication_result = @userauthentication_status OUTPUT;
  IF @userauthentication_status = 'Fail'
    BEGIN  -- The user does not have permission for this action
		SET @transaction_ready      = 'Fail';
	    EXEC internal.usp_SEL_message 
            @message_id   = 'NoPermission', 
			@message_text = @tempmessage OUTPUT;
	    IF (@tempmessage IS NOT NULL) 
  	       SET @message = CONCAT(@message, ' | ', ISNULL(@username, ''), '  ', @tempmessage);
	    ELSE 
		   SET @message = CONCAT_WS(' | ', @message, 'A database level message error occurred on NoPermission')
	END

  IF @userauthentication_status = 'Pass' -- Don't do anything if the user is not authorised.
    BEGIN
	  -- Data validation
      -- Check if a matching record does not exist
			 IF NOT EXISTS (SELECT doc_group_id, sid_id
				   	          FROM user_restr.doc_group_view_permissions 
					    	 WHERE         doc_group_id = @docgroupid
						           AND sid_id = @user_sid_id)
			   BEGIN
				 EXEC internal.usp_SEL_message 
					  @message_id   = 'NotExist', 
					  @message_text = @tempmessage OUTPUT;
				 IF (@tempmessage IS NOT NULL) 
					 SET @message = CONCAT_WS(' | ', @message, @tempmessage);
				 ELSE 
					 SET @message = CONCAT_WS(' | ', @message, 'A database level message error occurred on NotExist.');
				 SET @data_validation_status = 'Fail';
				 SET @transaction_ready      = 'Fail';
			   END

       -- Do not permit the last user to be removed unless there are no documents linked to the gruop
	   -- Otherwise removing the last user will render all the previously-restricted documents in the group visible to all users.  
	   IF @data_validation_status = 'Pass'
	      BEGIN
		  -- Check if number of linked users is 1
			IF (
				(SELECT COUNT(*)
				FROM (
					SELECT TOP (2) 1 AS col
					FROM user_restr.doc_group_view_permissions
				) AS t
			) = 1 )

			AND  -- Check if number of linked documents is > 0
			 (
				(SELECT COUNT(*)
				FROM (
					SELECT TOP (2) 1 AS col
					FROM xref.doc_group_links AS dgl
					WHERE dgl.doc_group_id = @docgroupid
				) AS t
				
			) > 0 )

			  BEGIN
				 EXEC internal.usp_SEL_message 
					  @message_id   = 'LastDocGrpViewer', 
					  @message_text = @tempmessage OUTPUT;
				 IF (@tempmessage IS NOT NULL) 
					 SET @message = CONCAT_WS(' | ', @message, @tempmessage);
				 ELSE 
					 SET @message = CONCAT_WS(' | ', @message, 'A database level message error occurred on LastDocGrpViewer.');
				 SET @data_validation_status = 'Fail';
				 SET @transaction_ready      = 'Fail';
			  END
		  END

	  -- Output the data validation status failed message
	  IF @data_validation_status = 'Fail'
		BEGIN
		  EXEC internal.usp_SEL_message 
			   @message_id   = 'FailedDataValidation', 
			   @message_text = @tempmessage OUTPUT;
		  IF (@tempmessage IS NOT NULL) 
			SET @message = CONCAT_WS(' | ', @message, @tempmessage);
		  ELSE 
			SET @message = CONCAT_WS(' | ', @message, 'A database level message error occurred on FailedDataValidation.');
		END
	  -- End data validation
    END -- End of IF authentication status = Pass.

-- Execute the insert query
  IF @transaction_ready = 'Ready'
	BEGIN
	  BEGIN TRY

	  BEGIN TRANSACTION;

	  INSERT INTO user_restr.user_privilege_revoke_log -- Create an audit log entry
	              (privilege, privilege_name, sid_id, username, granted_on, granted_by, revoked_by)
	       VALUES ('Document Group',
		          (SELECT attr_name FROM xref.doc_group_names
				                   WHERE doc_group_id  
								 		= @docgroupid),
		          @user_sid_id,
		          (SELECT username FROM user_restr.sid_list
				                  WHERE         sid_id 
										= @user_sid_id),
		          (SELECT created FROM user_restr.doc_group_view_permissions
				                 WHERE  doc_group_id  
								 		= @docgroupid
										AND     sid_id 
										= @user_sid_id),
		          (SELECT granted_by FROM user_restr.doc_group_view_permissions
				                 WHERE  doc_group_id  
								 		= @docgroupid
										AND     sid_id 
										= @user_sid_id),
				  @username)


	     DELETE FROM user_restr.doc_group_view_permissions
               WHERE     doc_group_id = @docgroupid
			         AND       sid_id = @user_sid_id; 
 
         -- Write to the privilege log --

		 -- Write to the log
		 INSERT INTO user_restr.user_privilege_log
		             (privilege_type,                  privilege_name,           sid_id,      username, action_type, 
					 created_by_sid_id, valid_from, valid_until, notes, app_reference)
			  VALUES ('Document Group Viewer', 
			            (SELECT attr_name
				           FROM xref.doc_group_names
						  WHERE doc_group_id = @docgroupid),        
						@user_sid_id, 
						(SELECT username
		                   FROM user_restr.sid_list
						  WHERE sid_id = @user_sid_id), 
						'Revoke',
			            (SELECT sid_id
		                   FROM user_restr.sid_list
						  WHERE sid = @connectedusersid), 
					 NULL, NULL, @notes, @app_reference)


		COMMIT TRANSACTION;

         EXEC internal.usp_SEL_message 
              @message_id   = 'Success', 
              @message_text = @tempmessage OUTPUT;
  	     IF (@tempmessage IS NOT NULL) 
			SET @message = CONCAT_WS(' | ', @message, @tempmessage);
		 ELSE 
			SET @message = CONCAT_WS(' | ', @message, 'A database level message error occurred on Success.');
		 SET @transaction_status = 'Good';

   	  END TRY
	  BEGIN CATCH

           IF XACT_STATE() <> 0
            ROLLBACK TRANSACTION;

	     SET @transaction_status = 'Bad';
         EXEC internal.usp_SEL_message 
              @message_id   = 'DeleteError', 
              @message_text = @tempmessage OUTPUT;
		 IF (@tempmessage IS NOT NULL) 
		    SET @message = CONCAT(@message, ' |', @tempmessage, ' | ', 
		    CONVERT(nvarchar(10),ERROR_NUMBER()), ' | ', ERROR_MESSAGE());
		 ELSE 
			SET @message = CONCAT_WS(' | ', @message, 'A database level message error occurred on DeleteError.');
	  END CATCH
    END




END
GO