COBOL - 字符串处理

2025年3月17日 | 阅读 3 分钟

COBOL 中的字符串处理语句用于执行字符串操作。 COBOL 提供了三种类型的字符串处理语句:

  • INSPECT
  • 字符串
  • UNSTRING

INSPECT

Inspect 动词替换或计数字符串中的字符或一组字符。 我们可以对数字、字母或字母数字值执行字符串操作。 Inspect 操作从左到右执行。

Inspect 提供以下两个选项:

Tallying(计数)?

Tallying 用于计数字符串字符。

语法

这里,input-string 和 output-string 是参数。 Input-string 是要计数的字符串。 output-string 是用于保存字符计数的数据项。

示例

让我们看一个 Tallying 选项的例子:

输出

COBOL String Handling

Replacing(替换)

Replacing 选项替换字符串字符。

语法

这里,input-string 参数是要从 char1 替换为 char2 的字符串。

示例

输出

COBOL String Handling

字符串

String 动词用于将两个或多个字符串或文字的部分或全部内容连接到一个数据项中。 在 String 动词中,必须使用 'DELIMITED BY' 子句。

语法

这里,使用的参数详情如下:

  • ws-string1 和 ws-string2:这些是要连接的输入字符串。
  • ws-string:这是输出字符串。
  • ws-count:用于计数新连接的字符串的长度。
  • Delimited:用于指定字符串的结尾。
  • Pointer 和 Overflow:这些是可选的。

示例

让我们看一个 String 动词的例子:

输出

COBOL String Handling

UNSTRING

UNSTRING 动词将一个字符串分解为多个子字符串。 ' DELIMITED BY ' 子句在 unstring 动词中是强制性的。

语法

示例

让我们看一个 Unstring 动词的例子:

输出

COBOL String Handling