KJL

??ALTER PROCEDURE [dbo].[PFILOUPDATEPURCHASESTATUS]

(

	@MaterialID VARCHAR(20)

	,@Quantity DECIMAL(22,0)

	,@TotalPrice DECIMAL(20,0)

	,@DocType VARCHAR(20)

	,@UserID VARCHAR(20)

	,@CompanyID VARCHAR(20)

	,@LogisticArea VARCHAR(20)

	,@Warehouse VARCHAR(20)

	,@Storage VARCHAR(20)

	,@Bin VARCHAR(20)

	,@ReceiverLogisticArea VARCHAR(20)

	,@ReceiverWarehouse VARCHAR(20) 

	,@ReceiverStorage VARCHAR(20)

	,@ReceiverBin VARCHAR(20)

	,@DocIDRef VARCHAR(20)

	,@DocNo VARCHAR(20)

	,@DocStatus VARCHAR(20)

)

AS

--DECLARE @MaterialID VARCHAR(20) = ''

--DECLARE @Quantity DECIMAL(22,0) = 0

--DECLARE @TotalPrice DECIMAL(20,0) = 0

--DECLARE @DocType VARCHAR(20) = 'PO'

--DECLARE @UserID VARCHAR(20) = 'tri'

--DECLARE @CompanyID VARCHAR(20) = ''

--DECLARE @LogisticArea VARCHAR(20) = ''

--DECLARE @Warehouse VARCHAR(20) = ''

--DECLARE @Storage VARCHAR(20) = ''

--DECLARE @Bin VARCHAR(20) = ''

--DECLARE @ReceiverLogisticArea VARCHAR(20) = ''

--DECLARE @ReceiverWarehouse VARCHAR(20) = ''

--DECLARE @ReceiverStorage VARCHAR(20) = ''

--DECLARE @ReceiverBin VARCHAR(20) = ''

--DECLARE @DocIDRef VARCHAR(20) = '00000007'

--DECLARE @DocNo VARCHAR(20) = '00000009'

--DECLARE @DocStatus VARCHAR(20) = '2'

DECLARE @now VARCHAR(20) = dbo.fn_formatdatetime(GETDATE(), 'yyyymmdd')

DECLARE @now16 VARCHAR(20) = dbo.fn_formatdatetime(GETDATE(), 'yyyymmddhhnnss')

DECLARE @IsSuccess VARCHAR(250)

DECLARE @DocNoRefExist VARCHAR(20)

IF(@DocType = 'PO')

BEGIN

	SELECT DISTINCT @DocNoRefExist = purhead.DocNo

	FROM dbo.PTRPURCHHEAD AS purhead

	WHERE purhead.DocNo = @DocIDRef AND purhead.DocStatus = '2'

	IF(ISNULL(@DocNoRefExist, '') = '')

	BEGIN

		SET @IsSuccess = 'NoData'

	END

	ELSE

	BEGIN

		IF(@DocStatus = '2') OR (@DocStatus = '6') --IF(@DocStatus = '6')

		BEGIN

			UPDATE dbo.PTRPURCHHEAD 

			SET DocStatus = '4'

				,ChangeBy = @UserID

				,ChangeDate = @now16

			WHERE DocNo = @DocIDRef AND DocStatus = '2'

			SET @IsSuccess = 'Y'

		END

	END

END

IF(@DocType = 'RCSP')

BEGIN

	SELECT DISTINCT @DocNoRefExist = purhead.DocNo

	FROM dbo.PTRPURCHHEAD AS purhead

	WHERE purhead.DocNo = @DocIDRef AND purhead.DocStatus = '2'

	IF(ISNULL(@DocNoRefExist, '') = '')

	BEGIN

		SET @IsSuccess = 'NoData'

	END

	ELSE

	BEGIN

		UPDATE dbo.PTRPURCHHEAD 

		SET DocStatus = '3'

			,ChangeBy = @UserID

			,ChangeDate = @now16

		WHERE DocNo = @DocIDRef AND DocStatus = '2'

		SET @IsSuccess = 'Y'

	END

END

SELECT @IsSuccess AS IsSuccess