我有这段代码:
inspect w-string1 replacing all x'C48D' by 'c'
但是编译器报了以下错误:
操作数大小不正确
有没有办法通过检查命令来用一个字符替换更多的字符?或者我必须通过执行循环自己完成它?
我有这段代码:
inspect w-string1 replacing all x'C48D' by 'c'
但是编译器报了以下错误:
操作数大小不正确
有没有办法通过检查命令来用一个字符替换更多的字符?或者我必须通过执行循环自己完成它?
使用 INSPECT 语句时,两个字符串必须是相同的长度。如果要用不同数量的字符替换多个字符,则唯一的方法是编写自己的循环来实现。
INSPECT ... REPLACING
只能替换相同长度的内容。但是,当您为替换编写一次性用户定义函数时,可以使用简单的MOVE
。 ... 或者使用具有类似于FUNCTION SUBSTITUTE
的功能的不同编译器(例如 GnuCOBOL)。 - Simon Sobisch