Cdate日期表达式将日期表达式

2024年1月28日发(作者：)

(日期表达式)

将日期表达式转换成日期类型的数据。

日期表达式是任何可以解释成日期的表达式，包含日期文字，可以看作日期的字符串以及从函数返回的日期。

比如：myDate = CDate("99-5-20") ，这样的日期表达式必须加双引号，否则结果不可预料。

CDate 依据系统上的区域设置来决定日期的格式。如果提供的格式为不可识别的日期设置，则不能正确判断年、月、日的顺序。

()

返回当前计算机系统设置的日期和时间。

(日期表达式)

返回表示年份的整数。

比如：Year("00-6-15") = 2000

(日期表达式)

返回 1 到 12 之间的整数，表示一年中的某月。

比如：Month("00-6-15") = 6

d(interval, number, date)

DateAdd 函数语法中有下列命名参数：

部分 描述

interval 必要。字符串表达式，是所要加上去的时间间隔。

number 必要。数值表达式，是要加上的时间间隔的数目。其数值可以为正数（得到未来的日期），也可以为负数（得到过去的日期）。

date 必要。Variant (Date) 或表示日期的文字，这一日期还加上了时间间隔。

设置 interval 参数具有以下设定值：

设置 描述

yyyy 年

q 季

m 月

y 一年的日数

d 日

w 一周的日数

ww 周

h 时

n 分钟

s 秒

说明

可以使用 DateAdd 函数对日期加上或减去指定的时间间隔。

例如，可以用 DateAdd 来计算距今天为三十天的日期；或者计算距现在为 45 分钟的时间。

为了对 date 加上―日‖，可以使用―一年的日数‖ (―y‖)，―日‖ (‖d‖) 或―一周的日数‖ (‖w‖)。

DateAdd 函数将不返回有效日期。在以下实例中将 1 月31 日加上一个月：

DateAdd(m, 1, 31-Jan-95)

上例中，DateAdd 返回 1995 年 2 月 28 日，而不是 1995 年 2 月 31 日。

如果 date 是 1996 年 1 月 31 日，则由于 1996 年是闰年，返回值是 1996 年 2 月 29

日。

如果计算的日期超前 100 年（减去的年度超过 date 中的年份），就会导致错误发生。

如果 number 不是一个 Long 值，则在计算时取最接近的整数值来计算。

注意 DateAdd 返回值的格式由 Control Panel设置决定，而不是由传递到date 参数的格式决定。

事例：

DateAdd("d",10,"2000-6-18")

结果是： 2000-06-28

DateAdd("m",-1,"2000-6-18")

结果是： 2000-05-18

6、DateDiff 函数

返回 Variant (Long) 的值，表示两个指定日期间的时间间隔数目。

语法 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])

DateDiff 函数语法中有下列命名参数：

部分 描述

interval 必要。字符串表达式，表示用来计算date1 和 date2 的时间差的时间间隔

Date1□date2 必要；Variant (Date)。计算中要用到的两个日期。

Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定，则以星期日为第一天。

firstweekofyear 可选。指定一年的第一周的常数。如果未予指定，则以包含 1 月 1 日的星期为第一周。

interval 参数的设定值同DateAdd函数，请参考上面的例子。

例：DateDiff("d",#2004-01-06#,#2004-01-07#) 1

7、DatePart 函数

返回一个包含已知日期的指定时间部分的 Variant (Integer)。

语法 DatePart(interval, date[,firstdayofweek[, firstweekofyear]])

DatePart 函数语法中有下列命名参数：

部分 描述

interval 必要。字符串表达式，是要返回的时间间隔。

date 必要。要计算的 Variant (Date) 值。

Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定，则以星期日为第一天。

firstweekofyear 可选。指定一年第一周的常数。如果未予指定，则以包含 1 月 1 日的星期为第一周。

设置

interval 参数的设定值同DateAdd()

DatePart 函数示例本示例先取得一个日期，然后使用 DatePart 函数显示该日期是发生在该年的哪一季。

Dim TheDate As Date ' 声明变量。

Dim Msg

T

12、Time 函数

返回一个指明当前系统时间的 Variant (Date)。

语法

Time

示例

使用 Time 函数返回系统当前的时间。

Dim MyTimeMyTime = Time ' 返回系统当前的时间

说明

为了设置系统时间，请使用 Time 语句。

设置系统时间。

语法

Time = time

必要的 time 参数，可以是任何能够表示时刻的数值表达式、字符串表达式或它们的组合。

说明

如果 time 是一字符串，则 Time 会试着根据系统指定的时间，利用时间分隔符将其转换成一个时间。如果无法转换成一个有效的时间，则会导致错误发生。

13、FormatDateTime函数

描述

返回一个日期或时间格式的表达式。

语法

FormatDateTime(Date[,NamedFormat])

FormatDateTime函数语法有如下几部分：

部分 描述

Date 必需的。要被格式化的日期表达式

NamedFormat可选的。数字值，表示日期/时间所使用的格式。如果忽略该值，则使用vbGeneralDate。

设置值

NamedFormat参数的设置值如下：

常数 值 描述

vbGeneralDate 0 显示日期和/或时间。如果有日期部分，则用短日期格式显示。如果有时间部分，则用长时间格式显示。如果都有，两部分都显示。

VbLongDate 1 用计算机区域设置值中指定的长日期格式显示日期。

VbShortDate 2 用计算机区域设置值中指定的短日期格式显示日期。

18、用户自定义日期/时间格式 (Format 函数)

下面标识一些可用来创建用户自定义日期/时间格式的字符：

字符 说明

(:) 时间分隔符。在一些区域，可能用其他符号来当时间分隔符。格式化时间值时，时间分隔符可以分隔时、分、秒。时间分隔符的真正字符在格式输出时取决于系统的设置。

(/) 日期分隔符。在一些区域，可能用其他符号来当日期分隔符。格式化日期数值时，日期分隔符可以分隔年、月、日。日期分隔符的真正字符在格式输出时取决于系统设置。

c 以 ddddd 来显示日期并且以 ttttt 来显示时间。如果想显示的数值无小数部分，则只显示日期部分，如果想显示的数值无整数部分，则只显示时间部分。

d 以没有前导零的数字来显示日 (1–31)。

dd 以有前导零的数字来显示日 (01–31)。

ddd 以简写来表示日 (Sun–Sat)

dddd 以全称来表示日 (Sunday–Saturday)

ddddd 以完整日期表示法显示（包括年、月、日），日期的显示要依系统的短日期格式设置而定。

dddddd 以完整日期表示法显示日期系列数（包括年、月、日），日期的显示要依系统识别的长日期格式而定。缺省的长日期格式为 mmmm

dd, yyyy。

aaaa 与dddd 一样，它只是该字符串的本地化版本。

w 将一周中的日期以数值表示（1 表星期日~ 7表星期六）。

ww 将一年中的星期以数值表示 (1–54)。

m 以没有前导零的数字来显示月 (1–12)。如果 m 是直接跟在 h 或 hh 之后，那么显示的将是分而不是月。

mm 以有前导零的数字来显示月 (01 – 12)。如果m是直接跟在h或hh之后，那么显示的将是分而不是月。

mmm 以简写来表示月 (Jan–Dec)。

mmmm 以全称来表示月 (January–December)。

oooo 与mmmm一样，它只是该字符串的本地化版本。

q 将一年

如何将文本型：2003.08.04 转换为日期型：2003-08-04

cdate(replace("2003.08.04",".","-"))

显示当前日期在该年中所处的星期号

=Format(Now(), "ww")

ww 为 1 到 53。

显示日期字段值的四位年份值。

=DatePart（"yyyy", [订购日期]）

显示日期字段值前 10 天的日期值。

=DateAdd（"y", -10, [应付日期]）

显示日期字段值前一个月的日期值。

=DateAdd("m",-1,Date())

显示日期1和日期2之间相差的天数。

=DateDiff（"d", [订购日期], [发货日期]）

从今天算起到三个月后的日期之间的记录。

Betweeb date() and adddate(3,date())

根据出生日期计算年龄（周岁）

=IIf(Month(Date())-Month([出生年月日])>-1,Year(Date())-Year([出生年月日]),Year(Date())-Year([出生年月日])-1)

日期函数示例

当天日期：=Date()

当日：=Day(date)

当月：=Month(date())

当年：=Year(date())

当季：=DatePart("q",Date())

算出每个月的天数

一法：

Dim a, b, c

a = Year(Now())

b = Month(Now())

c = Format((a & "/" & b + 1 & "/1"), "######") - Format((a & "/" & b & "/1"), "######")

二法：

DateDiff("d", Format(Date, "yyyy-mm-01"), Format(DateAdd("m", -1, Date), "yyyy-mm-01"))

DateDiff可以算出两个日期之间相差几天！

三法：

Day(DateAdd("d", -1, Format(Date, "yyyy-mm-01")))

day函数可以知道某个日期是这个月的第几天，我们把这个月的最后一天拿出来DAY一下！

应该还有更好的方法！

比如说可以定义一个数组，把每个月的日子放进去，或者说写一个函数算每一个月的天数

只要考虑一下闺年的问题就可以了！

如何得到某年每个月的第一天是星期几

Private Sub Command1_Click()

Dim i As Integer, A As Integer, B As Integer, C As String

A = InputBox("请输入年份", "某年每个月的第一天是星期几")

For i = 1 To 12

C = A & "-" & i & "-1"

B = Weekday(C)

Select Case B

Case vbSunday

Print A & "年" & i & "月1日是 星期日"

Case vbMonday

Print A & "年" & i & "月1日是 星期一"

Case vbTuesday

Print A & "年" & i & "月1日是 星期二"

Case vbWednesday

Print A &a

-----------

Sql Server中的日期与时间函数

1. 当前系统日期、时间

select getdate()

2. dateadd 在向指定日期加上一段时间的基础上，返回新的 datetime 值

例如：向日期加上2天

5

select dateadd(day,2,'2004-10-15') --返回：2004-10-17 00:00:00.000

3. datediff 返回跨两个指定日期的日期和时间边界数。

select datediff(day,'2004-09-01','2004-09-18') --返回：17

4. datepart 返回代表指定日期的指定日期部分的整数。

SELECT DATEPART(month, '2004-10-15') --返回 10

5. datename 返回代表指定日期的指定日期部分的字符串

SELECT datename(weekday, '2004-10-15') --返回：星期五

6

6. day(), month(),year() --可以与datepart对照一下

HZS

select 当前日期=convert(varchar(10),getdate(),120)

,当前时间=convert(varchar(8),getdate(),114)

select datename(dw,'2004-10-15')

3

4

select 本年第多少周=datename(week,'2004-10-15')

,今天是周几=datename(weekday,'2004-10-15')

函数 参数/功能

GetDate( ) 返回系统目前的日期与时间

DateDiff (interval,date1,date2) 以interval 指定的方式，返回date2 与date1两个日期之间的差值 date2-date1

DateAdd (interval,number,date) 以interval指定的方式，加上number之后的日期

5

DatePart (interval,date) 返回日期date中，interval指定部分所对应的整数值

DateName (interval,date) 返回日期date中，interval指定部分所对应的字符串名称

参数 interval的设定值如下：

值 缩 写（Sql Server） (Access 和 ASP) 说明

Year Yy yyyy 年 1753 ~ 9999

Quarter Qq q 季 1 ~ 4

Month Mm m 月1 ~ 12

Day of year Dy y 一年的日数,一年中的第几日 1-366

Day Dd d 日，1-31

Weekday Dw w 一周的日数，一周中的第几日 1-7

Week Wk ww 周，一年中的第几周 0 ~ 51

7

Hour Hh h 时0 ~ 23

Minute Mi n 分钟0 ~ 59

Second Ss s 秒 0 ~ 59

6Y";d

Millisecond Ms - 毫秒 0 ~ 999

access 和 asp 中用date()和now()取得系统日期时间；其中DateDiff,DateAdd,DatePart也同

是能用于Access和asp中，这些函数的用法也类似

举例：

e() 用于sql server :select GetDate()4

ff('s','2005-07-20','2005-7-25 22:56:32')返回值为 514592 秒

DateDiff('d','2005-07-20','2005-7-25 22:56:32')返回值为 5 天

rt('w','2005-7-25 22:56:32')返回值为 2 即星期一(周日为1，周六为7)

DatePart('d','2005-7-25 22:56:32')返回值为 25即25号1

DatePart('y','2005-7-25 22:56:32')返回值为 206即这一年中第206天

DatePart('yyyy','2005-7-25 22:56:32')返回值为 2005即2005年

========

MSSQL汉字转拼音函数实现语句

2009-11-10 16:37

/* -------------------------------------------------------------

函数: fn_GetPinyin

描述: 汉字转拼音(无数据表版)

使用: _GetPinyin('中华人民共和国') = zhonghuarenmingongheguo

作者: 流香羽 (改编：Tony)

------------------------------------------------------------- */

IF OBJECT_ID('[fn_GetPinyin]') IS NOT NULL

DROP FUNCTION [fn_GetPinyin]

GO

create function [dbo].[fn_GetPinyin](@words nvarchar(2000))

returns varchar(8000)

as

begin

declare @word nchar(1)

declare @pinyin varchar(8000)

declare @i int

declare @words_len int

declare @unicode int

set @i = 1

set @words = ltrim(rtrim(@words))

set @words_len = len(@words)

while (@i <= @words_len) --循环取字符

begin

set @word = substring(@words, @i, 1)

set @unicode = unicode(@word)

set @pinyin = ISNULL(@pinyin +SPACE(1),'')+

(case when unicode(@word) between 19968 and 19968+20901 then

(select top 1 py from (

select 'a' as py,N'厑' as word

union all select 'ai',N'靉'

union all select 'an',N'黯'

union all select 'ang',N'醠'

union all select 'ao',N'驁'

union all select 'ba',N'欛'

union all select 'bai',N'瓸' --韛兡瓸

union all select 'ban',N'瓣'

union all select 'bang',N'鎊'

union all select 'bao',N'鑤'

union all select 'bei',N'鐾'

union all select 'ben',N'輽'

union all select 'beng',N'鏰'

union all select 'bi',N'鼊'

union all select 'bian',N'變'

union all select 'biao',N'鰾'

union all select 'bie',N'彆'

union all select 'bin',N'鬢'

union all select 'bing',N'靐'

union all select 'bo',N'蔔'

union all select 'bu',N'簿'

union all select 'ca',N'囃'

union all select 'cai',N'乲' --縩乲

union all select 'can',N'爘'

union all select 'cang',N'賶'

union all select 'cao',N'鼜'

union all select 'ce',N'簎'

union all select 'cen',N'笒'

union all select 'ceng',N'乽' --硛硳岾猠乽

union all select 'cha',N'詫'

union all select 'chai',N'囆'

union all select 'chan',N'顫'

union all select 'chang',N'韔'

union all select 'chao',N'觘'

union all select 'che',N'爡'

union all select 'chen',N'讖'

union all select 'cheng',N'秤'

union all select 'chi',N'鷘'

union all select 'chong',N'銃'

union all select 'chou',N'殠'

union all select 'chu',N'矗'

union all select 'chuai',N'踹'

union all select 'chuan',N'鶨'

union all select 'chuang',N'愴'

union all select 'chui',N'顀'

union all select 'chun',N'蠢'

union all select 'chuo',N'縒'

union all select 'ci',N'嗭' --賜嗭

union all select 'cong',N'謥'

union all select 'cou',N'輳'

union all select 'cu',N'顣'

union all select 'cuan',N'爨'

union all select 'cui',N'臎'

union all select 'cun',N'籿'

union all select 'cuo',N'錯'

union all select 'da',N'橽'

union all select 'dai',N'靆'

union all select 'dan',N'饏'

union all select 'dang',N'闣'

union all select 'dao',N'纛'

union all select 'de',N'的'

union all select 'den',N'扽'

union all select 'deng',N'鐙'

union all select 'di',N'螮'

union all select 'dia',N'嗲'

union all select 'dian',N'驔'

union all select 'diao',N'鑃'

union all select 'die',N'嚸' --眰嚸

union all select 'ding',N'顁'

union all select 'diu',N'銩'

union all select 'dong',N'霘'

union all select 'dou',N'鬭'

union all select 'du',N'蠹'

union all select 'duan',N'叾' --籪叾

union all select 'dui',N'譵'

union all select 'dun',N'踲'

union all select 'duo',N'鵽'

union all select 'e',N'鱷'

union all select 'en',N'摁'

union all select 'eng',N'鞥'

union all select 'er',N'樲'

union all select 'fa',N'髮'

union all select 'fan',N'瀪'

union all select 'fang',N'放'

union all select 'fei',N'靅'

union all select 'fen',N'鱝'

union all select 'feng',N'覅'

union all select 'fo',N'梻'

union all select 'fou',N'鴀'

union all select 'fu',N'猤' --鰒猤

union all select 'ga',N'魀'

union all select 'gai',N'瓂'

union all select 'gan',N'灨'

union all select 'gang',N'戇'

union all select 'gao',N'鋯'

union all select 'ge',N'獦'

union all select 'gei',N'給'

union all select 'gen',N'搄'

union all select 'geng',N'堩' --亙堩啹喼嗰

union all select 'gong',N'兣' --熕贑兝兣

union all select 'gou',N'購'

union all select 'gu',N'顧'

union all select 'gua',N'詿'

union all select 'guai',N'恠'

union all select 'guan',N'鱹'

union all select 'guang',N'撗'

union all select 'gui',N'鱥'

union all select 'gun',N'謴'

union all select 'guo',N'腂'

union all select 'ha',N'哈'

union all select 'hai',N'饚'

union all select 'han',N'鶾'

union all select 'hang',N'沆'

union all select 'hao',N'兞'

union all select 'he',N'靏'

union all select 'hei',N'嬒'

union all select 'hen',N'恨'

union all select 'heng',N'堼' --堼囍

union all select 'hong',N'鬨'

union all select 'hou',N'鱟'

union all select 'hu',N'鸌'

union all select 'hua',N'蘳'

union all select 'huai',N'蘾'

union all select 'huan',N'鰀'

union all select 'huang',N'鎤'

union all select 'hui',N'顪'

union all select 'hun',N'諢'

union all select 'huo',N'夻'

union all select 'ji',N'驥'

union all select 'jia',N'嗧'

union all select 'jian',N'鑳'

union all select 'jiang',N'謽'

union all select 'jiao',N'釂'

union all select 'jie',N'繲'

union all select 'jin',N'齽'

union all select 'jing',N'竸'

union all select 'jiong',N'蘔'

union all select 'jiu',N'欍'

union all select 'ju',N'爠'

union all select 'juan',N'羂'

union all select 'jue',N'钁'

union all select 'jun',N'攈'

union all select 'ka',N'鉲'

union all select 'kai',N'乫' --鎎乫

union all select 'kan',N'矙'

union all select 'kang',N'閌'

union all select 'kao',N'鯌'

union all select 'ke',N'騍'

union all select 'ken',N'褃'

union all select 'keng',N'鏗' --巪乬唟厼怾

union all select 'kong',N'廤'

union all select 'kou',N'鷇'

union all select 'ku',N'嚳'

union all select 'kua',N'骻'

union all select 'kuai',N'鱠'

union all select 'kuan',N'窾'

union all select 'kuang',N'鑛'

union all select 'kui',N'鑎'

union all select 'kun',N'睏'

union all select 'kuo',N'穒'

union all select 'la',N'鞡'

union all select 'lai',N'籟'

union all select 'lan',N'糷'

union all select 'lang',N'唥'

union all select 'lao',N'軂'

union all select 'le',N'餎'

union all select 'lei',N'脷' --嘞脷

union all select 'leng',N'睖'

union all select 'li',N'瓈'

union all select 'lia',N'倆'

union all select 'lian',N'纞'

union all select 'liang',N'鍄'

union all select 'liao',N'瞭'

union all select 'lie',N'鱲'

union all select 'lin',N'轥' --轥拎

union all select 'ling',N'炩'

union all select 'liu',N'咯' --瓼甅囖咯

union all select 'long',N'贚'

union all select 'lou',N'鏤'

union all select 'lu',N'氇'

union all select 'lv',N'鑢'

union all select 'luan',N'亂'

union all select 'lue',N'擽'

union all select 'lun',N'論'

union all select 'luo',N'鱳'

union all select 'ma',N'嘛'

union all select 'mai',N'霢'

union all select 'man',N'蘰'

union all select 'mang',N'蠎'

union all select 'mao',N'唜'

union all select 'me',N'癦' --癦呅

union all select 'mei',N'嚜'

union all select 'men',N'們'

union all select 'meng',N'霥' --霿踎

union all select 'mi',N'羃'

union all select 'mian',N'麵'

union all select 'miao',N'廟'

union all select 'mie',N'鱴' --鱴瓱

union all select 'min',N'鰵'

union all select 'ming',N'詺'

union all select 'miu',N'謬'

union all select 'mo',N'耱' --耱乮

union all select 'mou',N'麰' --麰蟱

union all select 'mu',N'旀'

union all select 'na',N'魶'

union all select 'nai',N'錼'

union all select 'nan',N'婻'

union all select 'nang',N'齉'

union all select 'nao',N'臑'

union all select 'ne',N'呢'

union all select 'nei',N'焾' --嫩焾

union all select 'nen',N'嫩'

union all select 'neng',N'能' --莻嗯鈪銰啱

union all select 'ni',N'嬺'

union all select 'nian',N'艌'

union all select 'niang',N'釀'

union all select 'niao',N'脲'

union all select 'nie',N'钀'

union all select 'nin',N'拰'

union all select 'ning',N'濘'

union all select 'niu',N'靵'

union all select 'nong',N'齈'

union all select 'nou',N'譳'

union all select 'nu',N'搙'

union all select 'nv',N'衄'

union all select 'nue',N'瘧'

union all select 'nuan',N'燶' --硸黁燶郍

union all select 'nuo',N'桛'

union all select 'o',N'鞰' --毮夞乯鞰

union all select 'ou',N'漚'

union all select 'pa',N'袙'

union all select 'pai',N'磗' --鎃磗

union all select 'pan',N'鑻'

union all select 'pang',N'胖'

union all select 'pao',N'礮'

union all select 'pei',N'轡'

union all select 'pen',N'喯'

union all select 'peng',N'喸' --浌巼闏乶喸

union all select 'pi',N'鸊'

union all select 'pian',N'騙'

union all select 'piao',N'慓'

union all select 'pie',N'嫳'

union all select 'pin',N'聘'

union all select 'ping',N'蘋'

union all select 'po',N'魄'

union all select 'pou',N'哛' --兺哛

union all select 'pu',N'曝'

union all select 'qi',N'蟿'

union all select 'qia',N'髂'

union all select 'qian',N'縴'

union all select 'qiang',N'瓩' --羻兛瓩

union all select 'qiao',N'躈'

union all select 'qie',N'籡'

union all select 'qin',N'藽'

union all select 'qing',N'櫦'

union all select 'qiong',N'瓗'

union all select 'qiu',N'糗'

union all select 'qu',N'覻'

union all select 'quan',N'勸'

union all select 'que',N'礭'

union all select 'qun',N'囕'

union all select 'ran',N'橪'

union all select 'rang',N'讓'

union all select 'rao',N'繞'

union all select 're',N'熱'

union all select 'ren',N'餁'

union all select 'reng',N'陾'

union all select 'ri',N'馹'

union all select 'rong',N'穃'

union all select 'rou',N'嶿'

union all select 'ru',N'擩'

union all select 'ruan',N'礝'

union all select 'rui',N'壡'

union all select 'run',N'橍' --橍挼

union all select 'ruo',N'鶸'

union all select 'sa',N'栍' --櫒栍

union all select 'sai',N'虄' --簺虄

union all select 'san',N'閐'

union all select 'sang',N'喪'

union all select 'sao',N'髞'

union all select 'se',N'飋' --裇聓

union all select 'sen',N'篸'

union all select 'seng',N'縇' --閪縇

union all select 'sha',N'霎'

union all select 'shai',N'曬'

union all select 'shan',N'鱔'

union all select 'shang',N'緔'

union all select 'shao',N'潲'

union all select 'she',N'欇'

union all select 'shen',N'瘮'

union all select 'sheng',N'賸'

union all select 'shi',N'瓧' --鰘齛兙瓧

union all select 'shou',N'鏉'

union all select 'shu',N'虪'

union all select 'shua',N'誜'

union all select 'shuai',N'卛'

union all select 'shuan',N'腨'

union all select 'shuang',N'灀'

union all select 'shui',N'睡'

union all select 'shun',N'鬊'

union all select 'shuo',N'鑠'

union all select 'si',N'乺' --瀃螦乺

union all select 'song',N'鎹'

union all select 'sou',N'瘶'

union all select 'su',N'鷫'

union all select 'suan',N'算'

union all select 'sui',N'鐩'

union all select 'sun',N'潠'

union all select 'suo',N'蜶'

union all select 'ta',N'襨' --躢襨

union all select 'tai',N'燤'

union all select 'tan',N'賧'

union all select 'tang',N'燙'

union all select 'tao',N'畓' --討畓

union all select 'te',N'蟘'

union all select 'teng',N'朰' --霯唞朰

union all select 'ti',N'趯'

union all select 'tian',N'舚'

union all select 'tiao',N'糶'

union all select 'tie',N'餮'

union all select 'ting',N'乭' --濎乭

union all select 'tong',N'憅'

union all select 'tou',N'透'

union all select 'tu',N'鵵'

union all select 'tuan',N'褖'

union all select 'tui',N'駾'

union all select 'tun',N'坉'

union all select 'tuo',N'籜'

union all select 'wa',N'韤'

union all select 'wai',N'顡'

union all select 'wan',N'贎'

union all select 'wang',N'朢'

union all select 'wei',N'躛'

union all select 'wen',N'璺'

union all select 'weng',N'齆'

union all select 'wo',N'齷'

union all select 'wu',N'鶩'

union all select 'xi',N'衋'

union all select 'xia',N'鏬'

union all select 'xian',N'鼸'

union all select 'xiang',N'鱌'

union all select 'xiao',N'斆'

union all select 'xie',N'躞'

union all select 'xin',N'釁'

union all select 'xing',N'臖'

union all select 'xiong',N'敻'

union all select 'xiu',N'齅'

union all select 'xu',N'蓿'

union all select 'xuan',N'贙'

union all select 'xue',N'瀥'

union all select 'xun',N'鑂'

union all select 'ya',N'齾'

union all select 'yan',N'灩'

union all select 'yang',N'樣'

union all select 'yao',N'鑰'

union all select 'ye',N'岃' --鸈膶岃

union all select 'yi',N'齸'

union all select 'yin',N'檼'

union all select 'ying',N'譍'

union all select 'yo',N'喲'

union all select 'yong',N'醟'

union all select 'you',N'鼬'

union all select 'yu',N'爩'

union all select 'yuan',N'願'

union all select 'yue',N'鸙'

union all select 'yun',N'韻'

union all select 'za',N'雥'

union all select 'zai',N'縡'

union all select 'zan',N'饡'

union all select 'zang',N'臟'

union all select 'zao',N'竈'

union all select 'ze',N'稄'

union all select 'zei',N'鱡'

union all select 'zen',N'囎'

union all select 'zeng',N'贈'

union all select 'zha',N'醡'

union all select 'zhai',N'瘵'

union all select 'zhan',N'驏'

union all select 'zhang',N'瞕'

union all select 'zhao',N'羄'

union all select 'zhe',N'鷓'

union all select 'zhen',N'黮'

union all select 'zheng',N'證'

union all select 'zhi',N'豒'

union all select 'zhong',N'諥'

union all select 'zhou',N'驟'

union all select 'zhu',N'鑄'

union all select 'zhua',N'爪'

union all select 'zhuai',N'跩'

union all select 'zhuan',N'籑'

union all select 'zhuang',N'戅'

union all select 'zhui',N'鑆'

union all select 'zhun',N'稕'

union all select 'zhuo',N'籱'

union all select 'zi',N'漬' --漬唨

union all select 'zong',N'縱'

union all select 'zou',N'媰'

union all select 'zu',N'謯'

union all select 'zuan',N'攥'

union all select 'zui',N'欈'

union all select 'zun',N'銌'

union all select 'zuo',N'咗') t

where word >= @word collate Chinese_PRC_CS_AS_KS_WS

order by word ASC) else @word end)

set @i = @i + 1

end

return @pinyin

END

GO

SELECT _GetPinyin('中华人民共和国')

/*

-------------------------------------------

zuo zhong hua ren min gong he guo

(1 行受影响)

*/

本文来自: 脚本之家() 详细出处参考：/article/

MSSQL自动流水帐号的生成第二种方法（无自定义函数）

2009-09-15 00:24

流水号对于流水账单和登记表的作用尤为重要，看过网上多数版本都是在SQL

SERVER写的自定义函数来实现自动编号的，但是这样有一个缺点，就是在插入记录之前是没有编号的，只有插入一条记录后才自动生成一个编号。对于自定义函数中获取系统当前时间也有一个缺陷，就是SQL SERVER函数不支持不确定性的函数，因此不能通过GETDATE()函数来直接获取日期的，大多是通过建立临时表或者视图来间接实现的，个人觉得比较麻烦。

函数

DATEADD

DATEDIFF

具有确定性

具有确定性

确定性

DATENAME

不具有确定性

除了用作 DATEPART (dw, date) 外都具有确定性。dw 是工作日的日期部分，取决于由设置每周第一天的 SET DATEFIRST 所设置的值。

具有确定性

不具有确定性

不具有确定性

具有确定性

具有确定性

DATEPART

DAY

GETDATE

GETUTCDATE

MONTH

YEAR

现实生活中的流水帐号的格式有五花八门，本来主要探讨一种比较普遍的格式2位字符串+4位年月日期+4位递增数字（如MA2009090001），其他格式都不是问题。

Declare @SerialLong int,@i int,@ObjLeng int

set @SerialLong = 4 --定义最大的单号长度位数

Declare @NowDate varchar(10)

set @NowDate = GetDate() --取得本日完整日期

Declare @NowYear char(4),@NowMonth char(2),@NowDay char(2)

set @NowYear = year(@NowDate) --取得年份

set @NowMonth = Month(@NowDate) --取得月份

set @NowDay = Day(@NowDate) --取得日期

Declare @FullYear char(4), @fullMonth char(2),@FullDay char(2),@FullYMD char(8)

set @fullyear = @NowYear

--select @fullyear

if Len(@NowMonth) = 1 --如果月份为10月以下则在月份前加0

Begin

set @FullMonth = '0' + @NowMonth

End

Else

Begin

set @FullMonth = @NowMonth

end

--select @FullMonth

--IF LEN(@NOWDAY) = 1 --如果日期小于10则在前面加0

--BEGIN

--SET @FULLDAY = '0' + @NOWDAY

--END

--Else

--Begin

--set @FullDay = @NowDay

--End

--组合今日的完整日期

--set @FullYmd ='MA'+@fullyear+@fullMonth+@FullDay

set @FullYmd ='MA'+@fullyear+@fullMonth

--select @FullYmd

Declare @MaxSerial char(4)

--取得最大的序列号,如果为空时默认编为0:此处请改为自已对应表的对应字段进行查询

select @MaxSerial = isNull(SUBSTRING(MAX(UserID),9,4),'0') From A_CY_AdminUser

IF isnumeric(@MaxSerial) = 1 --检查当前的流水号是否为数值

Begin

set @MaxSerial = @MaxSerial + 1

set @ObjLeng = Len(@MaxSerial)

IF @ObjLeng < @SerialLong

begin

set @i = 0

While @i < (@SerialLong-@ObjLeng) --循环判断是否小于定义长度,小于则在前面+0

Begin

set @MaxSerial = '0' + convert(varchar(4),@MaxSerial)

set @i = @i + 1

IF @i < (@SerialLong-@ObjLeng)

continue

Else

break

End

End

End

IF len(@MaxSerial) = @SerialLong --判断序列号是否已满9999

Begin

Declare @FullSerial char(12)

set @FullSerial = @FullYMD + @MaxSerial --组合新的完整编号

End

else

Begin

set @FullSerial = ''

End

--Select @FullSerial

mssql(sql server)小写转大写金额函数

2009-05-27 15:40

关键字 金额 SQL Server

出处

在网上见到一个Oracle的版本的小写转大写金额的函数，感觉还不错现在把它转成SQL

Server版本。

/********************************************************

作者：(**********************)

版本：1.0

创建时间：20020227

修改时间：

功能：小写金额转换成大写

参数：n_LowerMoney 小写金额

v_TransType 种类 -- 1: directly translate, 0: read it in words

输出：大写金额

********************************************************/

CREATE FUNCTION dbo.L2U (@n_LowerMoney numeric(15,2),@v_TransType int)

RETURNS VARCHAR(200) AS

BEGIN

Declare @v_LowerStr VARCHAR(200) -- 小写金额

Declare @v_UpperPart VARCHAR(200)

Declare @v_UpperStr VARCHAR(200) -- 大写金额

Declare @i_I int

set @v_LowerStr = LTRIM(RTRIM(ROUND(@n_LowerMoney,2))) --四舍五入为指定的精度并删除数据左右空格

set @i_I = 1

set @v_UpperStr = ''

while ( @i_I <= len(@v_LowerStr))

begin

select @v_UpperPart = case substring(@v_LowerStr,len(@v_LowerStr) - @i_I + 1,1)

WHEN '.' THEN '元'

WHEN '0' THEN '零'

WHEN '1' THEN '壹'

WHEN '2' THEN '贰'

WHEN '3' THEN '叁'

WHEN '4' THEN '肆'

WHEN '5' THEN '伍'

WHEN '6' THEN '陆'

WHEN '7' THEN '柒'

WHEN '8' THEN '捌'

WHEN '9' THEN '玖'

END

+

case @i_I

WHEN 1 THEN '分'

WHEN 2 THEN '角'

WHEN 3 THEN ''

WHEN 4 THEN ''

WHEN 5 THEN '拾'

WHEN 6 THEN '佰'

WHEN 7 THEN '仟'

WHEN 8 THEN '万'

WHEN 9 THEN '拾'

WHEN 10 THEN '佰'

WHEN 11 THEN '仟'

WHEN 12 THEN '亿'

WHEN 13 THEN '拾'

WHEN 14 THEN '佰'

WHEN 15 THEN '仟'

WHEN 16 THEN '万'

ELSE ''

END

set @v_UpperStr = @v_UpperPart + @v_UpperStr

set @i_I = @i_I + 1

end

if ( 0 = @v_TransType)

begin

set @v_UpperStr = REPLACE(@v_UpperStr,'零拾','零')

set @v_UpperStr = REPLACE(@v_UpperStr,'零佰','零')

set @v_UpperStr = REPLACE(@v_UpperStr,'零仟','零')

set @v_UpperStr = REPLACE(@v_UpperStr,'零零零','零')

set @v_UpperStr = REPLACE(@v_UpperStr,'零零','零')

set @v_UpperStr = REPLACE(@v_UpperStr,'零角零分','整')

set @v_UpperStr = REPLACE(@v_UpperStr,'零分','整')

set @v_UpperStr = REPLACE(@v_UpperStr,'零角','零')

set @v_UpperStr = REPLACE(@v_UpperStr,'零亿零万零元','亿元')

set @v_UpperStr = REPLACE(@v_UpperStr,'亿零万零元','亿元')

set @v_UpperStr = REPLACE(@v_UpperStr,'零亿零万','亿')

set @v_UpperStr = REPLACE(@v_UpperStr,'零万零元','万元')

set @v_UpperStr = REPLACE(@v_UpperStr,'万零元','万元')

set @v_UpperStr = REPLACE(@v_UpperStr,'零亿','亿')

set @v_UpperStr = REPLACE(@v_UpperStr,'零万','万')

set @v_UpperStr = REPLACE(@v_UpperStr,'零元','元')

set @v_UpperStr = REPLACE(@v_UpperStr,'零零','零')

end

-- 对壹元以下的金额的处理

if ( '元' = substring(@v_UpperStr,1,1))

begin

set @v_UpperStr = substring(@v_UpperStr,2,(len(@v_UpperStr) - 1))

end

if ( '零' = substring(@v_UpperStr,1,1))

begin

set @v_UpperStr = substring(@v_UpperStr,2,(len(@v_UpperStr) - 1))

end

if ( '角' = substring(@v_UpperStr,1,1))

begin

set @v_UpperStr = substring(@v_UpperStr,2,(len(@v_UpperStr) - 1))

end

if ( '分' = substring(@v_UpperStr,1,1))

begin

set @v_UpperStr = substring(@v_UpperStr,2,(len(@v_UpperStr) - 1))

end

if ('整' = substring(@v_UpperStr,1,1))

begin

set @v_UpperStr = '零元整'

end

return @v_UpperStr

END

例子：

select dbo.L2U(56588441.111,0)

select dbo.L2U(00.00,0)

====

mssql中常用的字符串函数大集合

2009-08-24 14:34

1.绝对值

SQL:select abs(-1) value

O:select abs(-1) value from dual

2.取整(大)

S:select ceiling(-1.001) value

O:select ceil(-1.001) value from dual

3.取整（小）

S:select floor(-1.001) value

O:select floor(-1.001) value from dual

4.取整（截取）

S:select cast(-1.002 as int) value

O:select trunc(-1.002) value from dual

5.四舍五入

S:select round(1.23456,4) value 1.23460

O:select round(1.23456,4) value from dual 1.2346

6.e为底的幂

S:select Exp(1) value 2.70451

O:select Exp(1) value from dual 2.71828182

7.取e为底的对数

S:select log(2.70451) value 1

O:select ln(2.70451) value from dual; 1

8.取10为底对数

S:select log10(10) value 1

O:select log(10,10) value from dual; 1

9.取平方

S:select SQUARE(4) value 16

O:select power(4,2) value from dual 16

10.取平方根

S:select SQRT(4) value 2

O:select SQRT(4) value from dual 2

11.求任意数为底的幂

S:select power(3,4) value 81

O:select power(3,4) value from dual 81

12.取随机数

S:select rand() value

O:select _(0,1) value from dual;

13.取符号

S:select sign(-8) value -1

O:select sign(-8) value from dual -1

----------数学函数

14.圆周率

S:SELECT PI() value 3.97931

O:不知道

,cos,tan 参数都以弧度为单位

例如：select sin(PI()/2) value 得到1（SQLServer）

,Acos,Atan,Atan2 返回弧度

17.弧度角度互换(SQLServer，Oracle不知道)

DEGREES：弧度-〉角度

RADIANS：角度-〉弧度

---------数值间比较

18. 求集合最大值

S:select max(value) value from

(select 1 value

union

select -2 value

union

select 4 value

union

select 3 value)a

O:select greatest(1,-2,4,3) value from dual

19. 求集合最小值

S:select min(value) value from

(select 1 value

union

select -2 value

union

select 4 value

union

select 3 value)a

O:select least(1,-2,4,3) value from dual

20.如何处理null值(F2中的null以10代替)

S:select F1,IsNull(F2,10) value from Tbl

O:select F1,nvl(F2,10) value from Tbl

--------数值间比较

21.求字符序号

S:select ascii('a') value

O:select ascii('a') value from dual

22.从序号求字符

S:select char(97) value

O:select chr(97) value from dual

23.连接

S:select '11'+'22'+'33' value

O:select CONCAT('11','22')||33 value from dual

23.子串位置 --返回3

S:select CHARINDEX('s','sdsq',2) value

O:select INSTR('sdsq','s',2) value from dual

23.模糊子串的位置 --返回2,参数去掉中间%则返回7

S:select patindex('%d%q%','sdsfasdqe') value

O:oracle没发现，但是instr可以通过第四霾问 刂瞥鱿执问?BR> select

INSTR('sdsfasdqe','sd',1,2) value from dual 返回6

24.求子串

S:select substring('abcd',2,2) value

O:select substr('abcd',2,2) value from dual

25.子串代替 返回aijklmnef

S:SELECT STUFF('abcdef', 2, 3, 'ijklmn') value

O:SELECT Replace('abcdef', 'bcd', 'ijklmn') value from dual

26.子串全部替换

S:没发现

O:select Translate('fasdbfasegas','fa','我' ) value from dual

27.长度

S:len,datalength

O:length

28.大小写转换 lower,upper

29.单词首字母大写

S:没发现

O:select INITCAP('abcd dsaf df') value from dual

30.左补空格（LPAD的第一个参数为空格则同space函数）

S:select space(10)+'abcd' value

O:select LPAD('abcd',14) value from dual

31.右补空格（RPAD的第一个参数为空格则同space函数）

S:select 'abcd'+space(10) value

O:select RPAD('abcd',14) value from dual

32.删除空格

S:ltrim,rtrim

O:ltrim,rtrim,trim

33. 重复字符串

S:select REPLICATE('abcd',2) value

O:没发现

34.发音相似性比较(这两个单词返回值一样，发音相同)

S:SELECT SOUNDEX ('Smith'), SOUNDEX ('Smythe')

O:SELECT SOUNDEX ('Smith'), SOUNDEX ('Smythe') from dual

SQLServer中用SELECT DIFFERENCE('Smithers', 'Smythers') 比较soundex的差

返回0-4，4为同音，1最高

--------------日期函数

35.系统时间

S:select getdate() value

O:select sysdate value from dual

36.前后几日

直接与整数相加减

37.求日期

S:select convert(char(10),getdate(),20) value

O:select trunc(sysdate) value from dual

select to_char(sysdate,'yyyy-mm-dd') value from dual

38.求时间

S:select convert(char(8),getdate(),108) value

O:select to_char(sysdate,'hh24:mm:ss') value from dual

39.取日期时间的其他部分

S:DATEPART 和 DATENAME 函数 （第一个参数决定）

O:to_char函数 第二个参数决定

参数---------------------------------下表需要补充

year yy, yyyy

quarter qq, q (季度)

month mm, m (m O无效)

dayofyear dy, y (O表星期)

day dd, d (d O无效)

week wk, ww (wk O无效)

weekday dw (O不清楚)

Hour hh,hh12,hh24 (hh12,hh24 S无效)

minute mi, n (n O无效)

second ss, s (s O无效)

millisecond ms (O无效)

----------------------------------------------

40.当月最后一天

S:不知道

O:select LAST_DAY(sysdate) value from dual

41.本星期的某一天（比如星期日）

S:不知道

O:SELECT Next_day(sysdate,7) vaule FROM DUAL;

42.字符串转时间

S:可以直接转或者select cast('2004-09-08'as datetime) value

O:SELECT To_date('2004-01-05 22:09:38','yyyy-mm-dd hh24-mi-ss') vaule FROM DUAL;

43.求两日期某一部分的差（比如秒）

S:select datediff(ss,getdate(),getdate()+12.3) value

O:直接用两个日期相减（比如d1-d2=12.3）

SELECT (d1-d2)*24*60*60 vaule FROM DUAL;

44.根据差值求新的日期（比如分钟）

S:select dateadd(mi,8,getdate()) value

O:SELECT sysdate+8/60/24 vaule FROM DUAL;

45.求不同时区时间

S:不知道

O:SELECT New_time(sysdate,'ydt','gmt' ) vaule FROM DUAL;

-----时区参数,北京在东8区应该是Ydt-------

AST ADT 大西洋标准时间

BST BDT 白令海标准时间

CST CDT 中部标准时间

EST EDT 东部标准时间

GMT 格林尼治标准时间

HST HDT 阿拉斯加—夏威夷标准时间

MST MDT 山区标准时间

NST 纽芬兰标准时间

PST PDT 太平洋标准时间

YST YDT YUKON标准时间

Oracle支持的字符函数和它们的Microsoft SQL Server等价函数:

函数 Oracle Microsoft SQL Server

把字符转换为ASCII ASCII ASCII

字串连接 CONCAT (expression + expression)

把ASCII转换为字符 CHR CHAR

返回字符串中的开始字符（左起） INSTR CHARINDEX

把字符转换为小写 LOWER LOWER

把字符转换为大写 UPPER UPPER

填充字符串的左边 LPAD N/A

清除开始的空白 LTRIM LTRIM

清除尾部的空白 RTRIM RTRIM

字符串中的起始模式（pattern） INSTR PATINDEX

多次重复字符串 RPAD REPLICATE

字符串的语音表示 SOUNDEX SOUNDEX

重复空格的字串 RPAD SPACE

从数字数据转换为字符数据 TO_CHAR STR

子串 SUBSTR SUBSTRING

替换字符 REPLACE STUFF

将字串中的每个词首字母大写 INITCAP N/A

翻译字符串 TRANSLATE N/A

字符串长度 LENGTH DATELENGTH or LEN

列表中最大的字符串 GREATEST N/A

列表中最小的字符串 LEAST N/A

如果为NULL则转换字串 NVL ISNULL

日期函数

函数 Oracle Microsoft SQL Server

日期相加 (date column +/- value) or

ADD_MONTHS DATEADD

两个日期的差 (date column +/- value) or

MONTHS_BETWEEN DATEDIFF

当前日期和时间 SYSDATE GETDATE()

一个月的最后一天 LAST_DAY N/A

时区转换 NEW_TIME N/A

日期后的第一个周日 NEXT_DAY N/A

代表日期的字符串 TO_CHAR DATENAME

代表日期的整数 TO_NUMBER

(TO_CHAR)) DATEPART

日期舍入 ROUND CONVERT

日期截断 TRUNC CONVERT

字符串转换为日期 TO_DATE CONVERT

如果为NULL则转换日期 NVL ISNULL

转换函数

函数 Oracle Microsoft SQL Server

数字转换为字符 TO_CHAR CONVERT

字符转换为数字 TO_NUMBER CONVERT

日期转换为字符 TO_CHAR CONVERT

字符转换为日期 TO_DATE CONVERT

16进制转换为2进制 HEX_TO_RAW CONVERT

2进制转换为16进制 RAW_TO_HEX CONVERT

其它行级别的函数

函数 Oracle Microsoft SQL Server

返回第一个非空表达式 DECODE COALESCE

当前序列值 CURRVAL N/A

下一个序列值 NEXTVAL N/A

如果exp1 = exp2, 返回null DECODE NULLIF

用户登录账号ID数字 UID SUSER_ID

用户登录名 USER SUSER_NAME

用户数据库ID数字 UID USER_ID

用户数据库名 USER USER_NAME

当前用户 CURRENT_USER CURRENT_USER

用户环境(audit trail) USERENV N/A

在CONNECT BY子句中的级别 LEVEL N/A

合计函数

函数 Oracle Microsoft SQL Server

Average AVG AVG

Count COUNT COUNT

Maximum MAX MAX

Minimum MIN MIN

Standard deviation STDDEV STDEV or STDEVP

Summation SUM SUM

Variance VARIANCE VAR or VARP

Oracle还有一个有用的函数EXTRACT,提取并且返回日期时间或时间间隔表达式中特定的时间域:

EXTRACT(YEAR FROM 日期)

使用MSSQL自定义函数过滤字符串

2010-01-15 16:52

Create FUNCTION f_checkString(@temp varchar(4000))

--f_checkString为方法名

--@temp为参数名 varchar为参数类型 4000为类型长度

--过滤SQL字符串

RETURNS varchar(4000)

--返回类型为varchar长度为4000

AS

BEGIN

set @temp=replace(@temp,'''','')

set @temp=replace(@temp,'"','')

set @temp=replace(@temp,':','')

set @temp=replace(@temp,'-','')

return @temp

END

--------------------------------------------------------------------------------------------

在MSSQL中存储过程中调用方法如下:

--判断用户名和密码是否正确

--exec sp_CheckUser

--2006-8-2

--

Create PROCEDURE sp_CheckUser

@username varchar(20), --用户名

@password varchar(20) --密码

as

declare

@str varchar(20),

@result int,

@status int

--过滤非法字符串

select @username=dbo.f_checkString(@username)

select @password=dbo.f_checkString(@password)

select

@str=[password],@status=status from usersInfo where

username=@username

if @@rowcount=0

set @result=-1 --用户名错误

else

begin

if @status=1

set @result=-3 --帐号被锁定

else

begin

if @str=@result

set @result=0 --登陆成功

else

set @result=-2 --密码错误

end

end

select @result

GO

MSSQL--在一个存储过程中执行多条SQL语句（事务）

2009-09-15 00:46

下面通过一个实例来对一个存储过程中执行多条SQL语句进行验证，主要是在存储过程中执行一个事务，来保持事务的ACID特性，当然这只是最最简单的一个例子，现实中还要考虑更多的实现。

BEGIN TRANSACTION

DECLARE @INSERT_AdminUser_ERROR INT, @INSERT_PropertyManagement_ERROR INT

-- Insert statements for procedure here

-- 插入到物业管理企业帐户到登陆表

INSERT INTO A_CY_AdminUser(UserID,UserPassword)

VALUES(@FullSerial,@UserPassword)

SELECT @INSERT_AdminUser_ERROR=@@ERROR

-- 插入物业管理企业基本信息到基本信息表

INSERT INTO dbo.B_CY_PropertyManagement(EnterpriseID,EnterpriseName)

VALUES(@FullSerial,@EnterpriseName)

SELECT @INSERT_PropertyManagement_ERROR=@@ERROR

IF @INSERT_AdminUser_ERROR = 0 AND @INSERT_PropertyManagement_ERROR = 0

BEGIN

PRINT '插入成功！'

COMMIT TRANSACTION

END

ELSE

BEGIN

IF @INSERT_AdminUser_ERROR <> 0

PRINT '登陆表插入信息有错！'

IF @INSERT_PropertyManagement_ERROR <> 0

PRINT '企业信息表插入信息有错！'

ROLLBACK TRANSACTION

END