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 '0';
             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='0'+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) ='0')
             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

   　　 好了，就到這里了。對於程序員來說，解決問題是最幸福的，繼續努力，每天進步一點點。