Progress 4GL如何计算字符串中用于索引函数的分隔符数

Don*_*nna 1 function progress-4gl

这段代码

disp entry(5,"1 2 3 4"," ").
Run Code Online (Sandbox Code Playgroud)

返回错误,因为条目5超出范围.

如何计算字符串中的分隔符数,以便我不会尝试访问不存在的条目?

Tom*_*com 6

NUM-ENTRIES(字符串,分隔符)