1, 拆分字符串split
语法&＃xff1a;
SPLIT INTO
代码&＃xff1a;
DATA: STRING(60),P1(20) VALUE &＃39;&＃39;,P2(20) VALUE &＃39;&＃39;,P3(20) VALUE &＃39;&＃39;,P4(20) VALUE &＃39;&＃39;,DEL(3) VALUE &＃39;***&＃39;.
STRING &＃61; &＃39; Part 1 *** Part 2 *** Part 3 *** Part 4 *** Part 5&＃39;.
WRITE STRING.
SPLIT STRING AT DEL INTO P1 P2 P3 P4.
WRITE: /&＃39;P1:&＃39; , P1.
WRITE: /&＃39;P2:&＃39; , P2.
WRITE: /&＃39;P3:&＃39; , P3.
WRITE: /&＃39;P4:&＃39; , P4.
2, 连接字符串Concatenate
语法&＃xff1a;
CONCATENATE ].
代码&＃xff1a;
DATA: C1(10) VALUE &＃39;Sum&＃39;,C2(3) VALUE &＃39;mer&＃39;,C3(5) VALUE &＃39;holi &＃39;,C4(10) VALUE &＃39;day&＃39;,C5(30),SEP(3) VALUE &＃39; - &＃39;.
CONCATENATE C1 C2 C3 C4 INTO C5.
WRITE C5.
CONCATENATE C1 C2 C3 C4 INTO C5 SEPARATED BY SEP.
WRITE / C5.
显示结果&＃xff1a;
在 C1 到 C5 之间&＃xff0c;忽略 尾部空格。 分隔符 SEP 保留尾部空格。
3, 获得字符串长度STRLEN
语法&＃xff1a;
[COMPUTE]
代码&＃xff1a;
DATA: int TYPE i,word1(20) TYPE c VALUE &＃39;12345&＃39;,word2(20) TYPE c,word3(20) TYPE c VALUE &＃39; 4 &＃39;.
int &＃61; strlen( word1 ).
WRITE int.
int &＃61; strlen( word2 ).
WRITE / int.
int &＃61; strlen( word3 ).
WRITE / int.
显示结果&＃xff1a;
请注意&＃xff0c;STRLEN 将操作数
4, 删除字段中空格CONDENSE
语法&＃xff1a;
CONDENSE
该语句去除字段
DATA: STRING(25) VALUE &＃39; one two three four&＃39;,LEN TYPE I.
LEN &＃61; STRLEN( STRING ).
WRITE: STRING, &＃39;!&＃39;.
WRITE: / &＃39;Length: &＃39;, LEN.
CONDENSE STRING.
LEN &＃61; STRLEN( STRING ).
WRITE: STRING, &＃39;!&＃39;.
WRITE: / &＃39;Length: &＃39;, LEN.
CONDENSE STRING NO-GAPS.
LEN &＃61; STRLEN( STRING ).
WRITE: STRING, &＃39;!&＃39;.
WRITE: / &＃39;Length: &＃39;, LEN.
显示结果&＃xff1a;
请注意&＃xff0c;字段 STRING 的总长度保持不变&＃xff08;注意&＃xff01;的位置&＃xff09;&＃xff0c;但删除的空格再次出现在右边。
5, 搜索字符串SEARCH
语法&＃xff1a;
SEARCH
该语句在字 段
否则将 SY-SUBRC 设置为4。
搜索串
---------------------------------
.
*
单词之间用 空格、逗号 、句号、分 号、冒号、 问号、叹号 、括号、斜 杠、加号和等号等分隔 。
代码&＃xff1a;
DATA STRING(30) VALUE &＃39;This is a little sentence.&＃39;.
WRITE: / &＃39;Searched&＃39;, &＃39;SY-SUBRC&＃39;, &＃39;SY-FDPOS&＃39;.
ULINE /1(26).
SEARCH STRING FOR &＃39;X&＃39;.
WRITE: / &＃39;X&＃39;, SY-SUBRC UNDER &＃39;SY-SUBRC&＃39;,SY-FDPOS UNDER &＃39;SY-FDPOS&＃39; .
SEARCH STRING FOR &＃39;itt &＃39;.
WRITE: / &＃39;itt &＃39;, SY-SUBRC UNDER &＃39;SY-SUBRC&＃39;,SY-FDPOS UNDER &＃39;SY-FDPOS&＃39; .
SEARCH STRING FOR &＃39;.e .&＃39;.
WRITE: / &＃39;.e .&＃39;, SY-SUBRC UNDER &＃39;SY-SUBRC&＃39;,SY-FDPOS UNDER &＃39;SY-FDPOS&＃39;.
SEARCH STRING FOR &＃39;*e&＃39;.
WRITE: / &＃39;*e &＃39;, SY-SUBRC UNDER &＃39;SY-SUBRC&＃39;,SY-FDPOS UNDER &＃39;SY-FDPOS&＃39;.SEARCH STRING FOR &＃39;s*&＃39;.
WRITE: / &＃39;s* &＃39;, SY-SUBRC UNDER &＃39;SY-SUBRC&＃39;,SY-FDPOS UNDER &＃39;SY-FDPOS&＃39;.
显示结果&＃xff1a;
搜索字符字 段
- ABBREVIATED
在字段
- STARTING AT
在字段
- ENDING AT
在字段
- AND MARK
如果找到搜索串&＃xff0c;则将搜索串中的所有字符&＃xff08;使用 ABBREVIATED 时的所有字 符&＃xff09;转换为大写形式。
代码&＃xff1a;
DATA: STRING(30) VALUE &＃39;This is a fast first example.&＃39;,POS TYPE I,OFF TYPE I.
WRITE / STRING.
SEARCH STRING FOR &＃39;ft&＃39; ABBREVIATED.
WRITE: / &＃39;SY-FDPOS:&＃39;, SY-FDPOS.
POS &＃61; SY-FDPOS &＃43; 2.
SEARCH STRING FOR &＃39;ft&＃39; ABBREVIATED STARTING AT POS AND MARK.
WRITE / STRING.
WRITE: / &＃39;SY-FDPOS:&＃39;, SY-FDPOS.
OFF &＃61; POS &＃43; SY-FDPOS - 1.
WRITE: / &＃39;Off:&＃39;, OFF.
请注意&＃xff0c;在 找到单词‘ fast’ 之后&＃xff0c;为了 查找包含‘ ft’的第 二个单词&＃xff0c; 必须在偏移 量 SY-FDPOS 上加2&＃xff0c;然 后从位置 POS 开始查找。 否则&＃xff0c;会再 次找到单词 ‘fast’ 。要获得‘ first’ 相对于字段 STRING 开始的偏移 量&＃xff0c;从 POS 和 SY-FDPOS 计算。
字符串: &＃39;Aaa-Bbb&＃39; 如何判断字符串中含有 &＃39;-&＃39;&＃xff1f;
并且将 &＃39;-&＃39; 后面的字符舍去&＃xff1f;
DATA string(20) VALUE &＃39;Aaa-Bbb&＃39;.SEARCH string FOR &＃39;-&＃39;.
IF sy-subrc &＃61; 0. string &＃61; string&＃43;0(sy-fdpos). WRITE string.
ENDIF.
6, 覆盖字符字段OVERLAY
语法&＃xff1a;
OVERLAY
该语句用字符串
如果省略 ONLY
如果
解释:
注意是"覆盖"不是”替换“&＃xff01;&＃xff01;&＃xff01;&＃xff01;&＃xff01;&＃xff01;&＃xff01;&＃xff01;&＃xff01;
OVER &＃39;1 2 3&＃39; WITH &＃39;456 &＃39;.
结果为&＃xff1a;152 3。
OVER &＃39;1 2 3&＃39; WITH &＃39;456&＃39; only &＃39;12&＃39;.
结果为&＃xff1a;4 6 3 。
OVER &＃39;123&＃39; WITH &＃39;456&＃39;.
结果为&＃xff1a;123。&＃xff08;没有空格&＃xff09;
OVER &＃39;1 2 3 &＃39; WITH &＃39;456 &＃39; only &＃39;13&＃39; .
结果为&＃xff1a;4 2 。
代码&＃xff1a;
DATA: T(10) VALUE &＃39;a c e g i &＃39;,STRING LIKE T,OVER(10) VALUE &＃39;ABCDEFGHIJ&＃39;,STR(2) VALUE &＃39;ai&＃39;.
STRING &＃61; T.
WRITE STRING.
WRITE / OVER.
OVERLAY STRING WITH OVER.
WRITE / STRING.
STRING &＃61; T.
OVERLAY STRING WITH OVER ONLY STR.
WRITE / STRING.
显示结果&＃xff1a;
T 与 OVER 的长度都是10。
以上。
京公网安备 11010802041100号