Project

General

Profile

1.0 CONFIG GIA MUA SAM THUC TE KHONG DUOC LON HON GIA DU KIEN.txt

Luc Tran Van, 10/04/2021 05:05 PM

 
1
ALTER PROCEDURE [dbo].[TR_REQ_PROCESS_CHILD_Upd]
2
@p_REQ_ID VARCHAR(20),
3
@p_PROCESS_ID VARCHAR(20),
4
@p_TLNAME VARCHAR(20),
5
@p_MAKER_ID VARCHAR(20),
6
@p_TYPE_JOB VARCHAR(20),
7
@p_REF_ID INT
8
AS
9
BEGIN TRANSACTION
10

    
11
DECLARE @LEVEL INT
12
		DECLARE @REQ_DT DATE
13
		SET @REQ_DT =(SELECT REQ_DT FROM TR_REQUEST_DOC WHERE REQ_ID =@p_REQ_ID)
14
		IF(EXISTS(SELECT REQDT_ID FROM dbo.TR_REQUEST_DOC_DT WHERE REQ_DOC_ID=@p_REQ_ID AND TRAN_TYPE_ID NOT IN (SELECT TRAN_TYPE_ID FROM dbo.CM_TRAN_TYPE WHERE NOTES='XK') AND (PRICE IS NULL OR PRICE=0)   ))
15
		BEGIN
16
			ROLLBACK TRANSACTION
17
				SELECT -1 as Result, N'Lưới thông tin chi tiết mua sắm thực tế: Vui lòng nhập đơn giá thực tế' ErrorDesc
18
				RETURN -1
19
		END
20
		IF(NOT EXISTS(SELECT REQDT_ID FROM dbo.TR_REQUEST_DOC_DT WHERE REQ_DOC_ID=@p_REQ_ID))
21
		BEGIN
22
			ROLLBACK TRANSACTION
23
				SELECT -1 as Result, N'Lưới thông tin chi tiết mua sắm thực tế không được phép để trống' ErrorDesc
24
				RETURN -1
25
		END
26
		IF(EXISTS(SELECT REQDT_ID FROM dbo.TR_REQUEST_DOC_DT WHERE REQ_DOC_ID=@p_REQ_ID AND (SUP_ID IS NULL OR SUP_ID='')))
27
		BEGIN
28
			ROLLBACK TRANSACTION
29
				SELECT -1 as Result, N'Lưới thông tin chi tiết mua sắm thực tế: Vui lòng chọn nhà cung cấp có sẵn trong hệ thống hoặc lựa chọn nhà cung cấp thông qua hồ sơ thầu' ErrorDesc
30
				RETURN -1
31
		END
32
		IF(EXISTS(SELECT REQDT_ID FROM dbo.TR_REQUEST_DOC_DT WHERE REQ_DOC_ID=@p_REQ_ID AND (TRAN_TYPE_ID IS NULL OR TRAN_TYPE_ID='')   ))
33
		BEGIN
34
			ROLLBACK TRANSACTION
35
				SELECT -1 as Result, N'Lưới thông tin chi tiết mua sắm thực tế: Vui lòng chọn hình thức mua sắm' ErrorDesc
36
				RETURN -1
37
		END
38
		---LUCTV 29092021 BO SUNG CHAN KHONG CHO GIA THUC TE LON HON GIA DU KIEN
39
		IF(EXISTS(SELECT REQDT_ID FROM dbo.TR_REQUEST_DOC_DT WHERE REQ_DOC_ID=@p_REQ_ID AND ISNULL(PRICE,0) > ISNULL(PRICE_ETM,0)))
40
		BEGIN
41
			ROLLBACK TRANSACTION
42
				SELECT -1 as Result, N'Lưới thông tin chi tiết mua sắm thực tế: Đơn giá thực tế phải nhỏ hơn đơn giá dự kiến theo tờ trình' ErrorDesc
43
				RETURN -1
44
		END
45
		IF(EXISTS(SELECT REQDT_ID FROM dbo.TR_REQUEST_DOC_DT WHERE REQ_DOC_ID=@p_REQ_ID AND CONVERT(DATE, REQ_DT, 103) <= CONVERT(DATE, @REQ_DT, 103)))
46
		BEGIN
47
			ROLLBACK TRANSACTION
48
				SELECT -1 as Result, N'Lưới thông tin chi tiết mua sắm thực tế: Ngày cần phải lớn hơn ngày yêu cầu mua sắm' ErrorDesc
49
				RETURN -1
50
		END
51
		UPDATE dbo.PL_REQUEST_PROCESS_CHILD SET STATUS_JOB='P'
52
		WHERE REQ_ID=@p_REQ_ID AND PROCESS_ID=@p_REF_ID AND TLNAME=@p_TLNAME AND TYPE_JOB='XL'
53
		SET @LEVEL=ISNULL((SELECT TOP 1 LEVEL_JOB 
54
		FROM dbo.PL_REQUEST_PROCESS_CHILD 
55
		WHERE REQ_ID=@p_REQ_ID AND PROCESS_ID=@p_REF_ID AND TLNAME=@p_TLNAME AND TYPE_JOB='XL'
56
		ORDER BY LEVEL_JOB DESC),0)
57

    
58
		UPDATE dbo.PL_REQUEST_PROCESS_CHILD SET STATUS_JOB='C'
59
		WHERE REQ_ID=@p_REQ_ID AND PROCESS_ID=@p_REF_ID AND LEVEL_JOB=(@LEVEL-1)
60

    
61

    
62
		INSERT INTO dbo.PL_PROCESS
63
		(
64
			REQ_ID,
65
			PROCESS_ID,
66
			CHECKER_ID,
67
			APPROVE_DT,
68
			PROCESS_DESC,
69
			NOTES
70
		)
71
		VALUES
72
		(   @p_REQ_ID,        -- REQ_ID - varchar(15)
73
			--@p_PROCESS_ID,        -- PROCESS_ID - varchar(10)
74
			'SEND',
75
			@p_TLNAME,        -- CHECKER_ID - varchar(15)
76
			GETDATE(), -- APPROVE_DT - datetime
77
			N'Nhân viên hoàn tất xử lý phiếu và gửi phê duyệt thành công' ,       -- PROCESS_DESC - nvarchar(1000)
78
			N'Nhân viên xử lý gửi phê duyệt '        -- NOTES - nvarchar(1000)
79
			)
80
	
81
		IF @@Error <> 0 GOTO ABORT
82
COMMIT TRANSACTION
83
SELECT 0 as Result, '' ErrorDesc
84
RETURN 0
85
ABORT:
86
BEGIN
87
		ROLLBACK TRANSACTION
88
		SELECT -1 as Result, '' ErrorDesc
89
		RETURN -1
90
End
91

    
92

    
93

    
94

    
95

    
96