EXTENT in method definition raises an error

[eglekaz]

Example:

method public char extent 4 parseSomething(pcOrigString as char):
    def var i as int no-undo.
    def var iCount as int no-undo.
    def var cCodes as char extent 4 no-undo.

    iCount = num-entries(pcOrigString).
    do i = 1 to iCount:
        cCodes[i] = upper(trim(entry(i, pcOrigString))).
    end.

    return cCodes.
end method.