AMS - VB

ALTER PROCEDURE dbo.ASS_USE_MULTI_BVB_KT_Appr

	@p_USER_MASTER_ID		varchar(15) = NULL,

	--@p_AUTH_STATUS varchar(1)  = NULL,

	@p_CHECKER_ID	varchar(100)  = NULL,

	@p_APPROVE_DT	VARCHAR(20) = NULL		

AS

DECLARE @l_BRANCH_ID VARCHAR(15)

	DECLARE @l_DEPT_ID VARCHAR(15)

	DECLARE @l_EMP_ID VARCHAR(15)

	DECLARE @l_DIVISION_ID	VARCHAR(15)

	DECLARE @l_VALUE_ID	VARCHAR(15)

	--DECLARE @l_LOCATION nvarchar(500)

	DECLARE @l_LOCHIST_ID	VARCHAR(15)

	DECLARE @l_ASSET_ID VARCHAR(15)

	DECLARE @l_WAHDT_ID VARCHAR(15)

	DECLARE @l_WAH_ID VARCHAR(15)

	DECLARE @l_MAKER_ID			varchar(15)

	DECLARE @l_AMORT_MONTH decimal(18,2)

	DECLARE @l_AMORT_START_DATE datetime, @l_AMORT_END_DATE datetime

	DECLARE @l_FIRST_AMORT_AMT	numeric(18,0)

	DECLARE @l_MONTHLY_AMT 	numeric(18,0)

	DECLARE @l_ASS_AMORT_AMT numeric(18,0)

	DECLARE @sToday varchar(10) = convert(varchar(10), getdate(), 103)

	DECLARE @l_ENTRY_BOOKED varchar(1)

	DECLARE @l_HO_BRN_ID varchar(15)	

	DECLARE @l_AMORT_AMT decimal(18)  = NULL	

	DECLARE @l_BUY_PRICE decimal(18)  = NULL	

	DECLARE @l_ET_ID varchar(15)

	--DEClare @p_ADDNEW_ID varchar(15)

	DECLARE @l_SUPPEND_GL varchar(50)

	DECLARE @l_ASSET_GL  varchar(50)--TK TAI SAN

	DECLARE @l_EXP_ACCTNO  varchar(50)--TK CHI PHI

	DECLARE @l_AMORT_ACCTNO  varchar(50)--TK CHO PHAN BO 

    DECLARE @l_PAY_HS_ACCTNO VARCHAR(50)

 DECLARE @_BUY_TS_ACCTNO VARCHAR(50)

 DECLARE @l_WAIT_AMORT VARCHAR(50)

  DECLARE @l_TRANFER_ACCTNO VARCHAR(50)

	DECLARE @l_DR_BRANCH VARCHAR(15) -- DV GHI NO

	DECLARE @l_ASSET_VALUE decimal(18,0)

  DECLARE @l_ASSET_CODE VARCHAR(25)

	DECLARE @l_GROUP_ID varchar(15)	

	DECLARE @l_CORE_NOTE NVARCHAR(500)

	DECLARE @l_TYPE_ID	varchar(15)  = NULL

	declare @l_TRN_REF_NO varchar(20)

	declare @l_DO_BRANCH_ID varchar(15)

	DECLARE @l_AMORT_STATUS VARCHAR(15) = 'CKH'

	DECLARE @l_AMORT_MONTH_ASS_USE DECIMAL(18,2) = NULL

	DECLARE @l_AMORT_RATE DECIMAL(18,2) = 0

	declare @l_AUTH_STATUS varchar(15) = ''

	DECLARE @l_CURR_AMORT_AMT DECIMAL(18,0)

	DECLARE @sExecDT DATE

	DECLARE @l_AMORT_TERM VARCHAR(500)

	DECLARE @l_AMORTDT_ID VARCHAR(15) = NULL

	DECLARE @l_AMORTIZED_MONTH DECIMAL(18,0), @ERROR NVARCHAR(500) = ''

	DECLARE @l_BRANCH_CREATE VARCHAR(15), @BRN_TYPE_TRN VARCHAR(15), @BRN_TYPE_REC VARCHAR(15), @TCCT_TRN_ACCTNO VARCHAR(50), @TCCT_REC_ACCTNO VARCHAR(50)

	DECLARE @l_DEP_CODE VARCHAR(15)

	DECLARE @l_COST_MASTER_ID VARCHAR(15)

	DECLARE @l_COSTDT_ID VARCHAR(15),

  @l_REMAIN_VALUE_UPD	DECIMAL(18,0),

  @l_BUY_PRICE_UPD	DECIMAL(18,0)

	DECLARE @CUR_DATE DATETIME = GETDATE()

BEGIN TRY

		BEGIN TRANSACTION

    	IF(EXISTS(SELECT 1 FROM ASS_USE_MULTI_MASTER WHERE AUTH_STATUS_KT ='A' AND USER_MASTER_ID =@p_USER_MASTER_ID))

		BEGIN

					ROLLBACK TRANSACTION

					SELECT '-1' as Result, N'Thông tin xuất sử dụng tài sản đã được duyệt' ErrorDesc

					RETURN '-1'

		END

		--LUCTV: 26-20-2018 KIEM TRA NEU TINH TRANG DANG LA 'R' THI KHONG CHO PHEP DUYET

		IF(EXISTS(SELECT * FROM ASS_USE_MULTI_MASTER WHERE AUTH_STATUS_KT ='R' AND USER_MASTER_ID =@p_USER_MASTER_ID))

		BEGIN

					ROLLBACK TRANSACTION

					SELECT '-1' as Result, N'Thông tin xuất sử dụng tài sản đang bị trả về. Vui lòng cập nhật lại thông tin trước khi duyệt' ErrorDesc

					RETURN '-1'

		END

		--APPROVE KT MASTER

		UPDATE [dbo].[ASS_USE_MULTI_MASTER]

		SET AUTH_STATUS_KT = 'A',

			CHECKER_ID_KT = @p_CHECKER_ID,

			APPROVE_DT_KT = CONVERT(DATETIME, @p_APPROVE_DT, 103) 

		WHERE  USER_MASTER_ID= @p_USER_MASTER_ID

		--thieuvq 260719 lay thong makerid kt--

		SET @l_MAKER_ID = (SELECT MAKER_ID_KT FROM ASS_USE_MULTI_MASTER WHERE USER_MASTER_ID = @p_USER_MASTER_ID)

		--

 DECLARE  @l_TRN_NO VARCHAR(15)

EXEC ENTRIES_POST_GEN_NO @p_BRANCH_ID = 'DV0001'

                        ,@p_TRN_DATE = @p_APPROVE_DT

                        ,@p_KeyGen = @l_TRN_NO OUT

		DECLARE @USE_MULTI_ID varchar(15)

		DECLARE @ASSET_ID varchar(15)

		DECLARE XmlData SCROLL CURSOR 

				FOR  

					SELECT A.USE_MULTI_ID,A.ASSET_ID

					FROM [dbo].[ASS_USE_MULTI_DT] A

					WHERE  USER_MASTER_ID= @p_USER_MASTER_ID AND AUTH_STATUS_KT <> 'A'

				OPEN XmlData   

		FETCH NEXT FROM XmlData INTO  @USE_MULTI_ID,@ASSET_ID

		WHILE @@FETCH_STATUS = 0

		BEGIN

			--Lay thong tin giao dich

		SELECT	@l_ASSET_ID = ASSET_ID, @l_BRANCH_ID = BRANCH_ID, @l_DEPT_ID = DEPT_ID, 

				@l_EMP_ID = EMP_ID, @l_DIVISION_ID = DIVISION_ID, @l_CORE_NOTE = CORE_NOTE, @l_AUTH_STATUS = AUTH_STATUS_KT,

				@l_AMORT_START_DATE = AMORT_START_DATE, /*@l_MAKER_ID = MAKER_ID_KT,*/ @l_AMORT_MONTH_ASS_USE = AMORT_MONTH,

				@l_AMORT_END_DATE  = AMORT_END_DATE

		FROM [ASS_USE_MULTI_DT]

		WHERE USE_MULTI_ID = @USE_MULTI_ID

		--Lay thong tin so thang khau hao

		SELECT @l_AMORT_MONTH = A.AMORT_MONTH, @l_ASS_AMORT_AMT = AMORT_AMT, @l_ENTRY_BOOKED = ENTRY_BOOKED,

				@l_AMORT_AMT = A.AMORT_AMT, @l_BUY_PRICE = BUY_PRICE, @l_GROUP_ID = ISNULL(A.REF_GROUP_ID,A.GROUP_ID),@l_TYPE_ID = A.[TYPE_ID],

				@l_BRANCH_CREATE = BRANCH_CREATE,@l_ASSET_CODE=A.ASSET_CODE

		FROM ASS_MASTER A 

		WHERE A.ASSET_ID = @l_ASSET_ID

		--TINH THEO SO THANG KHI XUAT

		SET @l_AMORT_MONTH = @l_AMORT_MONTH_ASS_USE

		--IF @l_ENTRY_BOOKED = 'N'

		--BEGIN		

		--	SELECT '-1' as Result, (SELECT S.ErrorDesc FROM SYS_ERROR S WHERE S.ErrorCode = 'ASS-00018') ErrorDesc

		--	ROLLBACK TRANSACTION

		--	CLOSE XmlData

		--	DEALLOCATE XmlData		

		--	RETURN '-1'

		--END

		 IF (SELECT AMORT_STATUS FROM ASS_MASTER WHERE ASSET_ID = @l_ASSET_ID) NOT IN ('VNM','KKH')

		 BEGIN		

			SELECT '-1' as Result, N'TAI SAN DA DUOC XUAT SU DUNG' ErrorDesc

			ROLLBACK TRANSACTION

			CLOSE XmlData

			DEALLOCATE XmlData		

			RETURN '-1'

		END

		UPDATE ASS_USE_MULTI_DT 

		SET AUTH_STATUS_KT = 'A', 

		CHECKER_ID_KT = @p_CHECKER_ID, 

		APPROVE_DT_KT = CONVERT(DATETIME, @p_APPROVE_DT, 103)

		WHERE USE_MULTI_ID = @USE_MULTI_ID

		--IF @l_AUTH_STATUS = 'A'

		--BEGIN

		--	SELECT '-1' as Result, (SELECT ErrorDesc from SYS_ERROR WHERE ErrorCode = 'ASS-99998') ErrorDesc

		--	ROLLBACK TRANSACTION

		--	CLOSE XmlData

		--	DEALLOCATE XmlData	

		--	RETURN '-1'

		--END

		--Lay thong tin kho mac dinh

		--SELECT @l_WAH_ID = P.ParaValue FROM SYS_PARAMETERS P WHERE P.ParaKey='ASSET_WAREHOUSE'

		SET @l_WAH_ID = @l_BRANCH_CREATE

		--BRN_ID HOI SO

		SELECT @l_HO_BRN_ID = BRANCH_ID FROM CM_BRANCH A WHERE A.BRANCH_TYPE = 'HS'

		--Lay branch_id cua user duyet

		select @l_DO_BRANCH_ID = a.TLSUBBRID from TL_USER a where a.TLNANME = @p_CHECKER_ID	

		--Lay suppend GL

		SELECT @l_SUPPEND_GL = A.ParaValue FROM SYS_PARAMETERS A WHERE A.ParaKey='ASSET_SUPPEND_GL'

DECLARE @l_WAIT_AMORT_NEW VARCHAR(50)

    SET @l_PAY_HS_ACCTNO = (SELECT epa.ACC_NO FROM ENTRIES_POST_ACCNO epa WHERE epa.ACC_TYPE='PAY_HS')

SET @_BUY_TS_ACCTNO = (SELECT epa.ACC_NO FROM ENTRIES_POST_ACCNO epa WHERE epa.ACC_TYPE='BUY_TSCD' AND  epa.GROUP_ID=(SELECT AG.PARENT_ID FROM ASS_GROUP AG WHERE AG.GROUP_ID = (SELECT AG.PARENT_ID FROM ASS_GROUP AG WHERE AG.GROUP_ID = @l_GROUP_ID)))

IF(@_BUY_TS_ACCTNO IS NULL OR @_BUY_TS_ACCTNO = '') SET @_BUY_TS_ACCTNO = (SELECT ACC_NO FROM ENTRIES_POST_ACCNO WHERE ACC_TYPE ='BUY_TSCD' AND GROUP_ID = @l_GROUP_ID)

SET @l_WAIT_AMORT = (SELECT epa.ACC_NO FROM ENTRIES_POST_ACCNO epa WHERE epa.ACC_TYPE='AMORT_CCLD')

SET @l_TRANFER_ACCTNO =(SELECT epa.ACC_NO FROM ENTRIES_POST_ACCNO epa WHERE epa.ACC_TYPE='TRANSFER')

SET @l_WAIT_AMORT_NEW =(SELECT epa.ACC_NO FROM ENTRIES_POST_ACCNO epa WHERE epa.ACC_TYPE='ASSET_CCLD_N')

--SET @l_PAY_HS_ACCTNO = (SELECT epa.ACC_NO FROM ENTRIES_POST_ACCNO epa WHERE epa.ACC_TYPE='PAY_HS')

DECLARE  @l_ETP_ID VARCHAR(20),@l_D_BRANCH_CODE VARCHAR(25) , @l_C_BRANCH_CODE VARCHAR(25)

		--ASSET_GL

		SELECT @l_ASSET_GL = ASSET_ACCTNO,

				@l_EXP_ACCTNO = EXP_ACCTNO,

				@l_AMORT_ACCTNO = AMORT_ACCTNO

		FROM ASS_GROUP A 

		WHERE A.GROUP_ID = @l_GROUP_ID

		IF @l_AMORT_MONTH_ASS_USE = 0

		BEGIN

			SET @l_AMORT_END_DATE = NULL;		

			SET @l_MONTHLY_AMT = 0;

			SET @l_FIRST_AMORT_AMT = 0;

			SET @l_AMORT_STATUS = 'KKH'

		END

		ELSE

		BEGIN

			--Tinh ngay ket thuc khau hao

			--IF @l_AMORT_END_DATE IS NULL OR @l_AMORT_END_DATE = ''

			--	SET @l_AMORT_END_DATE = DATEADD(MONTH, @l_AMORT_MONTH_ASS_USE, @l_AMORT_START_DATE) - 1

			IF @l_AMORT_END_DATE IS NULL OR @l_AMORT_END_DATE = ''

			BEGIN

				--DECLARE @l_ENDDATE_TEMP DATETIME = (CONVERT(VARCHAR(10),(YEAR(@l_AMORT_START_DATE))) + '-' + CONVERT(VARCHAR(10),MONTH(@l_AMORT_START_DATE))+'-' + '1')

				--SET @l_AMORT_END_DATE = DATEADD(MONTH, @l_AMORT_MONTH, @l_ENDDATE_TEMP ) - 1

				SET @l_AMORT_END_DATE = DATEADD(MONTH, @l_AMORT_MONTH, @l_AMORT_START_DATE) - 1

			END

			--Tinh so tien khau hao thang dau tien va so tien khau hao hang thang

			SET @l_MONTHLY_AMT = ROUND(@l_ASS_AMORT_AMT / @l_AMORT_MONTH, 0)

    --  IF(@l_TYPE_ID='TSCD')

      --BEGIN

         DECLARE @AMORT_ON_DAY DECIMAL(18,0)

        SET @AMORT_ON_DAY = ROUND(@l_MONTHLY_AMT/dbo.[FN_GetDaysInMonth](@l_AMORT_START_DATE),0)

        SET @l_FIRST_AMORT_AMT = ROUND(@AMORT_ON_DAY * (DATEDIFF(day,@l_AMORT_START_DATE, dbo.FN_GetLastDayOfMonth(@l_AMORT_START_DATE)) + 1), 0)

       IF(DAY(@l_AMORT_START_DATE)=1)

        SET  @l_FIRST_AMORT_AMT=@l_MONTHLY_AMT

--END

--ELSE

		--	SET @l_FIRST_AMORT_AMT = @l_MONTHLY_AMT--ROUND(@l_MONTHLY_AMT/dbo.[FN_GetDaysInMonth](@l_AMORT_START_DATE) * (DATEDIFF(day,@l_AMORT_START_DATE, dbo.FN_GetLastDayOfMonth(@l_AMORT_START_DATE)) + 1), -3)

			--CAP NHAT TRANG THAI KHAU HAO

			SET @l_AMORT_STATUS = 'CKH'

		END

		--IF (@l_ENTRY_BOOKED = 'N') --Neu nhap TS va hach toan tang tai san

		IF (@l_ENTRY_BOOKED = 'N') --Neu nhap TS va hach toan tang tai san thieuvq 14/05/2014

		BEGIN

				--insert dbo.ASS_VALUES

				EXEC SYS_CodeMasters_Gen 'ASS_VALUES', @l_VALUE_ID out

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

				INSERT INTO ASS_VALUES

				(

					VALUE_ID, ASSET_ID, BRANCH_ID, TRN_DT, CRDR, ASSET_AMT, [DESCRIPTION], TRN_ID, TRN_TYPE,

					RECORD_STATUS, AUTH_STATUS, MAKER_ID, CREATE_DT, CHECKER_ID, APPROVE_DT, AMORT_AMT

				)

				VALUES

				(

					@l_VALUE_ID, @l_ASSET_ID, @l_BRANCH_CREATE, CONVERT(datetime, @sToday, 103), 'C', @l_BUY_PRICE, N'XUAT SU DUNG '+@l_TYPE_ID, @USE_MULTI_ID, 'ASS_USE',

					'1','A',@l_MAKER_ID, CONVERT(datetime, @sToday, 103), @p_CHECKER_ID, CONVERT(datetime, @sToday, 103), @l_AMORT_AMT

				)				

				IF @@Error <> 0 GOTO ABORT							

          SET @l_C_BRANCH_CODE = (SELECT cb.BRANCH_CODE FROM CM_BRANCH cb WHERE cb.BRANCH_ID=@l_HO_BRN_ID)

          SET @l_D_BRANCH_CODE = (SELECT cb.BRANCH_CODE FROM CM_BRANCH cb WHERE cb.BRANCH_ID=@l_BRANCH_CREATE)

          IF(@l_BRANCH_ID = @l_BRANCH_CREATE)

              SET @l_DEP_CODE =( SELECT  cd.DEP_CODE FROM CM_DEPARTMENT cd WHERE cd.DEP_ID=@l_DEPT_ID)

				---NEU LA TAI SAN THI GHI TANG - BUT TOAN XUAT O DUOI, CCLD THI 2 BUT TOAN GOM LAI THANH 1

				IF @l_TYPE_ID = 'TSCD'

				BEGIN

					--Insert vao bang dbo.ASS_ENTRIES_POST				

					EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ASS_USE', @USE_MULTI_ID,@l_DO_BRANCH_ID, @_BUY_TS_ACCTNO, @l_BRANCH_CREATE, @l_ASSET_GL, @l_BRANCH_CREATE, @l_BUY_PRICE,'Y',

						@sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID,@p_USER_MASTER_ID, --N'XUAT SU DUNG TSCD/CCLD'

						@l_ET_ID OUT

          EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_D_BRANCH_CODE , @l_ASSET_GL, 'VND', 'D', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, @l_DEP_CODE, @l_CORE_NOTE,@l_TRN_NO);

               EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

               INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

               VALUES (@l_ETP_ID, @l_ET_ID, @p_USER_MASTER_ID,@l_D_BRANCH_CODE ,@_BUY_TS_ACCTNO,'VND', 'C', @l_BUY_PRICE, 1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, '', @l_CORE_NOTE,@l_TRN_NO);

				END

				--SET @l_ENTRY_BOOKED = 'Y'

		END				

		---THIEUVQ 101018 NEU XUAT KHAC DON VI THI HACH TOAN

		--BEGIN

		--Insert vao bang dbo.ASS_ENTRIES_POST

          SET @l_C_BRANCH_CODE = (SELECT cb.BRANCH_CODE FROM CM_BRANCH cb WHERE cb.BRANCH_ID=@l_BRANCH_CREATE)

          SET @l_D_BRANCH_CODE = (SELECT cb.BRANCH_CODE FROM CM_BRANCH cb WHERE cb.BRANCH_ID=@l_BRANCH_ID)

          SET @l_DEP_CODE =  ( SELECT  cd.DEP_CODE FROM CM_DEPARTMENT cd WHERE cd.DEP_ID=@l_DEPT_ID)

		IF @l_BRANCH_CREATE <> @l_BRANCH_ID 

		BEGIN			

			SELECT @BRN_TYPE_TRN = BRANCH_TYPE,@TCCT_TRN_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_CREATE

			SELECT @BRN_TYPE_REC = BRANCH_TYPE, @TCCT_REC_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_ID

			IF @l_TYPE_ID = 'TSCD'

			BEGIN

			/*****THIEUVQ 211118 - CHAU XAC NHAN KHONG HACH TOAN QUA TK TRUNG GIAN NUA*******/

				----NEU CN XUAT CHO PGD THI KHONG HACH TOAN THONG QUA TK TRUNG GIAN TCCT

				--IF @BRN_TYPE_TRN = 'CN' AND @BRN_TYPE_REC = 'PGD'

				--BEGIN

				EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ASS_USE', @p_USER_MASTER_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_TRANFER_ACCTNO, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', 

								@sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_USER_MASTER_ID,--N'NHAP MOI TSCD/CCLD'

								@l_ET_ID OUT

               EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

               INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

               VALUES (@l_ETP_ID, @l_ET_ID, @p_USER_MASTER_ID,@l_C_BRANCH_CODE ,@l_TRANFER_ACCTNO,'VND', 'D', @l_BUY_PRICE, 1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, '', @l_CORE_NOTE,@l_TRN_NO);

              	 EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_C_BRANCH_CODE , @l_ASSET_GL, 'VND', 'C', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, '', @l_CORE_NOTE,@l_TRN_NO);

--------------------------------

              	EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ASS_USE', @p_USER_MASTER_ID, @l_DO_BRANCH_ID, @l_TRANFER_ACCTNO, @l_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', 

								@sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_USER_MASTER_ID,--N'NHAP MOI TSCD/CCLD'

								@l_ET_ID OUT

               EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

               INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

               VALUES (@l_ETP_ID, @l_ET_ID, @p_USER_MASTER_ID,@l_D_BRANCH_CODE ,@l_ASSET_GL,'VND', 'D', @l_BUY_PRICE, 1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, @l_DEP_CODE, @l_CORE_NOTE,@l_TRN_NO);

              	 EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_D_BRANCH_CODE , @l_TRANFER_ACCTNO, 'VND', 'C', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, @l_DEP_CODE, @l_CORE_NOTE,@l_TRN_NO);

	        END

        IF @l_TYPE_ID = 'CCLD'

			BEGIN --CCLD

			    		EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ASS_USE', @p_USER_MASTER_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_TRANFER_ACCTNO, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', 

								@sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_USER_MASTER_ID,--N'NHAP MOI TSCD/CCLD'

								@l_ET_ID OUT

               EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

               INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

               VALUES (@l_ETP_ID, @l_ET_ID, @p_USER_MASTER_ID,@l_C_BRANCH_CODE ,@l_WAIT_AMORT_NEW,'VND', 'D', @l_BUY_PRICE, 1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, '', @l_CORE_NOTE,@l_TRN_NO);

              	 EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_C_BRANCH_CODE , @l_ASSET_GL, 'VND', 'C', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, '', @l_CORE_NOTE,@l_TRN_NO);

      ---------------------------

              	EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ASS_USE', @p_USER_MASTER_ID, @l_DO_BRANCH_ID, @l_TRANFER_ACCTNO, @l_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', 

								@sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_USER_MASTER_ID,--N'NHAP MOI TSCD/CCLD'

								@l_ET_ID OUT

               EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

               INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

               VALUES (@l_ETP_ID, @l_ET_ID, @p_USER_MASTER_ID,@l_D_BRANCH_CODE ,@l_ASSET_GL,'VND', 'D', @l_BUY_PRICE, 1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, '', @l_CORE_NOTE,@l_TRN_NO);

              	 EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_D_BRANCH_CODE , @l_WAIT_AMORT_NEW, 'VND', 'C', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, '', @l_CORE_NOTE,@l_TRN_NO);

      --------------------------------------

              EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ASS_USE', @p_USER_MASTER_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_WAIT_AMORT, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', 

							@sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_USER_MASTER_ID,--N'NHAP MOI TSCD/CCLD'

							@l_ET_ID OUT

				           --Đồng thời kết chuyển tài khoản CCLĐ đang dùng sang tài khoản chờ phân bổ:

              EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO,TRN_IS_SUM)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_D_BRANCH_CODE , @l_WAIT_AMORT, 'VND', 'D', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, @l_DEP_CODE, @l_CORE_NOTE,@l_TRN_NO,0);

                EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO,TRN_IS_SUM)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_D_BRANCH_CODE , @l_ASSET_GL, 'VND', 'C', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, @l_DEP_CODE, @l_CORE_NOTE,@l_TRN_NO,1);

			END

    END

    ELSE IF @l_TYPE_ID = 'CCLD'

    BEGIN

              EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ASS_USE', @p_USER_MASTER_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_WAIT_AMORT, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', 

							@sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_USER_MASTER_ID,--N'NHAP MOI TSCD/CCLD'

							@l_ET_ID OUT

				           --Đồng thời kết chuyển tài khoản CCLĐ đang dùng sang tài khoản chờ phân bổ:

              EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO,TRN_IS_SUM)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_D_BRANCH_CODE , @l_WAIT_AMORT, 'VND', 'D', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, @l_DEP_CODE, @l_CORE_NOTE,@l_TRN_NO,0);

              EXEC SYS_CodeMasters_Gen 'ASS_ENTRIES_POST_SYNC', @l_ETP_ID out

              INSERT INTO ASS_ENTRIES_POST_SYNC (ETP_ID, ET_ID, TRN_ID, AC_BRANCH, AC_NO, AC_CCY, DRCR_IND, FCY_AMOUNT, EXCH_RATE, LCY_AMOUNT, RELATED_REFERENCE, TRN_DT, USER_ID, AUTH_ID, DEPT_CD, DESC_TRANS,TRN_NO,TRN_IS_SUM)

              VALUES (@l_ETP_ID, @l_ET_ID,@p_USER_MASTER_ID ,@l_D_BRANCH_CODE , @l_ASSET_GL, 'VND', 'C', @l_BUY_PRICE,1, @l_BUY_PRICE, @l_ASSET_CODE,CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_MAKER_ID, @p_CHECKER_ID, @l_DEP_CODE, @l_CORE_NOTE,@l_TRN_NO,1);

    END

		--END

		--TINH TI LE KHAU HAO

		IF @l_AMORT_MONTH_ASS_USE IS NOT NULL AND @l_AMORT_MONTH_ASS_USE <> 0

			SET @l_AMORT_RATE = ROUND((100*1.0/@l_AMORT_MONTH_ASS_USE)*12, 2)		

		--Update tai san da xuat su dung

		UPDATE ASS_MASTER

		SET	

			AMORT_MONTH = @l_AMORT_MONTH_ASS_USE,

			AMORT_START_DATE = @l_AMORT_START_DATE,

			AMORT_END_DATE = @l_AMORT_END_DATE,			

			FIRST_AMORT_AMT = @l_FIRST_AMORT_AMT,

			MONTHLY_AMORT_AMT = @l_MONTHLY_AMT,

			AMORTIZED_AMT = ISNULL(AMORTIZED_AMT,0),

			AMORTIZED_MONTH = 0,

			AMORT_STATUS = @l_AMORT_STATUS,--'CKH', --Update trang thai cho khau hao			

			ENTRY_BOOKED = 'Y',

			AMORT_RATE = @l_AMORT_RATE,

			USE_DATE_KT = convert(datetime, @sToday, 103)		,

			BRANCH_ID = @l_BRANCH_ID,

			DEPT_ID = @l_DEPT_ID,

			EMP_ID = @l_EMP_ID,

			DIVISION_ID = @l_DIVISION_ID	

		WHERE ASSET_ID = @l_ASSET_ID

		IF @@Error <> 0 GOTO ABORT	

		IF @@Error <> 0 GOTO ABORT

		/***THIEUVQ - 6/11/2018 CAP NHAT LAI DON VI KHI XUAT SU DUNG NEU TS LA XE***/

		UPDATE CAR_MASTER SET BRANCH_ID = @l_BRANCH_ID WHERE ASSET_ID = @l_ASSET_ID

		/***********PHAN BO HOI SO CHIU CHI PHI -- BEGIN 201218**************/

			SET @l_DEP_CODE = (SELECT A.DEP_CODE FROM CM_DEPARTMENT A WHERE A.DEP_ID = @l_DEPT_ID)

			IF @l_DEP_CODE IS NOT NULL AND @l_DEP_CODE <> ''

			BEGIN

				IF @l_BRANCH_ID <> @l_HO_BRN_ID AND LEFT(@l_DEP_CODE,3) = '069' ------CN NHAP NHUNG HOI SO CHIU CHI PHI

				BEGIN

					--LAY PHONG BAN CUA HOI SO TUONG UNG MA PHONG BAN CN

					SET @l_DEPT_ID = (SELECT DEP_ID FROM CM_DEPARTMENT A WHERE A.DEP_CODE = @l_DEP_CODE AND BRANCH_ID = @l_HO_BRN_ID)

					IF @l_DEPT_ID IS NOT NULL AND @l_DEPT_ID <> ''

					BEGIN

						-----THEM VAO BANG ASS_COST_ALLOCATION

						EXEC SYS_CodeMasters_Gen 'ASS_COST_ALLOCATION', @l_COST_MASTER_ID out

						INSERT INTO ASS_COST_ALLOCATION (COS_ID,ASSET_ID,NOTE,TRN_DATE,[RECORD_STATUS],[AUTH_STATUS],[MAKER_ID],[CREATE_DT],EDITOR_ID, EDITOR_DT,[CHECKER_ID],[APPROVE_DT],BRANCH_CREATE,XML_TEMP,SECURE_01,SERCURE_01)

						VALUES(@l_COST_MASTER_ID,@l_ASSET_ID,'AUTO',@CUR_DATE,'1' ,'A',@l_MAKER_ID ,

						@CUR_DATE ,NULL, NULL,@p_CHECKER_ID,

						@CUR_DATE,@l_HO_BRN_ID,NULL,NULL,NULL)		

						-----THEM BANG CHI TIET ASS_COST_ALLOC_DT 100% SO TIEN PHAN BO THANG					

						EXEC SYS_CodeMasters_Gen 'ASS_COST_ALLOC_DT', @l_COSTDT_ID out

						INSERT INTO ASS_COST_ALLOC_DT 

						VALUES(@l_COSTDT_ID,@l_COST_MASTER_ID,@l_HO_BRN_ID,@l_DEPT_ID,@l_MONTHLY_AMT,'100',@l_AMORT_MONTH_ASS_USE,@CUR_DATE, @l_AMORT_END_DATE,0,0,@l_EXP_ACCTNO,'','1' ,'A' ,@l_MAKER_ID ,

						@CUR_DATE ,NULL, NULL,@p_CHECKER_ID,@CUR_DATE)

					END

				END				

			END

			/**************************************************** END 201218************/	

   DECLARE @l_AMORT_RUN_DATE DATETIME = (SELECT TOP 1 TTS.SENT_DATE FROM THREAD_TIME_SEND TTS WHERE TTS.TIME_VALUE = 'KH')

        DECLARE @DATE_EXEC DATETIME=CONVERT(DATETIME, @p_APPROVE_DT, 103)

        IF( DATEDIFF(MONTH,  @l_AMORT_START_DATE, @l_AMORT_RUN_DATE)>0)

        BEGIN

          EXEC ASS_AMORT_BackDate @p_ASSET_ID = @l_ASSET_ID

                                 , @p_MAKER_ID = @l_MAKER_ID

                                 ,@p_CHECKER_ID = @p_CHECKER_ID

                                 ,@p_APPROVE_DT = @DATE_EXEC

                                 ,@p_TRN_ID = @p_USER_MASTER_ID

                                 ,@P_TRN_REF_NO = @l_TRN_NO

                                 ,@p_TRN_TYPE = 'ASS_USE'

        END      

    --PHUCVH 27/02/23 UPDATE BUY_PRICE VÀ REMAIN_VALUE CỦA TÀI SẢN TẠI THỜI ĐIỂM XUẤT

    SELECT @l_BUY_PRICE_UPD = A.BUY_PRICE, @l_REMAIN_VALUE_UPD = ISNULL((A.AMORT_AMT - A.AMORTIZED_AMT), ISNULL(A.AMORT_AMT,0))

    FROM ASS_MASTER A

    WHERE A.ASSET_ID = @ASSET_ID

    UPDATE ASS_USE_MULTI_DT SET BUY_PRICE = @l_BUY_PRICE, REMAIN_VALUE = @l_REMAIN_VALUE_UPD 

    WHERE USE_MULTI_ID = @USE_MULTI_ID AND USER_MASTER_ID = @p_USER_MASTER_ID AND ASSET_ID = @ASSET_ID

		FETCH NEXT FROM XmlData INTO  @USE_MULTI_ID,@ASSET_ID

		END

	CLOSE XmlData

	DEALLOCATE XmlData			

	-- HUYHT 06/05/2022 THAY ĐỔI TRẠNG THÁI UPDATE CŨ THÀNH UPDATE_HC

	UPDATE dbo.PL_PROCESS SET PROCESS_ID = 'UPDATE_KT' 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)

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

		@p_CHECKER_ID,        -- CHECKER_ID - varchar(15)

		GETDATE(), -- APPROVE_DT - datetime

		N'Kiểm soát viên phê duyệt ' ,

		N'Kiểm soát viên phê duyệt hoàn tất'      -- PROCESS_DESC - nvarchar(1000)

	)  

  --PHUCVH 14/11/22 UPDATE TÀI SẢN ĐÃ XONG GIAO DỊCH

  UPDATE ASS_MASTER SET CURRENT_TRANS = NULL, CURRENT_TRANS_TYPE = NULL

  WHERE ASSET_ID IN (SELECT B.ASSET_ID FROM ASS_USE_MULTI_DT B WHERE B.USER_MASTER_ID = @p_USER_MASTER_ID)

COMMIT TRANSACTION

SELECT '0' as Result, '' ErrorDesc

RETURN '0'

END TRY

BEGIN CATCH

	ROLLBACK TRANSACTION

		CLOSE XmlData

		DEALLOCATE XmlData		

		SELECT '-1' as Result, (convert(varchar(100),ERROR_NUMBER()) + ' - ' + ERROR_MESSAGE()) ErrorDesc

		RETURN '-1'

END CATCH

ABORT:

BEGIN

		ROLLBACK TRANSACTION

		CLOSE XmlData

		DEALLOCATE XmlData		

		SELECT '-1' as Result, (convert(varchar(100),ERROR_NUMBER()) + ' - ' + ERROR_MESSAGE() +' - '+ @ERROR) ErrorDesc

		RETURN '-1'

End

ABORT2:

BEGIN

		ROLLBACK TRANSACTION

		CLOSE MYCURSOR

		DEALLOCATE MYCURSOR		

		SELECT '-1' as Result, (convert(varchar(100),ERROR_NUMBER()) + ' - ' + ERROR_MESSAGE() +' - '+ @ERROR) ErrorDesc

		RETURN '-1'

End