HANA-函數(shù)-獲取漢字拼音首字母

應(yīng)用場(chǎng)景

用戶使用車間看板時(shí)經(jīng)常會(huì)對(duì)物料進(jìn)行檢索。若使用物料名稱檢索,則操作系統(tǒng)自帶虛擬鍵盤輸入比較麻煩,用時(shí)較長(zhǎng);而使用物料編碼,則用戶往往難以記憶。因此由 物料名稱拼音首字母 形成的助記碼便產(chǎn)生了作用。
同時(shí)為了減少用戶在維護(hù)物料主數(shù)據(jù)時(shí)的字段數(shù)量,SAP B1根據(jù)物料名稱 通過后臺(tái)存儲(chǔ)或前臺(tái)格搜自動(dòng)填充物料助記碼字段,

設(shè)計(jì)思路

由于在HANA 1.0 FRO B1版本中未找到其自帶的相關(guān)函數(shù)或字符集表,因此需要自己定義,兩種設(shè)計(jì)方法如下:

  1. 構(gòu)建數(shù)據(jù)表調(diào)用:
    將所有漢字通過其他程序生成拼音,將其漢字及對(duì)應(yīng)拼音作為原始數(shù)據(jù)在SAP B1中建表,以供調(diào)用。由于前期比較麻煩,所以沒有使用。
  2. 構(gòu)造方法調(diào)用:
    找到一個(gè)按照拼音排序編碼的字符集,通過邏輯判斷,將特定編碼區(qū)段內(nèi)的漢字 賦值為其相對(duì)應(yīng)的拼音字母。

引用HANA函數(shù)

  1. STRTOBIN:將字符串中所有字符轉(zhuǎn)換為 特定字符集對(duì)應(yīng)的區(qū)位編碼。STRTOBIN('字符串','字符集')。
  2. LEAST:將行多個(gè)參數(shù)值中的最小值返回;LEAST('參數(shù)1','參數(shù)2',...,'參數(shù)n')。
  3. GREATEST:將行多個(gè)參數(shù)值中的最大值返回;GREATEST('參數(shù)1','參數(shù)2',...,'參數(shù)n')。
  4. UPPER:將傳遞的字符串中的所有字符轉(zhuǎn)換為大寫;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
  
 --依次取單個(gè)字符 GB2312 區(qū)位編碼,
   chh := LEFT(str,1);
   chn := STRTOBIN(LEFT(str,1),'GB2312') ;
   
 --漢字字符,返回字符對(duì)應(yīng)首字母,非漢字字符,返回原字符
 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;

設(shè)計(jì)缺陷

由于未找到HANA自帶的字符集,因此只能使用GB2312字符集做邏輯判斷。GB2312中常用漢字按照拼音依次排序,生僻漢字單獨(dú)無序排序,因此在函數(shù)處理時(shí),若涉及到這些生僻漢字的,依然輸出原漢字。

設(shè)計(jì)擴(kuò)展

自定義獲取漢字拼音的函數(shù)

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
【社區(qū)內(nèi)容提示】社區(qū)部分內(nèi)容疑似由AI輔助生成,瀏覽時(shí)請(qǐng)結(jié)合常識(shí)與多方信息審慎甄別。
平臺(tái)聲明:文章內(nèi)容(如有圖片或視頻亦包括在內(nèi))由作者上傳并發(fā)布,文章內(nèi)容僅代表作者本人觀點(diǎn),簡(jiǎn)書系信息發(fā)布平臺(tái),僅提供信息存儲(chǔ)服務(wù)。

友情鏈接更多精彩內(nèi)容