function - 无法在progress4gl上使用函数

Question

我一直在尝试创建一个简单的函数，它会积累一些字符串，然后我会调用它并返回它，但由于某种原因我得到:

Could not understand line 1 (198)

这太模糊了，我一直在论坛中寻找示例来比较我的，但似乎没问题，有人可以向我解释一下我可能做错了什么吗？

代码:

put unformatted fcustomer(). /*line one*/

function fcustomer returns char():

    define variable vgatherer as character.
    define variable i as integer no-undo.

    do i = 1 to 10:
        assign vgatherer = vgatherer + "thing(s)".
    end.

    return vgatherer.

end function.

Answer 1

函数需要在使用前声明或前向声明。

您可能还想要一个输入参数。

function fcustomer returns character ( input p1 as character ) forward.

put unformatted fcustomer( "some text" ). /*line one*/

function fcustomer returns character ( input p1 as character ):

    define variable vgatherer as character.
    define variable i as integer no-undo.

    do i = 1 to 10:
        assign vgatherer = vgatherer + p1.
    end.

    return vgatherer.

end function.