sql server创建自定义函数

sqlserver创建自定义函数

Java代码

--is中文字符串（判断是否为汉字）

createfunctionis中文字符串(@字符串nchar(255))

returnsnchar(1)as

begin

declare@Itinyint,@Jtinyint

set@I=len(@字符串)

set@J=1

while(@J<=@I)

begin

if(unicode(substring(@字符串,@J,1))<256)return'否'

set@J=@J+1

end

return'是'

end

GO

createfunctionis学院信息表编号(@字符串char(4))

returnsnchar(1)as

begin

ifexists(select*from学院信息表where编号=left(@字符串,2))

return'是'

return'否'

end

go

createfunctionis系部信息表编号(@字符串char(6))

returnsnchar(1)as

begin

ifexists(select*from系部信息表where编号=left(@字符串,4))

return'是'

return'否'

end

go

下面部分适合sqlserver2008之前版本会报错。

和前面的是一样的功能。

Java代码

--规则:4位字符，前2位为所属学院编号

createfunctioncheck系部编号(@inputIDvarchar(30))returnsnchar(1)asbegin

declare

@outnchar='否';

ifsubstring(@inputID,1,2)in(select编号fromdbo.学院信息表)

set

@out='是';

return@out;

end

--规则:6位字符，前4位为所属系部编号

createfunctioncheck教研室编号(@inputIDvarchar(30))returnsnchar(1)asbegin

declare

@outnchar='否';

ifsubstring(@inputID,1,4)in(select编号fromdbo.系部信息表)

set

@out='是';

return@out;

end

createfunctioncheck检查班级课程表编号(@inputIDvarchar(500))returnsnchar(1)asbegin

--规则:班级编号+教师编号+课程编号不能重复

declare@inputStrvarchar(500)=@inputID;

declare@temp1varchar(8)=substring(@inputStr,1,8);

declare@temp2varchar(6)=substring(@inputStr,9,14);

declare@temp3varchar(6)=substring(@inputStr,15,20);

declare@outnchar(1)='否';

if@temp1in(select编号from班级信息表)and@temp2in(select编号from教师信息表)and@temp3in(select编号from课程信息表)

set@out='是';

return@out;

end

createfunctioncheck教学成绩编号(@inputIDchar(18))returnsnchar(1)asbegin

--规则:学号(6)+教师编号(6)+课程编号(6),不能重复

declare@inputStrvarchar(50)=@inputID;

declare@temp1varchar(6)=substring(@inputStr,1,6);

declare@temp2varchar(6)=substring(@inputStr,7,12);

declare@temp3varchar(6)=substring(@inputStr,13,18);

declare@outnchar(1)='否';

if@temp1in(select学号from学生信息表)and@temp2in(select编号from教师信息表)and@temp3in(select编号from课程信息表)

set@out='是';

return@out;

end

--规则:4位字符，前2位为所属学院编号

createfunctioncheck系部编号(@inputIDvarchar(30))returnsnchar(1)asbegin

declare

@outnchar='否';

ifsubstring(@inputID,1,2)in(select编号fromdbo.学院信息表)

set

@out='是';

return@out;

end

--规则:6位字符，前4位为所属系部编号

createfunctioncheck教研室编号(@inputIDvarchar(30))returnsnchar(1)asbegin

declare

@outnchar='否';

ifsubstring(@inputID,1,4)in(select编号fromdbo.系部信息表)

set

@out='是';

return@out;

end

createfunctioncheck检查班级课程表编号(@inputIDvarchar(500))returnsnchar(1)asbegin

--规则:班级编号+教师编号+课程编号不能重复

declare@inputStrvarchar(500)=@inputID;

declare@temp1varchar(8)=substring(@inputStr,1,8);

declare@temp2varchar(6)=substring(@inputStr,9,14);

declare@temp3varchar(6)=substring(@inputStr,15,20);

declare@outnchar(1)='否';

if@temp1in(select编号from班级信息表)and@temp2in(select编号from教师信息表)and@temp3in(select编号from课程信息表)

set@out='是';

return@out;

end

createfunctioncheck教学成绩编号(@inputIDchar(18))returnsnchar(1)asbegin

--规则:学号(6)+教师编号(6)+课程编号(6),不能重复

declare@inputStrvarchar(50)=@inputID;

declare@temp1varchar(6)=substring(@inputStr,1,6);

declare@temp2varchar(6)=substring(@inputStr,7,12);

declare@temp3varchar(6)=substring(@inputStr,13,18);

declare@outnchar(1)='否';

if@temp1in(select学号from学生信息表)and@temp2in(select编号from教师信息表)and@temp3in(select编号from课程信息表)

set@out='是';

return@out;

end

create

functionisChinese(@inputvarchar(8000))returnsnchar(1)as

begin

declare@out

nchar(1)='是';

declare@indexint=0;

declare@tempStrnchar(1);

while@index<=len(@input)

begin

set@tempStr=substring(@input,@index,@index+2);

ifunicode(@tempStr)<19968orunicode(@tempStr)>40869

begin

set@out='否';