ibm-midrange - CL 中字符串中字符的最后出现次数

Question

我需要在 CL 中找到字符串中最后一次出现的字符。例如，如果我有一个字符串Test_01_abc.Txt，并且我必须得到最后一次出现的“_”（下划线），我需要得到答案为 8（这是字符串中第二个下划线的位置）。我使用的是 7.2 版本，但 %SCANR 在这里不起作用。一种方法是循环并搜索它。有没有更好的办法？谢谢

Answer 1

%SCANR是一个 RPGLE 内置函数，而不是 CLP。但是，鉴于您使用的是 v7.2，您唯一的选择是放入QCLSCAN一个循环并以这种方式查找最后一次出现。Python如果您愿意使用它而不是 CL，则可能有一种方法可以做您想做的事情。