DỰ ÁN PHẦN MỀM QUẢN LÝ TÀI SẢN - NH BẢN VIỆT - GD3

ALTER PROCEDURE [dbo].[REAL_ESTATE_L_C_Del]

@P_RET_L_C_ID	varchar(15)

AS

	DECLARE @ERRORSYS NVARCHAR(15) = '' 

	IF ( NOT EXISTS ( SELECT * FROM REAL_ESTATE_L_C WHERE  RET_L_C_ID= @P_RET_L_C_ID))

		SET @ERRORSYS = ''

	IF( EXISTS (SELECT * FROM REAL_ESTATE_L_C WHERE RECORD_STATUS <> '1' AND AUTH_STATUS = 'A' AND [RET_L_C_ID] = @P_RET_L_C_ID))

		SET @ERRORSYS = '241'

	IF @ERRORSYS <> ''

	BEGIN

		SELECT ErrorCode Result, ErrorDesc ErrorDesc FROM SYS_ERROR WHERE ErrorCode = @ERRORSYS 

		RETURN '0'

	END

BEGIN TRANSACTION

	IF( (SELECT CHECKER_ID FROM REAL_ESTATE_L_C WHERE  RET_L_C_ID= @P_RET_L_C_ID) IS NOT NULL)

	BEGIN

		UPDATE REAL_ESTATE_L_C SET RECORD_STATUS = '0' 

		WHERE RET_L_C_ID = @P_RET_L_C_ID

		IF @@Error <> 0 GOTO ABORT

	END

	------------BAODNQ 10/3/2022 : KO CHO XÓA  BDS KHI ĐÃ GỬI YC PHÊ DUYỆT------

	IF(EXISTS(SELECT * FROM REAL_ESTATE_L_C WHERE RET_L_C_ID = @P_RET_L_C_ID AND IS_SEND_APPR = 'Y'))

	BEGIN

		ROLLBACK TRANSACTION

		SELECT '-1' as Result, N'Không thể xóa BDS đang hoàn thiện thủ tục pháp lý đã được gửi yêu cầu phê duyệt' ErrorDesc

		RETURN '-1'

	END

	ELSE

	BEGIN

		Delete FROM REAL_ESTATE_L_C WHERE  RET_L_C_ID= @P_RET_L_C_ID

		IF @@Error <> 0 GOTO ABORT

	END

COMMIT TRANSACTION

SELECT '0' as Result, '' ErrorDesc

RETURN '0'

ABORT:

BEGIN

		ROLLBACK TRANSACTION

		SELECT '-1' as Result, '' ErrorDesc

		RETURN '-1'

End