DỰ ÁN PHẦN MỀM QUẢN LÝ TÀI SẢN - NH BẢN VIỆT - GD3

ALTER PROCEDURE dbo.ASS_USE_MULTI_BVB_KT_Upd

@p_USER_MASTER_ID	varchar(15) = null ,

@p_RECORD_STATUS	varchar(1)  = NULL,

@p_AUTH_STATUS	varchar(1)  = NULL,

@p_MAKER_ID	varchar(15)  = NULL,

@p_CREATE_DT	VARCHAR(20) = NULL,

@p_CHECKER_ID	varchar(15)  = NULL,

@p_APPROVE_DT	VARCHAR(20) = NULL,

@p_BRANCH_CREATE varchar(15)  = NULL,

@p_CORE_NOTE VARCHAR(1000)= NULL,

@p_NOTES NVARCHAR(1000) = NULL,

@p_XmlData XML = NULL,

@p_MAKER_ID_KT VARCHAR(15) = NULL,

@p_CREATE_DT_KT VARCHAR(20) = NULL,

@p_USE_EXPORT_DT	VARCHAR(20) = NULL

AS

BEGIN TRANSACTION

		--LUCTV - KHAI BAO SO THANG KHAU HAO MIN, MAX CUA TAI SAN

		DECLARE @NHOMTS VARCHAR(15)

		DECLARE @MIN_AMR INT, @MAX_AMR INT, @INDEX INT

		DECLARE @ERRORSYS NVARCHAR(200) = '',@ASSET_CODE nVARCHAR(20)

		SET @INDEX=0

		--END

		DECLARE 

		@USE_MULTI_ID varchar(15),

		@ASSET_ID	varchar(15),

		@BRANCH_ID	varchar(15),

		@DEPT_ID	varchar(15),

		@DIVISION_ID	varchar(15),

		@EMP_ID	varchar(15),

		@AMORT_START_DATE VARCHAR(20),

		@AMORT_MONTH	decimal(18),

		@AMORT_END_DATE	VARCHAR(20),

		@CORE_NOTE varchar(1000),

		@NOTES	nvarchar(1000)

  Declare @hdoc INT

	Exec sp_xml_preparedocument @hdoc Output,@p_XmlData

	DECLARE XmlData CURSOR FOR

	SELECT *

	FROM OPENXML(@hDoc,'/Root/XmlData',2)

	WITH 

	(

		USE_MULTI_ID varchar(15),

		ASSET_ID	varchar(15),

		BRANCH_ID	varchar(15),

		DEPT_ID	varchar(15),

		DIVISION_ID	varchar(15),

		EMP_ID	varchar(15),

		AMORT_START_DATE VARCHAR(20),

		AMORT_MONTH	decimal(18),

		AMORT_END_DATE	VARCHAR(20),

		CORE_NOTE varchar(1000),

		NOTES	nvarchar(1000)

	)

	OPEN XmlData

		----BO 2 KY TU DAC BIET & VA < TRONG DIEN GIAI HACH TOAN - THIEUVQ 020719 - BEGIN

		SET @p_CORE_NOTE = REPLACE(@p_CORE_NOTE,'&', 'VA')

		SET @p_CORE_NOTE = REPLACE(@p_CORE_NOTE,'<', ' ')

--------------END---------------

		UPDATE ASS_USE_MULTI_MASTER SET [AUTH_STATUS_KT] = 'U',CORE_NOTE =@p_CORE_NOTE,NOTES=@p_NOTES,[USE_EXPORT_DT] = CONVERT(DATETIME, @p_USE_EXPORT_DT, 103),

		[CREATE_DT_KT] = GETDATE(),[MAKER_ID_KT] = @p_MAKER_ID_KT,[REPORT_STATUS] = 'N'

		WHERE  USER_MASTER_ID= @p_USER_MASTER_ID

		DELETE FROM ASS_USE_MULTI_DT WHERE USER_MASTER_ID = @p_USER_MASTER_ID	

		IF @@Error <> 0 GOTO ABORT

		--Insert XmlData

		FETCH NEXT FROM XmlData INTO  @USE_MULTI_ID,@ASSET_ID,@BRANCH_ID,@DEPT_ID,@DIVISION_ID,@EMP_ID,@AMORT_START_DATE,@AMORT_MONTH,@AMORT_END_DATE,@CORE_NOTE,@NOTES

		WHILE @@FETCH_STATUS = 0

		BEGIN

		  SET @INDEX= @INDEX+1

		  --LUCTV - KIEM TRA SO THANG KHAU HAO PHAI NAM TRONG MIN -MAX

		  SET @NHOMTS =(SELECT GROUP_ID FROM ASS_MASTER WHERE ASSET_ID= @ASSET_ID)

		  SET @MIN_AMR =(SELECT AMORT_MONTH_MIN FROM ASS_GROUP WHERE GROUP_ID =@NHOMTS)

		  SET @MAX_AMR =(SELECT AMORT_MONTH_MAX FROM ASS_GROUP WHERE GROUP_ID=@NHOMTS)

		  IF(@AMORT_MONTH >@MAX_AMR OR @AMORT_MONTH <@MIN_AMR)

		  BEGIN

			CLOSE XmlData

			DEALLOCATE XmlData		

			ROLLBACK TRANSACTION

			SELECT '-1' as Result,N'Dòng' +CONVERT(VARCHAR(15),@INDEX) +N': Số tháng khấu hao phải nằm trong khoảng ('+CONVERT(VARCHAR(15),@MIN_AMR)+' - '+CONVERT(VARCHAR(15),@MAX_AMR)+N') tháng' ErrorDesc

			RETURN '-1'

		  END

		  -- 23-07-2019 KIEM TRA

		  IF ( EXISTS ( SELECT * FROM ASS_USE_MULTI_DT WHERE [ASSET_ID] = @ASSET_ID AND USER_MASTER_ID<> @p_USER_MASTER_ID AND

			(CHECKER_ID  IS NULL OR CHECKER_ID_KT IS NULL OR (CHECKER_ID_KT IS NOT NULL AND CHECKER_ID_KT<>'system'))))

			  BEGIN

				 SET @ASSET_CODE=(SELECT ASSET_CODE FROM ASS_MASTER WHERE  [ASSET_ID] = @ASSET_ID)

				 SET @ERRORSYS = N'Mã: '+@ASSET_CODE+N' đang xuất sử dụng'

				CLOSE XmlData

				DEALLOCATE XmlData

				ROLLBACK TRANSACTION

				SELECT '-1' as Result, '' USER_MASTER_ID, @ERRORSYS ErrorDesc

				RETURN '-1'

			END

		  --END

		  if(@AMORT_START_DATE='')  set @AMORT_START_DATE=NULL

			if(@AMORT_END_DATE='')  set @AMORT_END_DATE=NULL

			IF(LEN(@USE_MULTI_ID)  = 0)

			BEGIN

			EXEC SYS_CodeMasters_Gen 'ASS_USE_MULTI_DT', @USE_MULTI_ID out

			IF @USE_MULTI_ID='' OR @USE_MULTI_ID IS NULL GOTO ABORT

			END

			INSERT INTO ASS_USE_MULTI_DT([USE_MULTI_ID],[USER_MASTER_ID],[ASSET_ID],[AMORT_START_DATE],[BRANCH_ID],

			[DEPT_ID],[EMP_ID],[DIVISION_ID],[NOTES],[CORE_NOTE],[RECORD_STATUS],[AUTH_STATUS],[MAKER_ID],

			[CREATE_DT],[CHECKER_ID],[APPROVE_DT],[BRANCH_CREATE],

			[AMORT_MONTH],

			[AUTH_STATUS_KT],[CREATE_DT_KT],

			[MAKER_ID_KT],[REPORT_STATUS],[AMORT_END_DATE])

			VALUES(@USE_MULTI_ID ,@p_USER_MASTER_ID,@ASSET_ID ,CONVERT(DATETIME, @AMORT_START_DATE, 103) ,@BRANCH_ID ,

			@DEPT_ID ,@EMP_ID ,@DIVISION_ID ,@NOTES ,@p_CORE_NOTE--@CORE_NOTE LAY CORE NOTE MASTER

			,@p_RECORD_STATUS ,@p_AUTH_STATUS ,@p_MAKER_ID ,CONVERT(DATE, @p_CREATE_DT,103)

			 ,@p_CHECKER_ID ,CONVERT(DATE, @p_APPROVE_DT,103) ,@p_BRANCH_CREATE ,

			@AMORT_MONTH ,

			'U' ,CONVERT(DATETIME, @p_CREATE_DT_KT, 103),

			@p_MAKER_ID_KT ,'N' ,CONVERT(DATETIME, @AMORT_END_DATE, 103) )

			IF @@Error <> 0 GOTO ABORT

			FETCH NEXT FROM XmlData INTO  @USE_MULTI_ID,@ASSET_ID,@BRANCH_ID,@DEPT_ID,@DIVISION_ID,@EMP_ID,@AMORT_START_DATE,@AMORT_MONTH,@AMORT_END_DATE,@CORE_NOTE,@NOTES

		END

			CLOSE XmlData

		DEALLOCATE XmlData

		IF @@Error <> 0 GOTO ABORT

		-- HUYHT 06/05/2022: XÓA CÁC PROCESS UPDATE CŨ

		DELETE dbo.PL_PROCESS WHERE REQ_ID = @p_USER_MASTER_ID AND PROCESS_ID = 'UPDATE'

		-- GIANT 21/09/2021

		INSERT INTO dbo.PL_PROCESS

		(

			REQ_ID,

			PROCESS_ID,

			CHECKER_ID,

			APPROVE_DT,

			PROCESS_DESC,NOTES

		)

		VALUES

		(   @p_USER_MASTER_ID,        -- REQ_ID - varchar(15)

			'UPDATE',        -- PROCESS_ID - varchar(10)

			@p_MAKER_ID,        -- CHECKER_ID - varchar(15)

			GETDATE(), -- APPROVE_DT - datetime

			N'Giao dịch viên cập nhật hạch toán thành công' ,

			N'Giao dịch viên cập nhật hạch toán'      -- PROCESS_DESC - nvarchar(1000)

		)

COMMIT TRANSACTION

		SELECT '0' as Result,'' ErrorDesc

		RETURN '0'

ABORT:

BEGIN

		ROLLBACK TRANSACTION

		CLOSE XmlData

		DEALLOCATE XmlData

		SELECT '-1' as Result,'' ErrorDesc

		RETURN '-1'

End