深度发掘SQL Server 2000 UDF（下）
大小写转换函数
该函数有两个参数：@String和@Capitalize_What。
依据 @Capitalize_What的值，函数有不同的功能：
¨ @Capitalize_What ＝ ‘string’“
函数将 @string的第一个非空字符转换成大写， 其余部分改为小写。
¨ @Capitalize_What ＝ ‘sentence’
函数将 @string中的每一句的首个非空字符转换为大写，句子其余部分转换为小写。断句的依据是’.’、’!’、’?’
¨ @Capitalize_What ＝ ‘word’
函数将 @string中的每个词都转换成首字符大写，其余小写的形式。
CREATE FUNCTION dbo.Capitalize (
-- Capitalize the first character of every word,
-- sentence, or the whole string. Put the rest to lowercase.
@String VARCHAR (8000),
@Capitalize_What VARCHAR (8) = ’string’
-- String: Capitalize the first letter of the string
-- Sentence: Capitalize the first letter of every sentence.
-- Delimiters: ./!/?
-- Word: Capitalize the first letter of every word.
-- Delimiters: any characters other than letters and digits.
)
RETURNS VARCHAR(8000)
AS
BEGIN
DECLARE @Position SMALLINT,
@Char CHAR(1),
@First_Char CHAR (1),
@Word_Start SMALLINT
SET @Capitalize_What = LOWER( @Capitalize_What )
SET @Word_Start = 0
IF @Capitalize_What IN (‘word’, ‘sentence’)
BEGIN
SET @Position = DATALENGTH( @String )
WHILE @Position >= 0 BEGIN
SET @Char = CASE @Position
WHEN 0 THEN ’.’
ELSE UPPER( SUBSTRING(
@String, @Position,
1 ) )
END
IF @Char BETWEEN ’A’ AND ’Z’
OR @Char BETWEEN ’0’ and ’9’ BEGIN
SET @Word_Start = @Position
SET @First_Char = UPPER( @Char )
END
ELSE BEGIN
IF @Capitalize_What = ’word’
OR @Char in ( ’.’, ’!’, ’?’ ) BEGIN
IF @Word_Start > 0
AND @First_Char BETWEEN ’A’
AND ’Z’
SET @String = STUFF(
@String, @Word_Start,
1, @First_Char )
SET @Word_Start = 0
END
END
SET @Position = @Position - 1
END
END
ELSE BEGIN -- Capitalize the first character
SET @Position = 0
WHILE @Position < DATALENGTH( @String )
BEGIN
SET @Position = @Position 1
SET @Char = UPPER( SUBSTRING( @String,
@Position, 1 ) )
IF @Char BETWEEN ’A’ AND ’Z’
OR @Char BETWEEN ’0’ AND ’9’ BEGIN
SET @String = STUFF( @String,
@Position, 1, @Char )
SET @Position = 9999
END
END
END
RETURN( @String )
END
go
小结
SQL Server 2000 的 UDF的应用是很广泛的，它会给编程人员带来极大的便利。您可以建立自己的’system’ UDF，存在Master数据库中，可以为任何数据库进行调用。
UDF也有不足，我们知道系统函数可以任意调有，不管您使用大写、小写或者大小写混合。UDF却不行，它是大小写敏感的。
在未来的版本中，我希望微软为UDF增加默认值的功能，以后我们可以这样定义一个函数。
CREAT FUNCTION dbo.Test_default
（ @parm int = 0 ）
RETURN INT
AS
BEGIN
RETURN ( @parm )
END
UDF中诸如此类的小问题还有不少，希望UDF的功能越来越强大，我们编程人员工作起来就会越来越轻松。
<
页:
[1]