- [SQLSERVER] Loại bỏ Restricted User trên database MSSQL
- [C#] Hướng dẫn tạo mã QRcode Style trên winform
- [C#] Hướng dẫn sử dụng temp mail service api trên winform
- [C#] Hướng dẫn tạo mã thanh toán VietQR Pay không sử dụng API trên winform
- [C#] Hướng Dẫn Tạo Windows Service Đơn Giản Bằng Topshelf
- [C#] Chia sẻ source code đọc dữ liệu từ Google Sheet trên winform
- [C#] Chia sẻ source code tạo mã QR MOMO đa năng Winform
- [C#] Chia sẻ source code phần mềm lên lịch tự động chạy ứng dụng Scheduler Task Winform
- [Phần mềm] Tải và cài đặt phần mềm Sublime Text 4180 full version
- [C#] Hướng dẫn download file từ Minio Server Winform
- [C#] Hướng dẫn đăng nhập zalo login sử dụng API v4 trên winform
- [SOFTWARE] Phần mềm gởi tin nhắn Zalo Marketing Pro giá rẻ mềm nhất thị trường
- [C#] Việt hóa Text Button trên MessageBox Dialog Winform
- [DEVEXPRESS] Chia sẻ code các tạo report in nhiều hóa đơn trên XtraReport C#
- [POWER AUTOMATE] Hướng dẫn gởi tin nhắn zalo từ file Excel - No code
- [C#] Chia sẻ code lock và unlock user trong domain Window
- [DEVEXPRESS] Vẽ Biểu Đồ Stock Chứng Khoán - Công Cụ Thiết Yếu Cho Nhà Đầu Tư trên Winform
- [C#] Hướng dẫn bảo mật ứng dụng 2FA (Multi-factor Authentication) trên Winform
- [C#] Hướng dẫn convert HTML code sang PDF File trên NetCore 7 Winform
- [C#] Hướng dẫn viết ứng dụng chat với Gemini AI Google Winform
[SQLSERVER] Hàm tạo đổi từ số sang số la mã và ngược lại
Bài viết hôm nay, mình sẽ chia sẽ cho các bạn hai hàm Chuyển đổi từ số sang số la mã, và từ số la mã sang số trong sqlserver.
Nếu bạn nào có tạo report trong C# hay ứng dụng thì đây sẽ là hai hàm hữu ích cho các bạn, dễ dàng chuyển đổi qua lại nhanh chóng.
Ở bên dưới mình sẽ giới thiệu cho bạn hai function ToRoman (chuyển đổi số sang số la mã) và FromRoman (Chuyển đổi từ số la mã sang số).
1. Hàm chuyển đổi từ số sang số la mã:
CREATE FUNCTION [dbo].[ToRoman] (@Number INT)
/**
summary: >
This is a simple routine for converting a decimal integer into a roman numeral.
Author: Phil Factor
Revision: 1.2
date: 3rd Feb 2014
Why: converted to run on SQL Server 2008-12
example:
- code: Select dbo.ToRomanNumerals(187)
- code: Select dbo.ToRomanNumerals(2011)
returns: >
The Mediaeval-style 'roman' numeral as a string.
**/
RETURNS NVARCHAR(100)
AS
BEGIN
IF @Number<0
BEGIN
RETURN 'De romanorum non numero negative'
end
IF @Number> 200000
BEGIN
RETURN 'O Juppiter, magnus numerus'
end
DECLARE @RomanNumeral AS NVARCHAR(100)
DECLARE @RomanSystem TABLE (symbol NVARCHAR(20)
COLLATE SQL_Latin1_General_Cp437_BIN ,
DecimalValue INT PRIMARY key)
INSERT INTO @RomanSystem (symbol, DecimalValue)
VALUES('I', 1),
('IV', 4),
('V', 5),
('IX', 9),
('X', 10),
('XL', 40),
('L', 50),
('XC', 90),
('C', 100),
('CD', 400),
('D', 500),
('CM', 900),
('M', 1000),
(N'|ↄↄ', 5000),
(N'cc|ↄↄ', 10000),
(N'|ↄↄↄ', 50000),
(N'ccc|ↄↄↄ', 100000),
(N'ccc|ↄↄↄↄↄↄ', 150000)
WHILE @Number > 0
SELECT @RomanNumeral = COALESCE(@RomanNumeral, '') + symbol,
@Number = @Number - DecimalValue
FROM @RomanSystem
WHERE DecimalValue = (SELECT MAX(DecimalValue)
FROM @RomanSystem
WHERE DecimalValue <= @number)
RETURN COALESCE(@RomanNumeral,'nulla')
2. Hàm chuyển đổi từ số la mã sang số tự nhiên
CREATE FUNCTION [dbo].[FromRoman] (@RomanNumeral NVarchar(100))
/**
summary: >
This is a simple routine for converting roman numeral into an integer
Author: Phil Factor
Revision: 1.2
date: 2nd Feb 2014
Why: converted to run on SQL Server 2008-12
example:
- code: Select dbo.FromRomanNumerals('CXVII')
- code: Select dbo.FromRomanNumerals('')
returns: >
The Integer.
**/
RETURNS int
AS
BEGIN
DECLARE @RomanSystem TABLE (symbol NVARCHAR(20)
COLLATE SQL_Latin1_General_Cp437_BIN,
DecimalValue INT PRIMARY key)
DECLARE @Numeral INT
DECLARE @Rowcount int
DECLARE @InString int
SELECT @inString=LEN(@RomanNumeral),@rowcount=100
IF @RomanNumeral='nulla' return 0
INSERT INTO @RomanSystem (symbol, DecimalValue)
VALUES('I', 1),
('IV', 4),
('V', 5),
('IX', 9),
('X', 10),
('XL', 40),
('L', 50),
('XC', 90),
('C', 100),
('CD', 400),
('D', 500),
('CM', 900),
('M', 1000),
(N'|ↄↄ', 5000),
(N'cc|ↄↄ', 10000),
(N'|ↄↄↄ', 50000),
(N'ccc|ↄↄↄ', 100000),
(N'ccc|ↄↄↄↄↄↄ', 150000)
WHILE @instring>0 AND @RowCount>0
BEGIN
SELECT TOP 1 @Numeral=COALESCE(@Numeral,0)+ DecimalValue,
@InString=@Instring-LEN(symbol) FROM
@RomanSystem
Where RIGHT(@RomanNumeral,@InString) LIKE symbol+'%'
COLLATE SQL_Latin1_General_CP850_Bin
AND @Instring-LEN(symbol)>=0
ORDER BY DecimalValue DESC
SELECT @Rowcount=@@Rowcount
end
RETURN CASE WHEN @RowCount=0 THEN NULL ELSE @Numeral END
END
* Ví dụ: Bây giờ mình sẽ thực hiện chạy 2 câu lệnh sau:
CHÚC CÁC BẠN THÀNH CÔNG!