Project

General

Profile

CM_GOODS_Ins.txt

Luc Tran Van, 02/27/2023 11:38 AM

 
1

    
2
ALTER PROCEDURE dbo.CM_GOODS_Ins
3
	@p_GD_CODE	varchar(150)  = NULL,
4
	@p_GD_NAME	nvarchar(200)  = NULL,
5
	@p_GD_TYPE_ID	varchar(15)  = NULL,
6
	@p_DESCRIPTION	nvarchar(2000)  = NULL,
7
	@p_SUP_ID	varchar(15)  = NULL,
8
	@p_PRICE	decimal(18)  = NULL,
9
	@p_UNIT_ID	varchar(15)  = NULL,
10
	@p_NOTES	nvarchar(1000)  = NULL,
11
	@p_RECORD_STATUS	varchar(1)  = NULL,
12
	@p_MAKER_ID	varchar(12)  = NULL,
13
	@p_CREATE_DT	VARCHAR(20) = NULL,
14
	@p_AUTH_STATUS	varchar(50)  = NULL,
15
	@p_CHECKER_ID	varchar(12)  = NULL,
16
	@p_APPROVE_DT	VARCHAR(20) = NULL,
17
	@p_MONTHLY_ALLOCATED VARCHAR(20) = NULL,
18
	@p_DVDM_ID VARCHAR(20) = NULL
19
AS
20
	DECLARE @l_GD_ID VARCHAR(15)
21

    
22
	DECLARE @ERRORSYS NVARCHAR(15) = '' 
23
	IF ( EXISTS ( SELECT * FROM CM_GOODS WHERE GD_CODE = @p_GD_CODE AND RECORD_STATUS = '1'))
24
		SET @ERRORSYS = 'CMCD-00001'	
25
	IF @ERRORSYS <> '' 
26
	BEGIN
27
		SELECT ErrorCode Result, '' ID, ErrorDesc ErrorDesc FROM SYS_ERROR WHERE ErrorCode = @ERRORSYS
28
		RETURN '0'
29
	END 
30

    
31
	
32
BEGIN TRANSACTION
33

    
34
		EXEC SYS_CodeMasters_Gen 'CM_GOODS', @l_GD_ID out
35
		IF @l_GD_ID='' OR @l_GD_ID IS NULL GOTO ABORT
36
	
37
		INSERT INTO CM_GOODS([GD_ID],[GD_CODE],[GD_NAME],[GD_TYPE_ID],[DESCRIPTION],[SUP_ID],[PRICE],[UNIT_ID],[NOTES],[RECORD_STATUS],[MAKER_ID],[CREATE_DT],[AUTH_STATUS],[CHECKER_ID],[APPROVE_DT],[MONTHLY_ALLOCATED],[DVDM_ID])
38
		VALUES(@l_GD_ID ,@p_GD_CODE ,@p_GD_NAME ,@p_GD_TYPE_ID ,@p_DESCRIPTION ,@p_SUP_ID ,@p_PRICE ,@p_UNIT_ID ,@p_NOTES ,'1' ,@p_MAKER_ID ,CONVERT(DATETIME, @p_CREATE_DT, 103) ,@p_AUTH_STATUS ,@p_CHECKER_ID ,CONVERT(DATETIME, @p_APPROVE_DT, 103),@p_MONTHLY_ALLOCATED,@p_DVDM_ID)
39

    
40
    INSERT INTO CM_GOOD_DVDM (GD_ID, DVDM_ID)
41
    VALUES(@l_GD_ID,@p_DVDM_ID)
42
		IF @@Error <> 0 GOTO ABORT
43
		
44
COMMIT TRANSACTION
45
SELECT 0 as Result, @l_GD_ID  ID, '' ErrorDesc
46
RETURN 0
47
ABORT:
48
BEGIN
49
		ROLLBACK TRANSACTION
50
		SELECT -1 as Result, '' ID, '' ErrorDesc
51
		RETURN -1
52
End
53