常用Sql 标量值函数

1、汉字拼音首字母

/****** Object: UserDefinedFunction [dbo].[fnGetHzPY]
   Script Date: 08/16/2018 09:04:47 

   Description:获取汉字拼音首字母(简拼)
******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

CREATE FUNCTION [dbo].[fnGetHzPY]
 (
   @str NVARCHAR()
 )
RETURNS NVARCHAR()
AS
BEGIN
  DECLARE @WORD nchar(), @PY nvarchar()
  SET @PY=''
  WHILE LEN(@str) >
    BEGIN
      SET @WORD = left(@str,)
      --如果非汉字字符，返回原字符
      SET @PY = @PY +
      (CASE
         WHEN UNICODE(@WORD) BETWEEN  and  +
         THEN (SELECT top  PY FROM (
             SELECT 'A' as PY,N'驁' as WORD
             UNION all SELECT 'B',N'簿'
             UNION all SELECT 'C',N'錯'
             UNION all SELECT 'D',N'鵽'
             UNION all SELECT 'E',N'樲'
             UNION all SELECT 'F',N'鰒'
             UNION all SELECT 'G',N'腂'
             UNION all SELECT 'H',N'夻'
             UNION all SELECT 'J',N'攈'
             UNION all SELECT 'K',N'穒'
             UNION all SELECT 'L',N'鱳'
             UNION all SELECT 'M',N'旀'
             UNION all SELECT 'N',N'桛'
             UNION all SELECT 'O',N'漚'
             UNION all SELECT 'P',N'曝'
             UNION all SELECT 'Q',N'囕'
             UNION all SELECT 'R',N'鶸'
             UNION all SELECT 'S',N'蜶'
             UNION all SELECT 'T',N'籜'
             UNION all SELECT 'W',N'鶩'
             UNION all SELECT 'X',N'鑂'
             UNION all SELECT 'Y',N'韻'
             UNION all SELECT 'Z',N'咗'
             ) T
             WHERE WORD >= @WORD COLLATE Chinese_PRC_CS_AS_KS_WS
             ORDER BY PY ASC)
         ELSE @WORD
       END)
    SET @str = Right(@str,LEN(@str) - )
   END
RETURN @PY
END
GO

2、将数字转换为中文数字

/****** Object: UserDefinedFunction [dbo].[fnGetChinaStringA]
   Script Date: 08/16/2018 09:11:59
   Description:将数字转换成中文数字
******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

CREATE FUNCTION [dbo].[fnGetChinaNumber]
(
  @Word INT
)
RETURNS VARCHAR()
AS
BEGIN
  DECLARE @varChinaDateString VARCHAR(),
          @varReturn          VARCHAR(),
          @varWord            VARCHAR(),
          @I SMALLINT

  SET @varChinaDateString = '〇一二三四五六七八九'
  SET @varWord = CAST(@Word AS VARCHAR)
  SET @I =
  SET @varReturn = ''

  WHILE @I <= LEN(@varWord)
    BEGIN
      SET @varReturn = @varReturn + SUBSTRING(@varChinaDateString, SUBSTRING(@varWord,@I,) + , )
      SET @I = @I +
    END  

  RETURN @varReturn
END

GO

3、函数：将字符串转换为Table数据集

/****** Object: UserDefinedFunction [dbo].[fnParaSplit]
   Script Date: 08/16/2018 09:25:38
   Description:将字符串转换成表
******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

CREATE FUNCTION [dbo].[fnParaSplit]
(
  @SplitString NVARCHAR(MAX),
  @Separator   CHAR()  =  ','
)
RETURNS @SplitStringsTable TABLE
(
  [FID]  INT IDENTITY(, ),
  [Item] VARCHAR()
)
AS
BEGIN
  DECLARE @CurrentIndex INT,
          @NextIndex    INT,
          @ReturnText   VARCHAR()

  SET @CurrentIndex = 

  WHILE (@CurrentIndex <=  DATALENGTH(@SplitString) / )
    BEGIN
      SET @NextIndex = CHARINDEX(@Separator, @SplitString, @CurrentIndex)

      IF(@NextIndex =  OR @NextIndex IS NULL)
          SELECT @NextIndex = DATALENGTH(@SplitString) /  + 

      SET @ReturnText = CONVERT(VARCHAR(), SUBSTRING(@SplitString, @CurrentIndex, @NextIndex-@CurrentIndex))

      INSERT INTO @SplitStringsTable
        ([Item])
      VALUES
        (@ReturnText)

      SET @CurrentIndex = @NextIndex +
    END

  RETURN
END

GO

附：后续遇到补充。。。