荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: mojo (得到卻覺空虛), 信区: Database
标 题: UDF—MSQL Server 2000的新特性
发信站: BBS 荔园晨风站 (Fri Nov 10 11:19:19 2000), 转信
时间：2000/11/10 10:06 作者：程骏 eNet学院
本文将介绍Microsoft SQL Server 2000的新增特性—用户自定义函数
User-Defined Function（UDF），并演示几个常用的实例。
UDF的功能类似SQL Server中内建的系统函数，如CONVERT、SUBSTRING、
DATAADD、 GETDATA、ISNULL等等。一个UDF可以没有参数，或者带有一个或多个参
数，函数运行后将会返回一个函数值。定义UDF的语法如下：
CREATE FUNCTION [ owner_name.] function_name
( { { @parameter_name scalar_parameter_data_type
[,…n] ] )
RETURN scalar_return_data_type
[WITH < function_option> [, … n]]
[AS]
BEGIN
Function_body
RETURN scalar_expression
END
每个UDF可以带有0个到1024个参数，每个参数可以是除了timestamp、cursor、
table 以外所有的数据类型；函数返回值的限制要更多一些，它不可以是text、
ntext、image、timestamp、cursor和table。
函数体是UDF的主要部分，它有两个选项: ENCRYOTION和 SCHEMABINDING。
SCHEMABINDING是SQL Server 2000的新增功能，可以和视图一同使用。该选项不允
许删除和修改被该函数引用的对象。这样可以防止无效的函数和视图对它们引用的
对象进行结构上的修改。
大家会注意到函数体以Begin开始，End结束。这一点不同于创建存储过程、触发器
和视图。当您忘了写上Begin/End时，系统会返回一个提示信息“Incorrect
syntax near ‘RETURN’”。为什么不直接说少了Begin/End，这有点让人费解。
下面我用几个例子来说明UDF的应用。
Greatest and Least
为了区别于系统函数Max和Min，我给新函数命名为Greatest和Least，它们会从以
参数形式输入的两个值中找出最大值和最小值。
Case语句是两个函数的核心：
CASE WHEN value1 > value2 THEN value1 ELSE value2 END
虽然函数很简单，但用途是很广的。
CREATE FUNCTION dbo.Greatest
-- Return the maximum of two parameters
(@Val1 SQL_VARIANT,
@Val2 SQL_VARIANT)
RETURNS SQL_VARIANT
AS
BEGIN
RETURN (CASE WHEN @val1 > @val2 THEN @val1 ELSE @val2 END)
END
go
―――――――――――――――――――――――――――――――
CREATE FUNCTION dbo.Least
-- Return the minimum of two parameters
( @val1 SQL_VARIANT,
@val2 SQL_VARIANT )
RETURNS SQL_VARIANT
AS
BEGIN
RETURN (CASE WHEN @val1 < @val2 THEN @val1 ELSE @val2 END)
END
Go
大小写转换函数
该函数有两个参数：@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
--
╔═══╗
║LOVELY║
║ MOJO ║
╚═══╝
※ 来源:·BBS 荔园晨风站 bbs.szu.edu.cn·[FROM: 192.168.1.130]
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店