MINOVAES - PRODUCT

??ALTER PROCEDURE [dbo].[PDSFILOGETEXCHANGERATECURRENCY]

(

	@CurrencyFrom VARCHAR(20)

	,@CurrencyTo VARCHAR(20)

	,@PostingDate VARCHAR(20)

	,@CompanyID VARCHAR(20)

	,@ConvertionType VARCHAR(20)

)

AS

--DECLARE @CurrencyFrom VARCHAR(20) = 'USD'

--DECLARE @CurrencyTo VARCHAR(20) = 'IDR'

--DECLARE @PostingDate VARCHAR(20) = '20210531'

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

--DECLARE @ConvertionType VARCHAR(20) = 'FIN'

DECLARE @ExchangeRate DECIMAL(22,0)

SELECT @ExchangeRate = Amount2/Amount1

FROM PCMFILOCURRATE AS Cur

WHERE Cur.ConvertionType = @ConvertionType

AND Cur.Currency1 = @CurrencyFrom

AND Cur.Currency2 = @CurrencyTo

AND Cur.DateRate = @PostingDate

IF(@ExchangeRate IS NULL OR @ExchangeRate <= 0)

BEGIN

	SELECT TOP(1)  @ExchangeRate = Amount2/Amount1

	FROM PCMFILOCURRATE AS Cur

	WHERE Cur.ConvertionType = @ConvertionType

		AND Cur.Currency1 = @CurrencyFrom

		AND Cur.Currency2 = @CurrencyTo

	ORDER BY Cur.DateRate DESC

END

SELECT CONVERT(VARCHAR(22), @ExchangeRate) AS ExchangeRate