字符串处理

如何从一个文本字符串中删除尾随或前置的'0'或空格？

SHIFT c RIGHT DELETING TRAILING c1.

SHIFT c LEFT DELETING LEADING c1.

在上面代码中的“C1”变量可以被定义为“空格”或“0”。

如何转移负号？

在SAP的世界里，负号标志是在数字的右侧，如“123.45-”。然而，在某些情况下，用户通常会要求把负号转移到左侧。 例如，如果你的报表列表要下载到个人电脑上的Excel文件，用户将要求你重新安排负号。下面是转移负号的代码 范例。

Data: p_amt(18).
P_amt = '         12345.67-'.
shift p_amt right deleting trailing '-'.
shift p_amt left deleting leading space.
concatenate '-'  p_amt into p_amt.

如何替换字符串？

你可以使用“TRANSLATE”语句来代替字符串中的字符。  下面的代码范例可以把字符串里的‘X' 替换成”Y“。

translate <string> using 'XY'.

如何分割一个被tab分隔（tab-delimited）的字符串？

你可以方便地使用“SPLIT”命令，分裂一个被分隔符分隔的字符串。 在大多数情况下，分隔符是一个或多个字符，如“|”，"||",或'，'等，但是，” tab-delimited “分隔符是不同的。它必须定义为值是“09”的'×'类型。

下面的代码范例显示了如何分割tab分隔（tab-delimited）的字符串。请注意” tab-delimited “分隔符变量是如何定义的.

Data: tab_del type x value '09'.

SPLIT <string> at tab_del into <field1> <field2> ….

如何删除字符串中的分隔符？

你可以先把分隔符除掉 ， 然后再把所有分割后的子字符串串联在一起。

DATA: tab_del TYPE C VALUE '|'.
DATA: field1, field2, ……,  fieldn, final_str TYPE string.

  SPLIT <string> AT tab_del   INTO: field1 field2 … fieldn.

CONCATENATE  field1 field2 … fieldn INTO final_str.