代码语言:javascript复制
*&---------------------------------------------------------------------*
*& Report Z7
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT Z7.
DATA str TYPE string.
str = 'java mysql springMVC mybatis spring'.
WRITE str.
ULINE.
*将mysql替换成mssql
REPLACE 'mysql' WITH 'mssql' INTO str.
WRITE str.
ULINE.
*字符串搜索
SEARCH str for 'mybatis'.
WRITE:/ sy-subrc. "是否存在,如果0 则说明找到
WRITE:/ sy-fdpos. "mybatis在字符串出现的位置
*字符串长度
DATA len type i.
len = STRLEN( str ).
WRITE: / '字符串长度:' , len.
*字符串拼接
DATA cmdText1 type string.
DATA cmdText2 type string.
DATA cmdText3 type string.
DATA cmdText type string.
cmdText1 = 'INSERT INTO user('.
cmdText2 = 'name,age) VALUES('.
cmdText3 = '"liush",32)'.
WRITE /.
CONCATENATE cmdText1 cmdText2 cmdText3 INTO cmdText.
WRITE cmdText.
ULINE.
*分割字符
DATA idstr TYPE string.
DATA text1 like idstr.
DATA text2 like idstr.
idstr = '10,11,30,70'.
WRITE idstr.
SPLIT idstr AT ',' INTO text1 text2.
WRITE: / 'text1=', text1.
WRITE: / 'text2=', text2.
ULINE.
*全部转换大写
TRANSLATE cmdText TO UPPER CASE.
WRITE cmdText.
ULINE.
*全部转为小写
TRANSLATE cmdText TO LOWER CASE.
WRITE cmdText.