if object_id(N'HumanizedStrings','U') is not null
drop table HumanizedStrings
go

create table HumanizedStrings
(
Number smallint,
Gender nvarchar(1),
StringRepresentation nvarchar(15)
)
go

create unique index IDX_UNQ_Humanized_NumberGender on HumanizedStrings(Number,Gender)
go

insert into HumanizedStrings
select 0,'M','zero' union all
select 1,'M','unu' union all
select 1,'F','o' union all
select 2,'M','doi' union all
select 2,'F','doua' union all
select 3,'M','trei' union all
select 4,'M','patru' union all
select 5,'M','cinci' union all
select 6,'M','sase' union all
select 6,'F','sai' union all
select 7,'M','sapte' union all
select 8,'M','opt' union all
select 9,'M','noua' union all
select 10,'M','zece' union all
select 11,'M','unsprezece' union all
select 12,'M','doisprezece' union all
select 13,'M','treisprezece' union all
select 14,'M','paisprezece' union all
select 15,'M','cincisprezece' union all
select 16,'M','saiseprezece' union all
select 17,'M','saptesprezece' union all
select 18,'M','optsprezece' union all
select 19,'M','nouasprezece'
go

if object_id(N'UDF_Humanize_TenthsOnly','FN') is not null
drop function UDF_Humanize_TenthsOnly
go

create function dbo.UDF_Humanize_TenthsOnly(@Tenths numeric(2,0),@IsDecimal bit)
returns nvarchar(100)
as
begin

    declare @TenthsInt smallint, @TenthsText nvarchar(100) = ''
    select @TenthsInt = convert(smallint,@Tenths)



    declare @1stDigit smallint, @2ndDigit smallint

    select @1stDigit = @TenthsInt % 10
    select @2ndDigit = convert(int,round(@TenthsInt / 10,0)) % 10

    if(@IsDecimal = 1 and @2ndDigit = 0)
    begin
        select @TenthsText = 'zero ' + StringRepresentation from HumanizedStrings where Number = @TenthsInt and Gender = 'M'
    end
    else
        if exists (select 1 from HumanizedStrings where Number = @TenthsInt and Gender = 'M')
        begin
            select @TenthsText = StringRepresentation from HumanizedStrings where Number = @TenthsInt and Gender = 'M'
        end
        else
        begin

            if exists (select 1 from HumanizedStrings where Number = @2ndDigit and Gender = 'F')
                select @TenthsText += (select StringRepresentation from HumanizedStrings where Number = @2ndDigit and Gender = 'F')
                    + 'zeci ' + isnull((select 'si ' + StringRepresentation from HumanizedStrings where Number = @1stDigit and Gender = 'M' and @1stDigit != 0),'')
            else
                select @TenthsText += (select StringRepresentation from HumanizedStrings where Number = @2ndDigit and Gender = 'M')
                    + 'zeci ' + isnull((select 'si ' + StringRepresentation from HumanizedStrings where Number = @1stDigit and Gender = 'M' and @1stDigit != 0),'')
        end

    return @TenthsText


end
go

if object_id(N'UDF_Humanize_Number','FN') is not null
drop function UDF_Humanize_Number
go

create function dbo.UDF_Humanize_Number(@Number numeric(6,2),@CCY nvarchar(3))
returns nvarchar(500)
as
begin

    declare @HumanizedString nvarchar(500) = '', @IntegerPart int, @DecimalPart int

    select @IntegerPart = convert(int,substring(convert(nvarchar(7),@Number),1,charindex('.',convert(nvarchar(7),@Number))-1))
    select @DecimalPart = convert(int,substring(convert(nvarchar(7),@Number),charindex('.',convert(nvarchar(7),@Number))+1,len(convert(nvarchar(7),@Number))))

    declare @1stDigit smallint, @2ndDigit smallint, @3rdDigit smallint, @4thDigit smallint

    select @1stDigit = @IntegerPart % 10
    select @2ndDigit = convert(int,round(@IntegerPart / 10,0)) % 10
    select @3rdDigit = convert(int,round(@IntegerPart / 100,0)) % 10
    select @4thDigit = convert(int,round(@IntegerPart / 1000,0)) % 10

    if(@Number = 0)
    begin

        select @HumanizedString = 'zero'

    end
    else
    begin

        if (@4thDigit != 0)
        begin
            if (@4thDigit = 1)
                select @HumanizedString += 'o mie '
            else
                if exists (select 1 from HumanizedStrings where Number = @4thDigit and Gender = 'F' and @4thDigit != 6)
                    select @HumanizedString += (select StringRepresentation from HumanizedStrings where Number = @4thDigit and Gender = 'F') + ' mii '
                else
                    select @HumanizedString += (select StringRepresentation from HumanizedStrings where Number = @4thDigit and Gender = 'M') + ' mii '
        end

        if (@3rdDigit != 0)
        begin
            if (@3rdDigit = 1)
                select @HumanizedString += 'o suta '
            else
                if exists (select 1 from HumanizedStrings where Number = @3rdDigit and Gender = 'F' and @3rdDigit != 6)
                    select @HumanizedString += (select StringRepresentation from HumanizedStrings where Number = @3rdDigit and Gender = 'F') + ' sute '
                else
                    select @HumanizedString += (select StringRepresentation from HumanizedStrings where Number = @3rdDigit and Gender = 'M') + ' sute '
        end

        if @2ndDigit != 0 or @1stDigit != 0
            select @HumanizedString += dbo.UDF_Humanize_TenthsOnly(convert(int,@2ndDigit * 10 + @1stDigit),0)

        if (@DecimalPart != 0)
            select @HumanizedString += ' virgula ' + dbo.UDF_Humanize_TenthsOnly(@DecimalPart,1)

    end

    if (upper(@CCY) = 'RON')
        SELECT @HumanizedString += ' lei'
    else
        if (upper(@CCY) = 'EUR')
            SELECT @HumanizedString += ' euro'
    select @HumanizedString = replace(@HumanizedString,'  ',' ')
    return @HumanizedString

end
go


if object_id(N'tempdb..#TempTrySQLROHumanizer') is not null
drop table #TempTrySQLROHumanizer


declare @i int = 0, @RandomNumber numeric(6,2), @CCY nvarchar(3)

create table #TempTrySQLROHumanizer
(
Number numeric(6,2) not null,
Currency nvarchar(3) not null,
ROHumanizedNumber nvarchar(500) not null
)


while @i < 1000
begin

    select @RandomNumber = convert(numeric(6,2),round(rand() * power(10,4),2))
    select @CCY = iif(round(@RandomNumber,0) % 2 = 0, 'RON','EUR')

    insert into #TempTrySQLROHumanizer
    (Number,Currency,ROHumanizedNumber)
    select @RandomNumber, @CCY, dbo.UDF_Humanize_Number(@RandomNumber,@CCY)

    set @i = @i + 1

end

select *
from #TempTrySQLROHumanizer