问题标签 [cobol]

我们有一个日本客户，在大型机上拥有 COBOL 源代码。他声称大型机上的代码以 Shift-JIS2 表示（我们认为我们对此非常了解）。当该代码传输到 PC 时，最常用的编码是什么？我们向他发送了一个程序来处理该 COBOL 代码，但它似乎卡住了。客户不会直接给我们代码，所以实验很难。他的实验似乎表明了 UTF-8；我假设在 Shift-JIS2 中可编码的日文字符相应地转换为 Unicode 等价物。有人在这里有经验吗？

编辑：我认为我们解决了我们的谜团。客户（呃！）在 PC 上使用 CP-932（“ShiftJIS”），但他的 COBOL 程序在标识符中有日文字符，这就是我们的工具阻塞的原因。

编辑：跟进：有点惊喜。SHIFT-JIS 通常将我们认为的 ASCII 文本编码为所谓的“FULLWIDTH”字符，它们占用与东亚表意文字相同的屏幕空间；常规 ASCII 字符充当半角。所以，有一个 FULLWIDTH "A" , "B", ... "Z" 以及 FULLWIDTH "-"。显然，要处理日语 COBOL，我们的 COBOL 解析器不仅必须接受西方 ASCII，而且还必须接受全宽等价物，尤其是。FULLWIDTH 字母和令人惊讶的 FULLWIDTH HYPHEN 用于分隔 COBOL 标识符中的“字母”。

编辑：IBM Enterprise COBOL 允许在标识符中使用 DBCS 字符。哎呀！

我找到了这个： http ://tiny-cobol.sourceforge.net/download.php

不确定如何在 Windows 上安装它。任何其他 ？

OS 400 开发下 RPG / COBOL 版本控制的最佳工具（最佳功能、最佳价格、最佳支持）是什么？

我听说过 ARCAD 和 ALDON。哪一个更好？还是有其他更好的工具？

我们正在处理 IBMEnterprise 日语 COBOL 源代码。

准确描述 G 类型文字中允许的内容以及标识符允许的内容的规则尚不清楚。

IBM 手册指出 G'....' 文字必须将 SHIFT-OUT 作为引号内的第一个字符，并将 SHIFT-IN 作为结束引号之前的最后一个字符。我们的 COBOL 词法分析器“知道”这一点，但在实际代码中发现了 G 字面量的对象。结论：IBM手册是错误的，或者我们误读了它。客户不会让我们看到代码，因此很难诊断问题。

编辑：为清楚起见，在文本下方进行了修订/扩展：

有谁知道 G 文字形成的确切规则，以及它们如何（不）与 IBM 参考手册所说的相匹配？理想的答案是 G 文字的正则表达式。这就是我们现在使用的（由另一位作者编码，叹息）：

其中 <name> 是一个宏，它是另一个正则表达式。大概它们的命名足够好，因此您可以猜测它们包含什么。

这是IBM Enterprise COBOL 参考。第 3 章“字符字符串”，副标题“DBCS 文字”第 32 页是相关阅读。我希望通过提供准确的参考资料，有经验的 IBM 人员可以告诉我们我们是如何误读它的：-{ 我特别不清楚“DBCS 字符”这个短语是什么意思，当它说“范围内的一个或多个字符”时X'00...X'FF for any byte" DBCS 字符除了成对的 8 位字符代码外，怎么可能是什么？如果您检查现有的 RE 匹配 3 种类型的字符对。

下面的一个答案表明 <squote><squote> 配对是错误的。好的，我可能相信，但这意味着 RE 只会拒绝包含单个 <squote> 的文字字符串。我不相信这是我们遇到的问题，因为我们似乎绊倒了 G 文字的每个实例。

类似地，COBOL 标识符显然可以由 DBCS 字符组成。标识符允许什么，究竟是什么？同样，正则表达式将是理想的。

EDIT2：我开始认为问题可能不是RE。我们正在阅读 Shift-JIS 编码的文本。我们的阅读器将文本转换为 Unicode。但是 DBCS 字符真的不是 Shift-JIS；相反，它们是二进制编码的数据。可能正在发生的事情是 DBCS 数据被翻译为好像它是 Shift-JIS 一样，这会破坏将“两个字节”识别为 DBCS 元素的能力。例如，如果 DBCS 字符对是 :81 :1F，则 ShiftJIS 读取器会将这对字符转换为单个 Unicode 字符，然后它的双字节性质就会丢失。如果你不能数对，你就找不到结束报价。如果找不到结尾引号，则无法识别文字。所以问题似乎是我们需要在词法分析过程中切换输入编码模式。玉。

在很少有人说 cobol 好话的时候，他们经常提到“复制对应”（和“移动对应”）。

我真的很想了解更多关于这些的信息——它们的语义是什么？是否与以下内容相同：

还是有比这更深的东西？Cobol 记录是强类型的，对吧？这是如何运作的？

我有许多正在迁移到 .NET 的 COBOL 程序员。我发现很多人很难采用/理解 OO 编程原则。我没有任何 COBOL 经验，因此我找到很少有相似之处的能力非常有限。

我不可能说“忘记你 20 年的经验。这是全新的”，但我还没有类比和工具来做得更好。

您对我有什么建议可以帮助他们了解 .NET 世界？

我知道很多 Y2K 的努力/恐慌都以某种方式集中在 COBOL 上，无论是否应得。（哎呀，我在 Perl 脚本中看到了 2000 年 1 月 1 日破坏的小 Y2K 错误）

我感兴趣的是，作为一种语言，COBOL 是否有一些特定的东西使它容易受到 Y2K 问题的影响？

也就是说，与大多数用它编写的程序的时代以及随后需要节省由旧硬件驱动的内存/磁盘使用以及没有人预计这些程序能够存活 30 年这一事实相反？

如果答案是“除了年龄之外没有任何特定于 COBOL 的内容”，我非常高兴——只是好奇，对 COBOL 一无所知。

我一直在阅读有关仍在生产中的 Cobol 代码量的信息。它没有更新为更现代的语言的主要原因是它需要太长时间/成本太高。

我的问题是：如果有一种工具可以将 Cobol 转换为 Java，那么任何组织会发现它有用吗？还是他们宁愿继续保持他们知道已经有效的东西？

我需要将 TRAP(OFF) 运行时选项传递给 IBM AIX COBOL 应用程序。问题是，我不知道如何做到这一点，而且我在 IBM 文档中找不到任何关于如何做到这一点的内容。我已经export TRAP=OFF在我的运行脚本中尝试过，但没有这样做。有谁知道如何做到这一点？

I am tasked with programming a routine that will run on a iSeries platform - where I pass in a parm (like userid, timestamp, etc...) into a program that can perform SHA-2 data encryption. I take the encryption result and format it into a string to open a browser.

I know how to open a browser using a CLP but trying to find a way to perform the encryption. Do I have to code a Java program to handle that? Is there something out there I can compile to iSeries that can be called from a SQLCBL or CLP?

I've never coded a Java program/class on the iSeries. Have some Java pgmrs here at work that can assist with that. Just need to know how to write a Java class and compile on the iseries.

Thoughts? Hints? Suggestions?