USE [gAMSPro_VCCB_v2]
GO
/****** Object:  StoredProcedure [dbo].[CM_ACCOUNT_PAY_Appr]    Script Date: 3/17/2021 2:16:35 PM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROC [dbo].[CM_ACCOUNT_PAY_Appr]
@p_ID INT =0,
@p_ACC_NO VARCHAR(250) = NULL,
@p_AUTH_STATUS VARCHAR(1),
@p_CHECKER_ID VARCHAR(12),
@p_APPROVE_DT DATETIME
AS
BEGIN TRANSACTION
IF(EXISTS(SELECT * FROM TR_REQ_ADVANCE_PAYMENT WHERE AUTH_STATUS_KT ='A' AND REQ_TYPE='I' AND RECEIVER_DEBIT =@p_ACC_NO))
BEGIN
	ROLLBACK TRANSACTION
	SELECT '-1' as Result, '' ACC_ID, N'Tài khoản tạm ứng ' + @p_ACC_NO + N' đã được sử dụng để tạm ứng (đã bắn bút toán tạm ứng vào core)' ErrorDesc
	RETURN '-1'
END
UPDATE CM_ACCOUNT_PAY SET AUTH_STATUS ='A', CHECKER_ID =@p_CHECKER_ID, APPROVE_DT = GETDATE() WHERE ID =@p_ID AND ACC_NUM =@p_ACC_NO
--- UPDATE TAT CA NHUNG GIAO DICH TAM UNG NOI BO NAO CO SU DUNG TAI KHOAN TAM UNG
--UPDATE TR_REQ_ADVANCE_PAYMENT SET RECEIVER_DEBIT =@p_ACC_NO WHERE REF_ID =(SELECT TOP 1 REF_ID FROM CM_ACCOUNT WHERE ACC_NO =@p_ACC_NO) AND REQ_TYPE ='I'
--- UPDATE TAT CA NHUNG GIAO DICH TAM UNG NOI BO NAO CO SU DUNG TAI KHOAN TAM UNG
UPDATE TR_REQ_PAY_ENTRIES SET ACCT =@p_ACC_NO, ACCT_NAME =(SELECT TOP 1 ACC_NUM FROM CM_ACCOUNT_PAY WHERE ACC_NUM =@p_ACC_NO) WHERE REQ_PAY_ID IN (SELECT REQ_PAY_ID FROM TR_REQ_ADVANCE_PAYMENT WHERE RECEIVER_DEBIT =@p_ACC_NO AND REF_ID =(SELECT TOP 1 REF_ID FROM CM_ACCOUNT WHERE ACC_NO =@p_ACC_NO) AND REQ_TYPE ='I')

COMMIT TRANSACTION
SELECT '0' as Result, ''  ACC_ID, '' ErrorDesc
RETURN '0'
ABORT:
BEGIN
		ROLLBACK TRANSACTION
		SELECT '-1' as Result, '' ACC_ID, '' ErrorDesc
		RETURN '-1'
END