ALTER PROC [dbo].[PL_REQUEST_DOC_Settlment]
@p_REQ_ID VARCHAR (15) = NULL,
@p_AMT_SETT DECIMAL(18,2) =NULL,
@p_AMT_USE DECIMAL(18,2) = NULL,
@p_AMT_REVERT DECIMAL(18,2)= NULL
AS
BEGIN TRANSACTION



		DECLARE @ERROR NVARCHAR(500)

		IF(EXISTS(SELECT REQ_ID FROM dbo.PL_REQUEST_DOC WHERE IS_SETTLMENT=1 AND REQ_ID=@p_REQ_ID))
		BEGIN 
			SET @ERROR = (SELECT ErrorDesc FROM dbo.SYS_ERROR WHERE ErrorCode='SETTLMENT-001')
			ROLLBACK TRANSACTION
			SELECT '-1' as Result, @p_REQ_ID AS REQ_PAY_ID, N'Quyết toán tờ trình thất bại! Tờ trình đã được quyết toán' ErrorDesc
			RETURN '-1'
		END
		IF(EXISTS(SELECT REQ_ID FROM dbo.PL_REQUEST_DOC WHERE PROCESS_ID <>'APPROVE' AND REQ_ID=@p_REQ_ID))
		BEGIN 
			--SET @ERROR = (SELECT ErrorDesc FROM dbo.SYS_ERROR WHERE ErrorCode='SETTLMENT-001')
			ROLLBACK TRANSACTION
			SELECT '-1' as Result, @p_REQ_ID AS REQ_PAY_ID, N'Quyết toán tờ trình số '+ (SELECT ISNULL(REQ_CODE, REQ_ID) FROM PL_REQUEST_DOC WHERE REQ_ID=@p_REQ_ID)+N' thất bại! Tờ trình chưa được phê duyệt hoàn tất' ErrorDesc
			RETURN '-1'
		END
		-- KIEM TRA NEU TO TRINH  DANG DUOC THUC HIEN THANH TOAN / TAM UNG THI PHAI HUY PHIEU TRUOC KHI QUYET TOAN TO TRINH
		IF(EXISTS(SELECT A.* FROM TR_REQ_ADVANCE_DT A
		INNER JOIN TR_REQ_ADVANCE_PAYMENT B ON A.REQ_PAY_ID = B.REQ_PAY_ID
		WHERE A.REF_ID IN 
		(
			SELECT CONTRACT_ID FROM TR_CONTRACT
			WHERE REQ_DOC_ID IN (SELECT REQ_ID FROM TR_REQUEST_DOC WHERE PL_REQ_ID =@p_REQ_ID)
			UNION 
			SELECT PO_ID FROM TR_PO_MASTER
			WHERE REQ_DOC_ID IN (SELECT REQ_ID FROM TR_REQUEST_DOC WHERE PL_REQ_ID =@p_REQ_ID)
		)
		AND B.AUTH_STATUS_KT <>'A'))
		BEGIN 
			ROLLBACK TRANSACTION
			SELECT '-1' as Result, @p_REQ_ID AS REQ_PAY_ID, N'Quyết toán tờ trình thất bại! Đang có giao dịch tạm ứng sử dụng ngân sách của tờ trình. Vui lòng hủy phiếu tạm ứng trước khi quyết toán tờ trình' ErrorDesc
			RETURN '-1'
		END
		-- KIEM TRA XEM CO DANG THUC HIEN THANH TOAN HAY KHONG
		IF(EXISTS(SELECT A.* FROM TR_REQ_ADVANCE_DT A
		INNER JOIN TR_REQ_PAYMENT B ON A.REQ_PAY_ID = B.REQ_PAY_ID
		WHERE A.REF_ID IN 
		(
			SELECT CONTRACT_ID FROM TR_CONTRACT
			WHERE REQ_DOC_ID IN (SELECT REQ_ID FROM TR_REQUEST_DOC WHERE PL_REQ_ID =@p_REQ_ID)
			UNION 
			SELECT PO_ID FROM TR_PO_MASTER
			WHERE REQ_DOC_ID IN (SELECT REQ_ID FROM TR_REQUEST_DOC WHERE PL_REQ_ID =@p_REQ_ID)
		)
		AND B.AUTH_STATUS_KT <>'A'))
		BEGIN 
			ROLLBACK TRANSACTION
			SELECT '-1' as Result, @p_REQ_ID AS REQ_PAY_ID, N'Quyết toán tờ trình thất bại! Đang có giao dịch thanh toán sử dụng ngân sách của tờ trình. Vui lòng hủy phiếu thanh toán trước khi quyết toán tờ trình' ErrorDesc
			RETURN '-1'
		END
		--- KIEM TRA DANH SACH NGAN SACH CUA NHUNG PDN THANH TOAN CO SU DUNG NGAN SACH CUA TO TRINH

		IF(EXISTS(SELECT * FROM dbo.TR_REQUEST_DOC WHERE PL_REQ_ID =@p_REQ_ID AND PROCESS_ID <> 'APPROVE' ) )
		BEGIN
			ROLLBACK TRANSACTION
			SELECT '-1' as Result, @p_REQ_ID AS REQ_PAY_ID, N'Quyết toán tờ trình thất bại! Đang tồn tại phiếu yêu cầu mua sắm chưa được phê duyệt' ErrorDesc
			RETURN '-1'
		END

		--IF(EXISTS(SELECT * FROM dbo.TR_REQUEST_DOC WHERE PL_REQ_ID =@p_REQ_ID AND PROCESS_ID = 'APPROVE' ) )
		--BEGIN
		--	ROLLBACK TRANSACTION
		--	SELECT '-1' as Result, @p_REQ_ID AS REQ_PAY_ID, N'Quyết toán tờ trình thất bại! Đang tồn tại phiếu yêu cầu mua sắm chưa được phê duyệt' ErrorDesc
		--	RETURN '-1'
		--END

			DECLARE @listTRADE TABLE
			(
				TRADE_ID VARCHAR(20),
				AMT_APP DECIMAL(18,2),
				AMT_ROLEBACK DECIMAL(18,2)
			)

			INSERT @listTRADE
			SELECT TRADE_ID,SUM(TOTAL_AMT),0 FROM dbo.PL_REQUEST_DOC_DT WHERE REQ_ID=@p_REQ_ID GROUP BY TRADE_ID
		-- LAY DS PYCMS CUA TO TRINH
			DECLARE @listID TABLE (
				TR_REQ_ID VARCHAR(15)
			)

			INSERT INTO @listID
			SELECT REQ_ID FROM dbo.TR_REQUEST_DOC WHERE PL_REQ_ID=@p_REQ_ID
			DECLARE @listREF TABLE (
				REF_ID VARCHAR(15)
			)
			INSERT INTO @listREF
			SELECT CONTRACT_ID FROM TR_CONTRACT T
			WHERE EXISTS  (SELECT REQ_DOC_ID  FROM @listID L WHERE T.REQ_DOC_ID=L.TR_REQ_ID)
			UNION 
			SELECT PO_ID FROM TR_PO_MASTER P
			WHERE EXISTS (SELECT REQ_DOC_ID FROM @listID L WHERE P.REQ_DOC_ID=L.TR_REQ_ID)

			DECLARE @listREQPAYID TABLE (
			
				REQ_PAY_ID VARCHAR(20)
			)
			INSERT INTO @listREQPAYID
			SELECT REQ_PAY_ID FROM dbo.TR_REQ_ADVANCE_DT A WHERE EXISTS (SELECT REF_ID FROM @listREF B WHERE B.REF_ID=A.REF_ID)
			
			DECLARE @listTRADE_EXE TABLE
			(
				TRADE_ID VARCHAR(20),
				AMT_EXE DECIMAL(18,2)
				
			)
			INSERT INTO @listTRADE_EXE		
			SELECT T.TRADE_ID,SUM(T.AMT_EXE)  FROM dbo.TR_REQ_PAY_BUDGET T WHERE EXISTS(SELECT  L.REQ_PAY_ID FROM @listREQPAYID L WHERE L.REQ_PAY_ID=T.REQ_PAY_ID) GROUP BY T.TRADE_ID


			UPDATE @listTRADE SET AMT_ROLEBACK=AMT_APP-(SELECT AMT_EXE FROM @listTRADE_EXE WHERE [@listTRADE].TRADE_ID=[@listTRADE_EXE].TRADE_ID) WHERE EXISTS (SELECT TRADE_ID FROM @listTRADE_EXE WHERE [@listTRADE].TRADE_ID=[@listTRADE_EXE].TRADE_ID)
			

			UPDATE dbo.PL_TRADEDETAIL SET AMT_ETM=AMT_ETM- (SELECT AMT_ROLEBACK FROM @listTRADE WHERE [@listTRADE].TRADE_ID=PL_TRADEDETAIL.TRADE_ID)  
			WHERE EXISTS (SELECT TRADE_ID FROM @listTRADE WHERE [@listTRADE].TRADE_ID=PL_TRADEDETAIL.TRADE_ID)


			UPDATE dbo.PL_REQUEST_DOC SET IS_SETTLMENT=1 WHERE REQ_ID=@p_REQ_ID
		

COMMIT TRANSACTION
SELECT '0' as Result, @p_REQ_ID  REQ_PAY_ID ,N'Quyết toán tờ trình thành công' ErrorDesc
RETURN '0'
ABORT:
BEGIN
		ROLLBACK TRANSACTION
		SELECT '-1' as Result, @p_REQ_ID AS REQ_PAY_ID, N'Quyết toán tờ trình thất bại' ErrorDesc
		RETURN '-1'
END