问题标签 [cobol85]

我正在检查 NIST TestSuite 的 Cobol 85 中的这个例子：

对我来说这似乎是错误的，因为记录描述条目 03 VKEY 后面应该跟一些关键字，比如 VALUE。相反，它后面是一个我不知道如何解释的标识符（XXXX086）。在这种情况下是什么意思？

在我的 COBOL 程序中，我有以下语句：

这个声明有什么作用？我不明白 MYSELF 和 STATUS 两个词。似乎它为状态参数提供了值-1，对吗？我自己是什么意思？

在我的程序中，我不断用从数据库表中获得的数据填充以下数组，然后检查它以找到某些单词：

有时会出现 6 次，有时会超过 6 次。

每次向数组写入数据时，我都想查找数组中的行数，我该怎么做？

我试过了，但它基于固定长度：

在第一个输出行中，它写入 SN 和第一个产品线，然后在接下来的行中，它写入所有剩余的产品线和空白 SN。

类似于：12345678 第一个产品线 第二个产品线等

它正在工作，但是，它仅在 CNT1 为 11 时停止，我如何根据 PRODUCTS-TABLE 中每次实际有多少行来为过程提供变量 CNT1？

COBOLRANDOM函数文档没有提供有关argument-1.

也许有人可以阐明我的以下问题：

• 接受什么范围的种子值？
• 如何处理超出允许范围的值？
  • 它们被截断了吗？
  • 只使用低位吗？
  • 还是高位？
  • 是否使用了最左边的数字？
  • 还是最右边？
  • 他们有多少？
  • 函数是否MOD应用于种子值？

简而言之：

COBOL 标准中是否有一个规范来定义01 myRandomSeed PIC 9(50).正在使用的值的哪些数字？

这是cobol代码

这是 SYSOUT 输出

我的问题是当我尝试在输入一个大文件 (6GB) 时打开，有一条消息说：

我编译了程序并且没有错误，但是当我尝试运行它时，我使用了一个小的（例如 3 GB）我的程序可以正常工作。

有任何想法吗 ？

变量声明：

我的计算是正确的。但是输出文件的唯一第一个 计算记录变为空白并影响所有记录。

在输出文件 [ A5-SalaryReport-5A.out ] 中，您可能会看到第一条记录的位置为 BLANK。

这是我的输入文件[ A5.dat ]

这是我的COBOL 项目文件 .cbl [ A5-SalaryReport-5A.cbl ]

这是我的输出文件[ A5-SalaryReport-5A.out ]

我知道弄清楚这不是一件容易的事，我很感激你提供的任何答案。

干杯!

是否可以在 Cobol 程序中获取并显示当前行号？例如，C 允许通过以下方式执行此操作：

There is a C- code
char* str = NULL; str = (char*) malloc(sizeof(char)*50);

Could I write the same thing in Cobol-85?

Or maybe I can use
01 LE USAGE IS POINTER.
pass it into C-lang function and allocate memory and fill string there and use this pointer on Cobol side for displaying string content? Like