HANA-函数-获取汉字拼音首字母

应用场景

用户使用车间看板时经常会对物料进行检索。若使用物料名称检索，则操作系统自带虚拟键盘输入比较麻烦，用时较长；而使用物料编码，则用户往往难以记忆。因此由 物料名称拼音首字母 形成的助记码便产生了作用。
同时为了减少用户在维护物料主数据时的字段数量，SAP B1根据物料名称 通过后台存储或前台格搜自动填充物料助记码字段，

设计思路

由于在HANA 1.0 FRO B1版本中未找到其自带的相关函数或字符集表，因此需要自己定义，两种设计方法如下：

1. 构建数据表调用：
   将所有汉字通过其他程序生成拼音，将其汉字及对应拼音作为原始数据在SAP B1中建表，以供调用。由于前期比较麻烦，所以没有使用。
2. 构造方法调用：
   找到一个按照拼音排序编码的字符集，通过逻辑判断，将特定编码区段内的汉字 赋值为其相对应的拼音字母。

引用HANA函数

1. STRTOBIN：将字符串中所有字符转换为 特定字符集对应的区位编码。STRTOBIN（'字符串','字符集')。
2. LEAST：将行多个参数值中的最小值返回；LEAST('参数1','参数2',...,'参数n')。
3. GREATEST：将行多个参数值中的最大值返回；GREATEST('参数1','参数2',...,'参数n')。
4. UPPER：将传递的字符串中的所有字符转换为大写;UPPER('字符串')。

参考代码如下

CREATE FUNCTION GETHZPY
       (
           in str varchar(300)
       )
RETURNS
           c NVARCHAR(300)
LANGUAGE SQLSCRIPT
SQL SECURITY INVOKER 
AS
            chh NVARCHAR(300);
            chn NVARCHAR(300);
            chs NVARCHAR(300);
BEGIN

     c:=''；

WHILE (LENGTH(str)>0) DO
  
 --依次取单个字符 GB2312 区位编码，
   chh := LEFT(str,1);
   chn := STRTOBIN(LEFT(str,1),'GB2312') ;
   
 --汉字字符，返回字符对应首字母,非汉字字符,返回原字符
 IF(Least(chn,'B0A1')='B0A1' AND Greatest(chn,'D7F9')='D7F9') 
 THEN

    select 
             case when Least(chn,'B0A1') = 'B0A1' then
     (     
           case when Greatest(chn,'B0C4') = 'B0C4'   then  'A'
     else  case when Greatest(chn,'B2C0') = 'B2C0'    then  'B'
     else  case when Greatest(chn,'B4ED') = 'B4ED'    then  'C'
     else  case when Greatest(chn,'B6E9') = 'B6E9'    then  'D'
     else  case when Greatest(chn,'B7A1') = 'B7A1'    then  'E'
     else  case when Greatest(chn,'B8C0') = 'B8C0'    then  'F'
     else  case when Greatest(chn,'B9FD') = 'B9FD'    then  'G'
     else  case when Greatest(chn,'BBF6') = 'BBF6'    then  'H'
    
     else  case when Greatest(chn,'BFA5') = 'BFA5'   then  'J'
     else  case when Greatest(chn,'C0AB') = 'C0AB'   then  'K'
     else  case when Greatest(chn,'C2E7') = 'C2E7'   then  'L'
     else  case when Greatest(chn,'C4C2') = 'C4C2'   then  'M'
     else  case when Greatest(chn,'C5B5') = 'C5B5'   then  'N'
     else  case when Greatest(chn,'C5BD') = 'C5BD'   then  'O'
     else  case when Greatest(chn,'C6D9') = 'C6D9'   then  'P'
     else  case when Greatest(chn,'C8BA') = 'C8BA'   then  'Q'
     else  case when Greatest(chn,'C8F5') = 'C8F5'   then  'R'
     else  case when Greatest(chn,'CBF9') = 'CBF9'   then  'S'
     else  case when Greatest(chn,'CDD9') = 'CDD9'   then  'T'
    
    
     else  case when Greatest(chn,'CEF4') = 'CEF4'   then  'W'
     else  case when Greatest(chn,'D1B8') = 'D1B8'   then  'X'
     else  case when Greatest(chn,'D4D0') = 'D4D0'   then  'Y'
     else  'Z'
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end 
     end )
 
           else ' '  end   
      INTO chs FROM  DUMMY;
 ELSE
      chs:=UPPER(chh)；
 END IF;   

   str:=RIGHT(str,LENGTH(str)-1);  
   c:=c||chs ;
 
END  WHILE;

END;

设计缺陷

由于未找到HANA自带的字符集，因此只能使用GB2312字符集做逻辑判断。GB2312中常用汉字按照拼音依次排序，生僻汉字单独无序排序，因此在函数处理时，若涉及到这些生僻汉字的，依然输出原汉字。

设计扩展

自定义获取汉字拼音的函数