问题标签 [gnucobol]

我正在尝试创建一个随机数生成器（一些随机数稍后将被转换为 [AZ] 字符）。我已经让随机生成器的主要部分正常工作，但我不断收到相同的随机结果0.6734141422。

我面临的另一个问题：有一半时间我的程序编译速度太快。由于我以毫秒为单位使用当前日期，因此快速编译我的程序将意味着为RANDOM函数提供相同的种子。我一直在考虑简单地添加一个计数器，在将每个种子应用到RANDOM. 这足够还是有更优雅的解决方案？

有人可以向我解释为什么即使应用了不同的种子值，我总是会收到相同的随机结果？每次执行程序时都会得到这个结果。

我正在使用 PerCobol 编译器，据我所知，它与 OpenCobol 兼容。

总结一下：

• 我应该如何克服平等的种子？

• 为什么我会收到不同种子的相同随机结果？

  /li>

样本输出：

如果您对解决我最初的问题有建议（创建一个由字母数字字符组成的随机密码），我也很高兴听到它。

编辑：通过省略种子，两个问题都立即得到解决。这个结论背后的更多信息可以在下面的评论中找到。如果有人解释为什么不同的种子仍然会产生相同的值，我会很高兴听到它！

OpenCOBOL 在编译二进制文件的过程中使用中间 C 源代码，使其能够访问整个 libc 世界。以集中嵌入多个 SWIG 包装器为目标：

gcc 构建了一个非常好的二进制文件，Java 和 COBOL 编译器的 C 输出很好地混合在一起。

仅测试swig -tcl, -perl,-python和-java到目前为止（nextbig_wrapper.c当然都不同）。

swig -java混合（例如）和swig -python跨越相同的nextbig.c和会涉及多少悲伤nextbig.i？_wrapper.c在管理两个或多个目标文件时，是否存在用于手动干预的已知习语？还是众所周知的事情不该做？

程序的输出很简单：
1
2

但我希望：

1
2
2
1
在 ifs 之外

我究竟做错了什么？我是否误解了第一个 if 中语句的句子结构或句号的位置？

I have my main calling two functions. The second function called (Decrypt) calls the first function (Encrypt) inside of it. So here Encrypt is being called twice. Once in the main, and then once inside of Decrypt.

The issue is that it refuses to work this way. Once Encrypt gets used in the main, I can't use Encrypt again anywhere~ in the program. Its like the variables are still in use and I can't pass it new ones.

For example, if I remove Encrypt from the main function and ONLY call Decrypt - it works fine. I can't figure out why.

我正在尝试在 Cobol 中使用嵌套的 if 语句。据我所知，我正在遵循样式指南，但不断收到错误消息：

file_name.cob:64：错误：语法错误，意外 ELSE <- 这是第二个 ELSE 语句

该代码的目的是用作凯撒密码，但似乎只有嵌套的 if 语句会产生错误。我尝试将嵌套语句放在初始 IF 语句的 ELSE 子句之后，但这也没有成功。

编辑：我正在使用 open-cobol，并使用“-free”选项进行编译

谢谢！

为什么我不能在 COBOL 中执行此嵌套执行循环？

如果我把END-PERFORM。在任何一行都比我在退出程序之前的最后一行更早 - 它有效。但我需要程序每次都显示 INPUT C 值。在外部执行循环中。它让我发疯。

我正在研究 Cobol，但是在读取文件时遇到问题，cobol 将文件的状态返回为 35...我在互联网上查看了这个状态是什么，据我了解是系统确实找不到该文件，但我在与可执行文件相同的目录中创建了该文件，其中包含系统应识别的列...

我该如何解决这个问题？

我是 COBOL 的新手，我们最新的培训活动是我们将尝试获得如下三个项目的输出：

1. 0000/2013
2. 00012345
3. 12345**

我已经尝试使用下面的代码，但它显然没有给我想要的输出。它不显示零。

我在这个程序中有一些错误。当我编译时，代码显示这样的错误

prak.cob：在“isi-data-tabel”段落中：

prak.cob:34：错误：语法错误，意外'（'

请检查下面的代码，这是第 34 行中的错误：

这个完整的代码

我在 Mac 环境中使用 OpenCOBOL 1.1.0 作为编译器。

我们正在尝试将数据加载到 SQL 服务器。所以任何人都可以为下面提到的布局建议适当的表模式。