ALTER PROCEDURE [dbo].[CAR_DRIVE_Upd]
@p_CAR_DR_ID VARCHAR(15) = NULL,
@p_CAR_ID	varchar(15)  = NULL,
@p_ASSET_ID	varchar(15)  = NULL,
@p_ASSET_NAME	nvarchar(200)  = NULL,
@p_OLD_INDEX_NUMBER	decimal(18)  = NULL,
@p_NEW_INDEX_NUMBER	decimal(18)  = NULL,
@p_INDEX_NUMBER	decimal(18)  = NULL,
@p_POWER_RATE	decimal(18,2)  = NULL,
@p_POWER_RATE_INDEX	decimal(18,2)  = NULL,
@p_CURR_POWER_RATE	decimal(18,2)  = NULL,
@p_INPUT_DT	VARCHAR(20) = NULL,
@p_ISLEAF	varchar(1)  = NULL,
@p_PARENT_ID	varchar(15)  = NULL,
@p_NOTES	nvarchar(1000)  = NULL,
@p_RECORD_STATUS	varchar(1)  = NULL,
@p_MAKER_ID	varchar(12)  = NULL,
@p_CREATE_DT	VARCHAR(20) = NULL,
@p_AUTH_STATUS	varchar(50)  = NULL,
@p_CHECKER_ID	varchar(12)  = NULL,
@p_APPROVE_DT	VARCHAR(20) = NULL,
@p_DR_ROUTE nvarchar(200) = NULL, --vietpq hieu chinh URD 09/12/2019
-- doanptt 14/02/2022
@p_REQ_PAY_ID VARCHAR(15) = NULL,
@p_NEW_FUEL_NUMBER	DECIMAL(18,2)  = NULL, --PhongNT 13/05/2022 Bổ sung nhiên liệu
@p_OLD_FUEL_NUMBER	DECIMAL(18,2) = NULL,
@p_REQ_CAR_ID		VARCHAR(15) =NULL, -- PYC XE 
@p_DRIVE_DETAIL XML = NULL
AS
	
--	DECLARE @ERRORSYS NVARCHAR(15)
--	
--	IF( @ERRORSYS <> '' )
--	BEGIN
--		SELECT ErrorCode Result, '' CAR_DR_ID, ErrorDesc ErrorDesc FROM SYS_ERROR WHERE ErrorCode = @ERRORSYS
--		RETURN '0'
--	END

--  IF ( EXISTS ( SELECT 1 FROM CAR_DRIVE WHERE REQ_CAR_ID = @p_REQ_CAR_ID AND CAR_DR_ID<>@p_CAR_DR_ID))
--	BEGIN
--	  	SELECT '-1' Result, '' CAR_DR_ID, N'Sửa thông tin phiếu vận hành thất bại! Phiếu yêu cầu xe đã tồn tại trong thông tin vận hành xe' ErrorDesc 
--		  RETURN '-1'
--	END
   DECLARE @Note NVARCHAR(max)
    SELECT @Note=N'Chỉ số km cũ thay đổi từ: '+cast(cd.OLD_INDEX_NUMBER AS varchar(50))+' - '+cast(@p_OLD_INDEX_NUMBER AS varchar(50))+CHAR(10)+
                 N'Chỉ số km mới thay đổi từ: '+cast(cd.NEW_INDEX_NUMBER AS varchar(50))+' - '+cast(@p_NEW_INDEX_NUMBER AS varchar(50))+CHAR(10)+
                 N'Chỉ số nhiên liệu mới thay đổi từ: '+cast(cd.NEW_FUEL_NUMBER AS varchar(50))+' - '+cast(@p_NEW_FUEL_NUMBER AS varchar(50))+CHAR(10)
    FROM CAR_DRIVE cd WHERE cd.CAR_DR_ID=@P_CAR_DR_ID

	Declare @hdoc INT
	Exec sp_xml_preparedocument @hdoc Output,@p_DRIVE_DETAIL
	DECLARE DriveDetail CURSOR FOR
	SELECT *
	FROM OPENXML(@hDoc,'/Root/DriveDetail',2)
	WITH 
	(
		DRDT_ID VARCHAR(15),
		INVOICE_NO nvarchar(100),
		INVOICE_DT VARCHAR(20),
		INVOICE_AMT DECIMAL(18,0),
		CAR_DR_TYPE nvarchar(200), --vietpq hieu chinh URD 09/12/2019
		NOTES nvarchar(MAX) --vietpq hieu chinh URD 09/12/2019
	)
	OPEN DriveDetail
BEGIN TRANSACTION
	---- LUCTV 26062023_SECRETKEY: KIỂM TRA NẾU CHƯA KHAI BÁO THÔNG TIN VẬN HÀNH XE THÌ BẮT BUỘC PHẢI KHAI BÁO TRƯỚC KHI LÀM PYC XE
		IF(NOT EXISTS(SELECT * FROM CAR_DRIVE WHERE CAR_ID =@p_CAR_ID AND ISNULL(ISLEAF,'') ='Y' )) 
		BEGIN
			ROLLBACK TRANSACTION
			SELECT '-1' Result, '' REQ_ID, N'Cập nhật phiếu vận hành xe thất bại. Xe chưa được khai báo thông tin số km tồn đầu, số nhiên liệu tồn đầu. Vui lòng tra cứu thông tin xe để kiểm tra thông tin' ErrorDesc
			RETURN '-1'
		END
		---- LUCTV 29062023_SECRETKEY:CHỈ CHO PHÉP PHÒNG HÀNH CHÍNH HỘI SỞ ĐƯỢC PHÉP ĐIỀU CHỈNH SỐ XĂNG ĐẦU KỲ, SỐ KM ĐẦU KỲ
		DECLARE @l_FUEL_INDEX_FROM DECIMAL(18,2), @l_KM_INDEX_FROM DECIMAL(18,2)
		SET @l_FUEL_INDEX_FROM = (SELECT TOP 1 ISNULL(NEW_FUEL_NUMBER,0) FROM CAR_DRIVE WHERE CAR_ID =@p_CAR_ID AND ISNULL(ISLEAF,'') ='Y' AND RECORD_STATUS ='1')
		SET @l_KM_INDEX_FROM = (SELECT TOP 1 ISNULL(NEW_INDEX_NUMBER,0) FROM CAR_DRIVE WHERE CAR_ID =@p_CAR_ID AND ISNULL(ISLEAF,'') ='Y' AND RECORD_STATUS='1')
		IF(ISNULL(@l_FUEL_INDEX_FROM,0) <> @p_OLD_FUEL_NUMBER OR ISNULL(@l_KM_INDEX_FROM,0) <> @p_OLD_INDEX_NUMBER)
		BEGIN
			IF(NOT EXISTS (SELECT * FROM TL_USER WHERE TLNANME=@p_MAKER_ID AND SECUR_CODE IN (SELECT DEP_ID FROM CM_DEPARTMENT WHERE DEP_CODE ='0690604')))
			BEGIN
				ROLLBACK TRANSACTION
				SELECT '-1' Result, '' REQ_ID, N'Cập nhật phiếu vận hành xe thất bại. Bạn không được phép điều chỉnh thông tin chỉ số nhiên liệu cũ, chỉ số km cũ. Chức năng này chỉ dành cho nhóm người dùng Phòng Hành Chính - Hội Sở' ErrorDesc
				RETURN '-1'
			END
		END
		--- END
		DECLARE @l_CAR_DR_ID VARCHAR(15)
		
		IF @p_INPUT_DT = '' SET @p_INPUT_DT = NULL
		IF @p_CREATE_DT = '' SET @p_CREATE_DT = NULL
		IF @p_APPROVE_DT = '' SET @p_APPROVE_DT = NULL
		---- LUCTV 28062023_SECRETKEY KHI CAP NHAT THONG TIN PHIEU VAN HANH CHỈ LƯU LOG, KHÔNG CẦN UPDATE MAKKER_ID
		UPDATE CAR_DRIVE SET [CAR_ID] = @p_CAR_ID,[ASSET_ID] = @p_ASSET_ID,[ASSET_NAME] = @p_ASSET_NAME,
		[OLD_INDEX_NUMBER] = @p_OLD_INDEX_NUMBER,[NEW_INDEX_NUMBER] = @p_NEW_INDEX_NUMBER,
		[INDEX_NUMBER] = @p_INDEX_NUMBER,[POWER_RATE] = @p_POWER_RATE,[POWER_RATE_INDEX] = @p_POWER_RATE_INDEX,
		[CURR_POWER_RATE] = @p_CURR_POWER_RATE,[DR_ROUTE] = @p_DR_ROUTE,[INPUT_DT] = CONVERT(DATETIME, @p_INPUT_DT, 103), 
		[ISLEAF] = @p_ISLEAF,[PARENT_ID] = @p_PARENT_ID,[NOTES] = @p_NOTES,[RECORD_STATUS] = @p_RECORD_STATUS,
		[CREATE_DT] = CONVERT(DATETIME, @p_CREATE_DT, 103),
		[AUTH_STATUS] = @p_AUTH_STATUS,[CHECKER_ID] = @p_CHECKER_ID,
		[APPROVE_DT] = CONVERT(DATETIME, @p_APPROVE_DT, 103),[REQ_PAY_ID] = @p_REQ_PAY_ID,[REQ_CAR_ID]=@p_REQ_CAR_ID,[OLD_FUEL_NUMBER]=@p_OLD_FUEL_NUMBER,[NEW_FUEL_NUMBER]=@p_NEW_FUEL_NUMBER
		WHERE  CAR_DR_ID = @p_CAR_DR_ID
		IF @@Error <> 0 GOTO ABORT

		--INSERT CAR DRIVE DETAIL
		DECLARE
		@DRDT_ID VARCHAR(15),
		@INVOICE_NO nvarchar(100),
		@INVOICE_DT VARCHAR(20),
		@INVOICE_AMT DECIMAL(18,0),
		@CAR_DR_TYPE nvarchar(200), --vietpq hieu chinh URD 09/12/2019
		@NOTES nvarchar(MAX) --vietpq hieu chinh URD 09/12/2019

		DELETE FROM CAR_DRIVE_DT WHERE CAR_DR_ID = @P_CAR_DR_ID
		PRINT 'INSERT MASTER SUCCESS'
		FETCH NEXT FROM DriveDetail INTO @DRDT_ID,@INVOICE_NO,@INVOICE_DT,@INVOICE_AMT, @CAR_DR_TYPE, @NOTES
		PRINT 'FETCH  FIRST ROW'
		
		WHILE @@FETCH_STATUS = 0
		BEGIN
			IF LEN (@DRDT_ID) = 0
			BEGIN
				EXEC SYS_CodeMasters_Gen 'CAR_DRIVE_DT', @DRDT_ID out
				IF @DRDT_ID='' OR @DRDT_ID IS NULL GOTO ABORT
			END
			IF @INVOICE_DT = '' SET @INVOICE_DT = NULL
			PRINT 'INSERT FIRST ROW'
			INSERT INTO CAR_DRIVE_DT
			VALUES(@DRDT_ID ,@P_CAR_DR_ID ,@INVOICE_NO,CONVERT(DATETIME,@INVOICE_DT,103),@INVOICE_AMT,@CAR_DR_TYPE,@NOTES)

			FETCH NEXT FROM DriveDetail INTO @DRDT_ID,@INVOICE_NO,@INVOICE_DT,@INVOICE_AMT, @CAR_DR_TYPE, @NOTES
		END
	
		CLOSE DriveDetail
		DEALLOCATE DriveDetail

    
    INSERT INTO PL_PROCESS (REQ_ID, PROCESS_ID, CHECKER_ID, APPROVE_DT, PROCESS_DESC, NOTES)
  VALUES (@P_CAR_DR_ID, 'CAR_DIVE', @p_MAKER_ID, GETDATE(), @Note, N'Chỉnh sửa phiếu vận hành');

COMMIT TRANSACTION
SELECT '0' as Result, @p_CAR_DR_ID  CAR_DR_ID, '' ErrorDesc
RETURN '0'
ABORT:
BEGIN
		ROLLBACK TRANSACTION
		SELECT '-1' as Result, '' CAR_DR_ID, '' ErrorDesc
		RETURN '-1'
End