问题标签 [cobol85]

我是该网站和 COBOL 的新手。我正在尝试编写一个程序，它读取一个 80 字节的文件，并找到一个特定的字符串并抓住另一个紧随其后的字符串。我遇到的唯一问题是字符串的起始位置并不总是在整个文件中的同一字节中。例如，我试图在下面找到的字符串是在整个文件中出现两次的 LENGTH(#####) 字符串：

注意两个 LENGTH(#####) 字符串。下面的代码设法计算长度字符串出现的次数以及获取最终长度字符串计数（我真正想要的，长度字符串中的数字），但仅当它们位于这两个位置时：

该代码适用于上面示例输入中显示的两个位置。但如果 LENGTH(####) 以任何其他字节位置结束，它将不起作用。除了编写 80 个 IF 语句来检查文件中每个字节的字符串之外，还有没有更简单的方法可以在长度括号内获取这些值？我检查了很多其他帖子，并考虑过使用指针或表格，但我似乎不太明白。

我知道代码还没有完成，但我可以在如何使用表格方面提供一些帮助，因为我很难显示我想要添加到变量 SEAT-NUM 的内容以及删除字符串 1 的任何提示1会有帮助

i just want to know how to make sure that the input entered by the user is only Y, y, N, or n.

I used this code:

But still it doesn't work. The user can still type other characters. Any help will be appreciated. Thanks in advance.

大约有 10 个 COBOL 模块链接到 4 个 fortran 模块。我将 fortran 代码转换为 C 程序。并将 10 个 cobol 模块链接到替换的 4 个 C 模块。

在这 10 个 COBOL 模块中，现在应该有“ENTER C”语句替换 ENTER FORTRAN 语句。之后在编译时，我发现其中两个 COBOL 模块 - 编译时抛出错误。其他的不要。

我得到的错误是：“算术表达式太复杂：使用了浮点数！” - 它指向这些 COBOL 模块中的类似行。（我使用 COBOL85 编译）

指出错误的行看起来有点像这样： COMPUTE D = L OF E / (( L + (A/100)) ** ( Z OF J(S-1)/365)) 这里，L ,E,A,Z & J 可能来自 C 程序。

还指出了其他行，看起来有些相似。这些行中最常见的是**（指数运算符）。

注意：这 10 个 COBOL 模块在与那些 fortran 模块链接时编译得很好，所以我相信问题出在编写的等效 C 程序上。从 FORTRAN 转换时，我还在 C 模块中使用了以下更改。

INTEGER*8 到 C 中的 long int。DOUBLE PRECISION 到 C 中的 DOUBLE。INTEGER 到 C 中的 int。

这里可能是什么问题？

我最近开始了一COBOL门课程，并且由于我的计算机配置（Windows 7 64 Bits并且GNU/Linux 64Bits)我必须使用它Dosbox来编译和执行程序。

一切都很顺利，但是当我尝试打开Indexed file、I-O或Ouput模式时，我发现了一些麻烦。我可以编译和链接，但在执行时，dosbox会被冻结。

我的编译器版本是MS-COBOL 5.00.74 DosBox（最新版本）。

有人遇到过这个问题吗？有人可以告诉如何解决它。

我的代码就是这个。

提前致谢。

做一个摊销时间表。我在 300-REPORT 模块中设置了显示付款信息的行，然后在显示后更新该信息，就像进行了另一次付款一样。它应该在余额为 0 美元时停止，然后将其全部写入文本文件。

问题是，它显示了该行，而不是进行新的数学运算，它只是一遍又一遍地显示同一行，因此创建了一个无限循环。

我正在读取输入文件并将其写入输出文件直到达到 EOF 但我的程序的问题是在输出文件中写入记录直到达到 EOF 输出文件包含与输入文件相比额外的一条记录，即如果输入文件包含 10 条记录，则输出文件包含 11 条记录。并且输出文件中的额外记录与最后一条记录相同，即最后一条记录重复两次。

所以你能告诉我我的代码有什么问题吗？

我的程序代码。

我的 COBOL 程序读取了一个可能为空也可能不是空的 VSAM 文件。当文件为空时，我在 INPUT/IO 模式下打开时收到状态代码 35。我不想在程序中而是在 JCL 中处理它。有什么方法可以检查 VSAM 文件是否为空...如果无法通过 JCL 进行处理，那么我们可以在程序中处理它而无需检查状态代码 35？

我在一个新的 cobol 项目中。我的客户要求我们使用集成了 Micro focus Visual Cobol 的 IDE（可以连接到 oracle 的 Pro*cobol）。我找到了 2 个版本。

Micro focus Visual Cobol for Visual Studio Micro focus Visual Cobol for Eclipse 我的团队对 eclipse 有很好的经验，所以我选择了 Micro focus Visual Cobol for Eclipse。

我已经完成了微焦点页面http://documentation.microfocus.com/help/index.jsp?topic=%2Fcom.microfocus.eclipse.infocenter.visualcobol.eclipsewin%2FGUID-9BF8F107-22F3-414D-BFFE的任何后续文档-D242947A7B79.html

但是，当我安装完成。我打开，COBOL 透视图无法显示。我试图打开一个由微焦点创建的示例 cobol 项目，但项目无法启动。

我要上传一些图片，但 stackoverflow 警告我“至少有 10 个声望来上传图片”。请帮助我...非常感谢你

如果我有 2 个屏幕。首先是提示屏幕，要求输入一些记录键，下一个屏幕显示有关记录的信息。现在，当我想将控制权转移到第二个屏幕时（在完成第一个屏幕的工作之后），我可以通过以下方式做到这一点：

其中 trans-id 是第二个屏幕的。

那么当我们在 cics 中已经有了 return() 时，还需要使用诸如 xctl 之类的调用函数吗？