SQL中返回计算表达式的函数

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

CREATE FUNCTION dbo.GetExp(@pstrExpress AS VARCHAR(8000))  
RETURNS DECIMAL(18,6) AS  
BEGIN  
DECLARE @i INT,@j INT   
DECLARE @c1 CHAR(1),@c2 CHAR(1),@c VARCHAR(100)  
DECLARE @v1 DECIMAL(18,6),@v2 DECIMAL(18,6),@v DECIMAL(18,6)  
DECLARE @t TABLE(ID INT IDENTITY(1,1),s VARCHAR(100))  
DECLARE @s TABLE(ID INT IDENTITY(1,1),s VARCHAR(100))  
DECLARE @sv TABLE(ID INT IDENTITY(1,1),v DECIMAL(18,6))  
 
SET @pstrExpress = REPLACE(@pstrExpress, ,)  
SELECT @i = 0,@j = LEN(@pstrExpress),@c2 = ,@c =  
WHILE @i<@j  
BEGIN  
 SELECT @c1 = @c2,@i = @i+1  
 SELECT @c2 = SUBSTRING(@pstrExpress,@i,1)  
 IF CHARINDEX(@c2,.0123456789) > 0 or (@c2 = - and @c1 IN(,*,-,+,/,())  
 BEGIN   SELECT @c = @c + @c2   CONTINUE  END  
 IF @c <>   BEGIN INSERT @t(s)  SELECT @c SELECT @c =  END  
 IF CHARINDEX(@c2,))>0  
 BEGIN   
   INSERT @t(s)  SELECT s FROM @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN(()),0) ORDER BY ID DESC  
   DELETE @s WHERE ID >= ISNULL((SELECT MAX(ID) FROM @s WHERE s IN(()),0)   
   CONTINUE  
 END  
 IF CHARINDEX(@c2,+-))>0  
 BEGIN   
   INSERT @t(s)  SELECT s FROM @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN(()),0) ORDER BY ID DESC  
   DELETE @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN(()),0)   
   IF @c2 <> ) INSERT @s(s) SELECT @c2  
   CONTINUE  
 END  
 IF CHARINDEX(@c2,*/)>0  
 BEGIN   
   INSERT @t(s)  SELECT s FROM @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN((,+,-)),0) ORDER BY ID DESC  
   DELETE @s WHERE ID > ISNULL((SELECT MAX(ID) FROM @s WHERE s IN((,+,-)),0)   
   INSERT  @s SELECT @c2  
   CONTINUE  
 END  
 IF CHARINDEX(@c2,()>0 INSERT  @s SELECT @c2  
END  
IF @c <>  INSERT @t(s) SELECT @c  
INSERT @t(s)  SELECT s FROM @s ORDER BY ID DESC  
SELECT @i = 0,@j = MAX(ID) FROM @t   
WHILE @i < @j  
BEGIN   
 SELECT @i = @i + 1  
 SELECT @c = s FROM @t WHERE ID = @i  
 IF @c = ( CONTINUE  
 IF @c NOT IN(*,-,+,/)  BEGIN  INSERT @sv(v) SELECT CONVERT(float,@c) CONTINUE END  
 SELECT @vv2 = v FROM @sv  DELETE @sv  WHERE ID = (SELECT MAX(ID) FROM @sv)  
 SELECT @vv1 = v FROM @sv  DELETE @sv  WHERE ID = (SELECT MAX(ID) FROM @sv)  
 SELECT @v = CASE @c WHEN + THEN @v1 + @v2 WHEN - THEN @v1 - @v2  
                     WHEN * THEN @v1 * @v2 WHEN / THEN @v1 / @v2 END  
 INSERT @sv(v) SELECT @v  
END  
SELECT @vv = v FROM @sv  
RETURN @v  
END