COBOL PERFORM A THRU A EXIT笔误 COMPUTE +或- 笔误结果分析

最新推荐文章于 2023-05-17 16:55:51 发布

cuiyadll

最新推荐文章于 2023-05-17 16:55:51 发布

阅读量1.2k

点赞数

分类专栏： COBOL 文章标签： cobol

本文链接：https://blog.csdn.net/cuiyadll/article/details/84481096

版权

本文探讨了在COBOL编程中，使用COMPUTE指令时的常见错误，如`A = + B`和`A = - B`可能导致的误解。此外，详细分析了`THRU`关键字的误用，指出其可能对程序流程的影响，并通过实例展示了错误用法可能导致程序执行不符合预期的情况。

摘要由CSDN通过智能技术生成

1、COMPUTE A = + B，A = - B 一般为笔误，执行结果：A的值等于|B|。
测试:
MOVE 5 TO WK-INPUT
MOVE 5 TO WK-OUTPUT
或者
MOVE -5 TO WK-INPUT
MOVE -5 TO WK-OUTPUT
COMPUTE WK-OUTPUT = + WK-INPUT
执行结果：WK-OUTPUT结果为5.
COMPUTE WK-OUTPUT = - WK-INPUT
执行结果：WK-OUTPUT结果为5.

2、THRU笔误：编译测试均通过
以下包括THRU执行流程、THRU笔误执行测试。
如下笔误：
…… ==> 该部分代码正常执行
PERFORM XXXX-TEST-PREFORM
THRU XXXX-TEST-PREFORM EXIT ==> 红色字为COBOL关键字不执行XXXX-TEST-PROFORM-EXIT
…… ==> 该部分代码正常执行
XXXX-TEST-PROFORM-EXIT.
EXIT.
上述语句编译成功，不影响正常程序流，程序执行步骤完全一致，所有测试全部通过。
EXIT语句，其实就是标识而已，不起作用。

若XXXX-TEST-PROFORM-EXIT写法如下，执行结果会有很大不同。若写法如下，可能是程序退出点，但因为未正确书写“THRUXXXX-TEST-PROFORM-EXIT”，则程序不会执行该段，导致程序无法退出。
XXXX-TEST-PROFORM-EXIT.