I have a requirement to display the decimal number to Roman number in my report.
For example, the number is 5 –V, 56 –LVI
Roman number:
This number system is based on below seven symbols
Creating function using the script.
CREATE Function dbo.Get_Roman_Number(@N as varchar(20))
RETURNS VARCHAR(100)
AS
BEGIN
DECLARE @s varchar(100), @r varchar(100),
@i bigint, @p int, @d bigint
SET @s = ''
SET @r = 'IVXLCDM' -- Roman Symbols
/* There is no roman symbol for 0, but I don't want to return an empty string */
IF @n=0
SET @s = '0'
ELSE
BEGIN
SELECT @p = 1, @i = ABS(@n)
WHILE(@p<=5)
BEGIN
SET @d = @i % 10
SET @i = @i / 10
SELECT @s = CASE
WHEN @d IN (0,1,2,3) THEN
Replicate(SubString(@r,@p,1),@d) + @s
WHEN @d IN (4) THEN
SubString(@r,@p,2) + @s
WHEN @d IN (5,6,7,8) THEN
SubString(@r,@p+1,1) +
Replicate(SubString(@r,@p,1),@d-5) + @s
WHEN @d IN (9) THEN
SubString(@r,@p,1) + SubString(@r,@p+2,1) + @s
END
SET @p = @p + 2
END
SET @s = Replicate('M',@i) + @s
IF @n < 0
SET @s = '-' + @s
END
RETURN @s
END
GO
|
Function created successfully.
See the example
See another example.
See in the Roman table
No comments:
Post a Comment
If you have any doubt, please let me know.