COBOL-了解SET MYSELF

Question

在我的COBOL程序中，我有以下声明：

SET MYSELF (STATUS) TO -1. 

此声明的作用是什么？我不了解MYSELF和STATUS字词。看来它给status参数的值是-1，对吗？ MYSELF是什么意思？

Answer 1

MYSELF是保留字，使编译器提供的任务项可以引用其自身进程的属性。因此，您需要在自己的进程中将STATUS设置为-1。

COBOL ANSI-74 Programming Reference Manual（PDF链接）

保留字MYSELF是编译器提供的任务项，使程序可以访问其自己的任务属性。因此，任何给定任务的属性可以在该任务中引用为属性名称为MYSELF。

例如，将属性自定义优先级更改为90。将我自己的属性合作伙伴的属性声明优先级更改为65。

第二个示例说明了另一个任务以及您正在运行的任务。PARTNER属性引用其他任务，该示例更改了另一项任务的DECLAREDPRIORITY。

Answer 2

在“普通” COBOL程序中，此语句无效。 MYSELF将是OCCURS（“表单元”）下方的条目，而STATUS将是要使用的索引（=数字变量）。