Sql Server 三个很有用的函数

　　好久没有写有关SqlServer 数据库方面技术的文章了，正好今天遇到了一个问题，我就把这个当做一个练习记录下来。今天遇到一个麻烦事，详情如下：公司买了一个系统，在这个系统里面有一个“充值卡”的功能，但是充值卡的当前所剩下的金额已经被乱码了，看不出来真正的金额，而且，卖软件的那家公司把所有的Sql 函数和存储过程都加密了，没有办法看到。

　　怎么办？为了和公司的其他系统进行集成，于是，我就试试来写一个逆运算来还原当前“充值卡”的剩余金额，搞了一天终于搞出来了。其实这个东西不是很难，只是刚开始的时候什么也不知道，东找西找，做测试，浪费了很多时间。解决了就好，现在有时间，我就把两个函数的实现代码都贴出来，大家一看，原来如此。然后有时间，在贴一下第三个函数，去掉带有小数后面多余0的一个函数的实现，都很有用，大家可以保留，没准什么时候就能用到。

　　1、我们先看看获取“充值卡”原始值得Sql Server的函数吧，代码如下：

     -- =============================================
     -- Author:        <PatrickLiu>
     -- Create date: <2018-11-20 18:21>
     -- Description:    <根据乱码的数据获取原始的数据>
     -- =============================================
     ALTER FUNCTION [dbo].[fun_GetResidualAmount]
     (
         @GarbledValue as varchar(40)
     )
     RETURNS decimal(16,4)
     AS
     BEGIN
         IF(@GarbledValue is null or @GarbledValue='' or @GarbledValue = '0.00')
             BEGIN
                 RETURN 0.00;
             END

         DECLARE @TempValue varchar(40);
         DECLARE @Length int;
         DECLARE @Index int;
         DECLARE @CurrentMoney decimal(16,4)

         SET @TempValue='';
         SET @Index=1;
         SET @Length = len(@GarbledValue)

         WHILE @Index<=@Length
              BEGIN
                 SET @TempValue = @TempValue + '' + char(ASCII(SUBSTRING(@GarbledValue,@Index,1))-((@Length-@Index-2) * 2))

                 SET @Index = @Index + 1;
              END

         SET @TempValue = REVERSE(@TempValue)  --字符串反转
         IF(ISNUMERIC(@TempValue)=1)
              SET @CurrentMoney = CAST(@TempValue as  decimal(16,4)) / 10000  --转数字
         ELSE
              SET @CurrentMoney = 0

         RETURN @CurrentMoney
 END

　　2、这个函数算是生成乱码结果值的函数，功能很简单，这个就是我费力写出来的。

     -- =============================================
     -- Author:        <PatrickLiu>
     -- Create date: <2018-11-20 10:32>
     -- Description:    <根据原始的数据生成乱码的数据>
     -- =============================================
     ALTER FUNCTION [dbo].[fun_GetGarbledValue]
     (
            @OriginalValue as decimal(16,4)
     )
     RETURNS varchar(40)
     AS
     BEGIN
         IF(@OriginalValue is null or @OriginalValue=0)
              BEGIN
                    return '';
              END

         declare @GarbledValue varchar(40);
         declare @length int;
         declare @index int;
         declare @OriginalValueCopy decimal(16,4);
         declare @OriginalValueCopy2 varchar(40);

         set @GarbledValue='';
         set @OriginalValueCopy2='';
         set @index=1;
         set @OriginalValueCopy =@OriginalValue*10000;
         set @OriginalValueCopy2 = REVERSE(@OriginalValueCopy);
         set @OriginalValueCopy2=''+SUBSTring(@OriginalValueCopy2,CHARINDEX('.',@OriginalValueCopy2),100);
         set @length = len(@OriginalValueCopy2)；

         WHILE @index<=@length
             begin
                 set @GarbledValue = @GarbledValue + '' + char(ASCII(SUBSTRING(@OriginalValueCopy2,@index,1))+((@length - @index  - 2) * 2))；
                 set @index = @index + 1;
            end
        return @GarbledValue
     END

　　3、这是第三个有用的函数，我也拿出来，给大家分享

     -- =============================================
     -- Author:        <PatrickLiu>
     -- Create date: <2018-11-20 17:57>
     -- Description:    <去掉小数点后面多余的0>
     -- =============================================
     CREATE FUNCTION [dbo].[fun_ClearNumberPointZero](@NumberValue varchar(50))
     RETURNS VARCHAR(50)
     AS
     BEGIN
         DECLARE @returnValue varchar(20);

         IF(@NumberValue='')
             BEGIN
                 SET @returnValue='' --空的时候为空
              END
         ELSE IF(CHARINDEX('.',@NumberValue) ='')
              BEGIN
                  SET @returnValue=@NumberValue --针对不含小数点的
              END
         ELSE IF ( SUBSTRING(REVERSE(@NumberValue),PATINDEX('%[^0]%',REVERSE(@NumberValue)),1)='.')
             BEGIN
                 SET @returnValue =left(@NumberValue,LEN(@NumberValue)-PATINDEX('%[^0]%',REVERSE(@NumberValue))) --针对小数点后全是0的
             END
         ELSE
            BEGIN
               SET @returnValue =left(@NumberValue,LEN(@NumberValue)- PATINDEX('%[^0]%.%',REVERSE(@NumberValue))+1) --其他任何情形
           END
          RETURN @returnValue
     END

　　 好了，就到这里了。对于程序员来说，解决问题是最幸福的，继续努力，每天进步一点点。