Project

General

Profile

TRANS DEL.txt

Luc Tran Van, 03/02/2021 10:06 AM

 
1

    
2
--
3
--INSERT INTO SYS_PREFIX (ID,Prefix,[Description]) VALUES ('TR_REQ_PAY_TRANSFER','TRPTF',N'Điều chuyển tạm ứng')
4
--INSERT INTO SYS_PREFIX (ID,Prefix,[Description]) VALUES ('TR_REQ_PAY_TRANSFER_DT','TRTFDT',N'Điều chuyển tạm ứng chi tiết')
5
--
6
ALTER PROCEDURE [dbo].[TR_REQ_PAY_TRANSFER_DEL]
7
@p_TRANSFER_ID	varchar(15)
8
AS
9
BEGIN TRANSACTION
10
		IF(EXISTS(SELECT * FROM TR_REQ_PAY_TRANSFER WHERE AUTH_STATUS ='A' AND TRANSFER_ID =@p_TRANSFER_ID))
11
		BEGIN
12
			ROLLBACK TRANSACTION
13
			SELECT '-1' as Result, @p_TRANSFER_ID  TRANSFER_ID, N'Giao dịch điều chuyển tạm ứng có ID: '+ @p_TRANSFER_ID +N' đã được phê duyệt hoàn tất. Vì vậy bạn không được phép xóa' ErrorDesc
14
			RETURN '-1'
15
		END
16
		ELSE
17
		BEGIN
18
			--DELETE FROM TR_REQ_PAY_TRANSFER WHERE TRANSFER_ID =@p_TRANSFER_ID
19
			--DELETE FROM TR_REQ_PAY_TRANSFER_DT WHERE TRANSFER_ID =@p_TRANSFER_ID
20
			--DELETE FROM TR_REQ_PAY_ENTRIES WHERE REQ_PAY_ID =@p_TRANSFER_ID
21
			UPDATE TR_REQ_PAY_TRANSFER SET AUTH_STATUS ='D' WHERE TRANSFER_ID =@p_TRANSFER_ID
22
		END
23
		
24
COMMIT TRANSACTION
25
SELECT '0' as Result, @p_TRANSFER_ID  TRANSFER_ID, N'Giao dịch điều chuyển tạm ứng có ID: '+ @p_TRANSFER_ID +N' đã được xóa thành công khỏi hệ thống' ErrorDesc
26
RETURN '0'
27
ABORT:
28
BEGIN
29
		CLOSE AssetDetail
30
		DEALLOCATE AssetDetail
31
		CLOSE PaymentDetail
32
		DEALLOCATE PaymentDetail
33
		ROLLBACK TRANSACTION
34
		SELECT '-1' as Result, '' TRANSFER_ID, '' ErrorDesc
35
		RETURN '-1'
36
End
37

    
38

    
39

    
40

    
41