SQL中返回计算表达式的函数
创始人
2024-07-13 13:50:52
0

下面为您介绍一个SQL中返回计算表达式的函数,该函数可以计算加、减、乘、除,但是不能算幂,供您参考,希望对您学习SQL中的函数能有有所帮助。

 

  1. CREATE FUNCTION dbo.GetExp(@pstrExpress AS VARCHAR(8000))  
  2. RETURNS DECIMAL(18,6) AS  
  3. BEGIN  
  4. DECLARE @i INT,@j INT   
  5. DECLARE @c1 CHAR(1),@c2 CHAR(1),@c VARCHAR(100)  
  6. DECLARE @v1 DECIMAL(18,6),@v2 DECIMAL(18,6),@v DECIMAL(18,6)  
  7. DECLARE @t TABLE(ID INT IDENTITY(1,1),s VARCHAR(100))  
  8. DECLARE @s TABLE(ID INT IDENTITY(1,1),s VARCHAR(100))  
  9. DECLARE @sv TABLE(ID INT IDENTITY(1,1),v DECIMAL(18,6))  
  10.  
  11. SET @pstrExpress = REPLACE(@pstrExpress,' ','')  
  12. SELECT @i = 0,@j = LEN(@pstrExpress),@c2 = '',@c = '' 
  13. WHILE @i<@j  
  14. BEGIN  
  15.  SELECT @c1 = @c2,@i = @i+1  
  16.  SELECT @c2 = SUBSTRING(@pstrExpress,@i,1)  
  17.  IF CHARINDEX(@c2,'.0123456789') > 0 or (@c2 = '-' and @c1 IN('','*','-','+','/','('))  
  18.  BEGIN   SELECT @c = @c + @c2   CONTINUE  END  
  19.  IF @c <> ''  BEGIN INSERT @t(s)  SELECT @c SELECT @c = '' END  
  20.  IF CHARINDEX(@c2,')')>0  
  21.  BEGIN   
  22.    INSERT @t(s)  SELECT s FROM @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN('(')),0) ORDER BY ID DESC  
  23.    DELETE @s WHERE ID >= ISNULL((SELECT MAX(ID) FROM @s WHERE s IN('(')),0)   
  24.    CONTINUE  
  25.  END  
  26.  IF CHARINDEX(@c2,'+-)')>0  
  27.  BEGIN   
  28.    INSERT @t(s)  SELECT s FROM @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN('(')),0) ORDER BY ID DESC  
  29.    DELETE @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN('(')),0)   
  30.    IF @c2 <> ')' INSERT @s(s) SELECT @c2  
  31.    CONTINUE  
  32.  END  
  33.  IF CHARINDEX(@c2,'*/')>0  
  34.  BEGIN   
  35.    INSERT @t(s)  SELECT s FROM @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN('(','+','-')),0) ORDER BY ID DESC  
  36.    DELETE @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN('(','+','-')),0)   
  37.    INSERT  @s SELECT @c2  
  38.    CONTINUE  
  39.  END  
  40.  IF CHARINDEX(@c2,'(')>0 INSERT  @s SELECT @c2  
  41. END  
  42. IF @c <> '' INSERT @t(s) SELECT @c  
  43. INSERT @t(s)  SELECT s FROM @s ORDER BY ID DESC  
  44. SELECT @i = 0,@j = MAX(ID) FROM @t   
  45. WHILE @i < @j  
  46. BEGIN   
  47.  SELECT @i = @i + 1  
  48.  SELECT @c = s FROM @t WHERE ID = @i  
  49.  IF @c = '(' CONTINUE  
  50.  IF @c NOT IN('*','-','+','/')  BEGIN  INSERT @sv(v) SELECT CONVERT(float,@c) CONTINUE END  
  51.  SELECT @vv2 = v FROM @sv  DELETE @sv  WHERE ID = (SELECT MAX(ID) FROM @sv)  
  52.  SELECT @vv1 = v FROM @sv  DELETE @sv  WHERE ID = (SELECT MAX(ID) FROM @sv)  
  53.  SELECT @v = CASE @c WHEN '+' THEN @v1 + @v2 WHEN '-' THEN @v1 - @v2  
  54.                      WHEN '*' THEN @v1 * @v2 WHEN '/' THEN @v1 / @v2 END  
  55.  INSERT @sv(v) SELECT @v  
  56. END  
  57. SELECT @vv = v FROM @sv  
  58. RETURN @v  
  59. END 

 

 

【编辑推荐】

SQL中DATENAME函数的用法

SQL中循环语句的效果实例

SQL中类似For循环处理的实例

对存储过程代替SQL语句的讨论

SQL聚合函数之Avg 函数

 

相关内容

热门资讯

如何允许远程连接到MySQL数... [[277004]]【51CTO.com快译】默认情况下,MySQL服务器仅侦听来自localhos...
如何利用交换机和端口设置来管理... 在网络管理中,总是有些人让管理员头疼。下面我们就将介绍一下一个网管员利用交换机以及端口设置等来进行D...
施耐德电气数据中心整体解决方案... 近日,全球能效管理专家施耐德电气正式启动大型体验活动“能效中国行——2012卡车巡展”,作为该活动的...
Windows恶意软件20年“... 在Windows的早期年代,病毒游走于系统之间,偶尔删除文件(但被删除的文件几乎都是可恢复的),并弹...
20个非常棒的扁平设计免费资源 Apple设备的平面图标PSD免费平板UI 平板UI套件24平图标Freen平板UI套件PSD径向平...
规避非法攻击 用好路由器远程管... 单位在市区不同位置设立了科技服务点,每一个服务点的员工都通过宽带路由器进行共享上网,和单位网络保持联...
范例解读VB.NET获取环境变... VB.NET编程语言的使用范围非常广泛,可以帮助开发人员处理各种程序中的需求,而且还能对移动设备进行...
德国电信门户网站可实时显示全球... 德国电信周三推出一个门户网站,直观地实时提供其安装在全球各地的传感器网络检测到的网络攻击状况。该网站...