0
点赞
收藏
分享

微信扫一扫

某字符在某字符串中出现的次数

徐一村 2023-09-18 阅读 44

DATA mystr  TYPE string.

 mystr = 'liujincai is a good person'.


DATA ilen TYPE i.


WRITE mystr.
ULINE.

perform count_in_str USING  mystr 'i' ilen.


WRITE ilen.



*&---------------------------------------------------------------------*
*&      Form  countInStr
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_STR      text
*      -->P_COUNT    text
*----------------------------------------------------------------------*
FORM count_in_str USING value(p_str) p_char p_count.
   DATA: ilen1 TYPE i,ilen2 TYPE i.
   ilen1 = STRLEN( p_str ).
   REPLACE ALL OCCURRENCES OF p_char IN p_str  WITH ''.
   ilen2 = STRLEN( p_str ).
   p_count = ilen1 - ilen2.
ENDFORM.                    "countInStr

举报

相关推荐

0 条评论