Преобразование строки PascalCase в «Дружественное имя» в TSQL

Question

У меня есть таблица со столбцом, значения которого поступают из перечисления. Мне нужно создать функцию TSQL, чтобы преобразовать эти значения в "Дружественные имена" при получении.

Примеры:

 'DateOfBirth' --> 'Date Of Birth'
 'PrincipalStreetAddress' --> 'Principal Street Address'

Мне нужно прямое решение TSQL UDF. У меня нет возможности установки расширенных процедур магазина или кода CLR.

Answer 1

/*
 Try this.  It's a first hack - still has problem of adding extra space
 at start if first char is in upper case.
*/
create function udf_FriendlyName(@PascalName varchar(max))
returns varchar(max)
as
begin

    declare @char char(1)
    set @char = 'A'

    -- Loop through the letters A - Z, replace them with a space and the letter
    while ascii(@char) <= ascii('Z')
    begin
        set @PascalName = replace(@PascalName, @char collate Latin1_General_CS_AS, ' ' + @char) 
        set @char = char(ascii(@char) + 1)
    end

    return LTRIM(@PascalName) --remove extra space at the beginning

end

Answer 2

Не самое элегантное решение, но оно работает:

declare @pascalCasedString nvarchar(max) = 'PascalCasedString'
declare @friendlyName nvarchar(max) = ''
declare @currentCode int;
declare @currentChar nvarchar;

while (LEN(@pascalCasedString) > 0)
    begin
        set @currentCode = UNICODE(@pascalCasedString)
        set @currentChar = NCHAR(@currentCode)

        if ((@currentCode >= 65) AND (@currentCode <= 90))
        begin
            set @friendlyName += SPACE(1)
        end
        set @friendlyName +=  @currentChar
        set @pascalCasedString = RIGHT(@pascalCasedString,LEN(@pascalCasedString) - 1)
    end

select @friendlyName

Answer 3

declare @arg varchar(20)
set @arg = 'DateOfBirthOnMonday'

declare @argLen int
set @argLen = len(@arg)

declare @output varchar(40)
set @output = ''

declare @i int
set @i = 1

declare @currentChar varchar(1)
declare @currentCharASCII int

while (1 = 1)
begin
set @currentChar = substring(@arg, @i, 1)
set @currentCharASCII = ascii(@currentChar)

if (@currentCharASCII >= 65 and @currentCharASCII <= 90)
set @output = @output + ' ' 

set @output = @output + @currentChar

set @i = @i+ 1

if (@i > @argLen) break
end

set @output = ltrim(rtrim(@output))
print @output

Измените значение @arg на то, что вы хотите проверить.

Кроме того, вам может потребоваться изменить объявление @output, чтобы оно соответствовало длине строки, равной числу @arg + пробелов, которые могут понадобиться. Я удвоил это в моем примере.

Answer 4

Если вы используете SQL Server 2005, вы можете написать собственную процедуру CLR:

static string ToFriendlyCase(this string PascalString)
{
    return Regex.Replace(PascalString, "(?!^)([A-Z])", " $1");
}

Выходы:

Преобразование моего сумасшедшего предложения по делу Паскаля в дружественное дело

Если вы не используете 2005, то вам нужно либо проанализировать его вручную, либо ссылаться на объект регулярного выражения, используя расширенные процедуры. Хорошую статью можно найти здесь:

http://www.codeproject.com/KB/mcpp/xpregex.aspx

Редактировать: UDF не может влиять на базу данных, поэтому вы не можете зарегистрировать объект regex com, так что это изгоняет эту идею. Однако хранимая процедура может - так что это может быть маршрут.

Чтобы выполнить сравнение с учетом регистра, вам нужно установить параметры сортировки для запроса с учетом регистра, а затем использовать замену, я думаю ... вот статья, которая может быть полезна для указания вас в правильном направлении:

http://www.mssqltips.com/tip.asp?tip=1032

Answer 5

Я обнаружил, что это работает именно так, как требуется. Предоставлено SqlAuthority.com :

CREATE FUNCTION dbo.udf_TitleCase (@InputString VARCHAR(4000) )
RETURNS VARCHAR(4000)
AS
BEGIN
DECLARE @Index INT
DECLARE @Char CHAR(1)
DECLARE @OutputString VARCHAR(255)
SET @OutputString = LOWER(@InputString)
SET @Index = 2
SET @OutputString =
STUFF(@OutputString, 1, 1,UPPER(SUBSTRING(@InputString,1,1)))
WHILE @Index <= LEN(@InputString)
BEGIN
SET @Char = SUBSTRING(@InputString, @Index, 1)
IF @Char IN (' ', ';', ':', '!', '?', ',', '.', '_', '-', '/', '&','''','(')
IF @Index + 1 <= LEN(@InputString)
BEGIN
IF @Char != ''''
OR
UPPER(SUBSTRING(@InputString, @Index + 1, 1)) != 'S'
SET @OutputString =
STUFF(@OutputString, @Index + 1, 1,UPPER(SUBSTRING(@InputString, @Index + 1, 1)))
END
SET @Index = @Index + 1
END
RETURN ISNULL(@OutputString,'')
END

Использование:

SELECT dbo.udf_TitleCase('This function will convert this string to title case!')

Выход:

This Function Will Convert This String To Title Case!