從字串中的第n位開始取l長度的子字串
相當於Mid函式 [@more@]FUNCTION ZFN_PB_W_0109.
*"----------------------------------------------------------------------
*"*"區域介面:
*" IMPORTING
*" REFERENCE(IP_TEXT)
*" REFERENCE(IP_START) TYPE I
*" REFERENCE(IP_LEN) TYPE I DEFAULT 0
*" EXPORTING
*" REFERENCE(OP_TEXT)
*"----------------------------------------------------------------------
DATA: ILEN TYPE I,
IPLEN TYPE I,
IPTEXT TYPE STRING.
IF IP_TEXT = ' OR IP_TEXT IS INITIAL." or ip_len = 0.
OP_TEXT = '.
RETURN.
ENDIF.
IPTEXT = IP_TEXT.
CONDENSE IPTEXT.
ILEN = STRLEN( IPTEXT ).
IF IP_START > ILEN.
OP_TEXT = '.
RETURN.
ENDIF.
IF IP_LEN = 0.
IPLEN = ILEN - IP_START + 1.
ELSE.
IPLEN = IP_LEN.
ENDIF.
ILEN = IP_START - 1.
OP_TEXT = IPTEXT+ILEN(IPLEN).
ENDFUNCTION.
*"----------------------------------------------------------------------
*"*"區域介面:
*" IMPORTING
*" REFERENCE(IP_TEXT)
*" REFERENCE(IP_START) TYPE I
*" REFERENCE(IP_LEN) TYPE I DEFAULT 0
*" EXPORTING
*" REFERENCE(OP_TEXT)
*"----------------------------------------------------------------------
DATA: ILEN TYPE I,
IPLEN TYPE I,
IPTEXT TYPE STRING.
IF IP_TEXT = ' OR IP_TEXT IS INITIAL." or ip_len = 0.
OP_TEXT = '.
RETURN.
ENDIF.
IPTEXT = IP_TEXT.
CONDENSE IPTEXT.
ILEN = STRLEN( IPTEXT ).
IF IP_START > ILEN.
OP_TEXT = '.
RETURN.
ENDIF.
IF IP_LEN = 0.
IPLEN = ILEN - IP_START + 1.
ELSE.
IPLEN = IP_LEN.
ENDIF.
ILEN = IP_START - 1.
OP_TEXT = IPTEXT+ILEN(IPLEN).
ENDFUNCTION.
來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/9437124/viewspace-1021400/,如需轉載,請註明出處,否則將追究法律責任。
相關文章
- 求字串中對稱的子字串的最大長度字串
- 取字串左邊指定長度的子字串字串
- 取字串右邊指定長度的子字串字串
- 擷取 UTF8 編碼字串從首位元組開始指定寬度 (非長度)字串
- (字串雜湊表)找到字串中不重複出現字元的最長子串長度字串字元
- ABAP字串操作 擷取字元長度 取位數字串字元
- L1-050 倒數第N個字串 (15分)字串
- css 獲取從第n個開始,之後的所有元素CSS
- 擷取指定長度字串長度程式碼例項字串
- 包含中文的字串中擷取前N個字元字串字元
- 取字串長度字串
- js實現的擷取指定長度字串程式碼JS字串
- jQuery實現的擷取指定長度字串程式碼jQuery字串
- 獲取母字串中某個子字串的某個確定的index值字串Index
- 字串擷取從前幾位到後幾位字串
- 字串篇(python)—兩個字串的最長公共子序列字串Python
- javascript實現的任意擷取字串中的子字串JavaScript字串
- 求字串中不含重複字元的最長子串字串字元
- js判斷字串中是否含有指定的子字串JS字串
- L2-008 最長對稱子串【最長迴文字串】字串
- .C++整數的N進位制字串表示C++字串
- 獲取C/C++字串、字元陣列長度C++字串字元陣列
- javascript擷取指定長度字串相容中英文JavaScript字串
- 刪除字串中的子串字串
- 最長不含重複字元的子字串字元字串
- 兩個字串的最長公共子串字串
- js如何判斷字串中是否包含指定的子字串JS字串
- String字串的最大長度是多少?字串
- 求給定字串的平均字元長度字串字元
- QT生成固定長度的隨機字串QT隨機字串
- shell獲取字串長度字串
- js判斷字串是否是以指定的子字串開頭JS字串
- 從零開始的Python學習Episode 6——字串操作Python字串
- PHP如何替換多個字串不同位置不同長度的子串PHP字串
- mssql sqlserver 從指定字串中獲取數字的方法SQLServer字串
- 一個字串中某一個字元第n次出現的位置的函式字串字元函式
- jQuery Validate限定輸入字串的長度jQuery字串
- 字串最後一個單詞的長度字串