gpt4 book ai didi

recursion - 在 COBOL 中,是否可以递归调用一个段落?

转载 作者:行者123 更新时间:2023-12-04 17:18:36 25 4
gpt4 key购买 nike

在 IBM 大型机的 COBOL 中是否可以递归调用一个段落?

200-PARAGRAPH SECTION.

IF WS-COUNTER < 10
ADD 1 TO WS-COUNTER
PERFORM 200-PARAGRAPH
ELSE
DISPLAY 'I'M DONE'
END-IF.

200-EXIT.
EXIT.

最佳答案

检查当前的 COBOL 语言引用,但 AFAIR a para 不能 PERFORM 本身。措辞就像你会得到不可预测的结果,因为不支持递归。

如果您需要结束相同的代码,也许重构以使用 PERFORM UNTIL 是您所需要的?

关于recursion - 在 COBOL 中,是否可以递归调用一个段落?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/27806812/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com