问题标签 [netcobol]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票
1 回答
1320 浏览

db2 - JMP0811I-U 使用 DB2 SQL 编译 Fujitsu COBOL 后出现 Fujitsu 运行时错误:原因/补救措施?

我能够(在 Windows XP 上)预编译、编译和链接包含嵌入式 SQL 的示例(Fujitsu NetCobol)COBOL 测试程序。该测试程序用于读取并显示 DB2(Linux 上的 UDB 9.5)数据库表中的行数。

在运行时,我收到以下错误消息:

JMP0811I-U [PID:... TID:...] 'sqlgstrt' 程序的链接规则或参数失败。PGM=DB2TST1

此错误所指的预编译源代码如下所示:

有人知道这个错误信息是什么意思吗?

0 投票
3 回答
4271 浏览

cobol - 我在哪里可以下载富士通 COBOL 3 或 4

我正在寻找 fujitsu COBOL 3 或 4。根据 NetCobol 的网站,它与一些旧书一起交付。

如果你知道这些书的一些书名,我可以搜索它们并购买它们。

(我已经为傻瓜找到了 COBOL,但是那本书无法发送到我的国家(比利时))

非常感谢,

伊万

0 投票
4 回答
1915 浏览

string - COBOL 替代 BASIC 的 MID 以及如何连接字符串?

我正在寻找 Visual Basic 的 MID 函数的 COBOL 替代方案。我需要做的是从 8 个字符串中取出前 5 个字母并将它们连接起来。

我正在使用富士通 COBOL。

非常感谢,

伊万

0 投票
3 回答
611 浏览

cobol - 奇怪的 COBOL 错误

首先,这是完整的源代码: http: //pastebin.com/5teGNrPC

我收到了一个奇怪的 COBOL 错误,但我找不到它的含义。它显示打开错误(请参见以下屏幕截图)。

如果我首先使用“新文件”,然后添加一条记录,则不会发生这种情况。

这是应用程序二进制文件和它生成的一些日志文件。

非常感谢,

伊万

PS:是富士通 NetCobol 方言。

0 投票
2 回答
1040 浏览

.net - 富士通 COBOL 中的迭代 Systems.Collections.List

如何循环浏览一个集合?

我正在使用 Fujitsu/Alchemy 编译器的试用版,并且从供应商那里获得了缓慢而糟糕的支持。

我基本上想将一个列表从 C# 传递给 COBOL,然后让 COBOL 使用它并可能更新它。

在 C# 中,遍历集合的常规方法是使用“foreach”构造。

但是,C#“foreach”构造是以下内容的快捷方式:

如果你能帮我弄清楚如何声明这个类,我可以用 COBOL 写这个:

“枚举器”结构记录在 Microsoft 的 MSDN 站点上

它告诉“枚举器”是一个结构,而不是一个类!

从我在手册“CreatingCOBOLfromDotnetFrameworkDox.pdf”中可以看出,结构被定义为 COBOL 存储库中的类。

手册中的示例:

下面,我将重复我尝试过的一些变体,但由于“无法解决”错误,这些变体都无法编译。如果你能告诉我如何正确声明这一点,我认为我们可以继续前进。

1.

第二行错误:

错误 JMN1795I-S:无法解析命名引用“System.Collections.Generic.List<>.Enumerator”。

  1. 完全相同的错误:

    /li>

错误 JMN1795I-S:无法解析命名引用“System.Collections.Generic.List.Enumerator”。

  1. 同样的错误:

    存储库。CLASS CLASS-LIST AS "System.Collections.Generic.List<>" CLASS STRUCT-Enumerator as "System.Collections.Generic.List.Enumerator" 。

错误 JMN1795I-S:无法解析命名引用“System.Collections.Generic.List.Enumerator”。

另一种选择是将它视为一个数组,但我也坚持这一点。

错误 JMN2671I-S: ':' 必须在引用修饰符中指定。':' 假设。

我认为编译器可能将 (1) 视为子字符串操作。

0 投票
1 回答
329 浏览

cobol - 在 netCobol Fujitsu 中读取 fm 文件

我有多个 *.fm 文件。如果我在记事本中打开一些文件,在标题中我可以看到“rmkf”

我只想打开这个文件。

我试图与 jdbc 驱动程序连接,但它说 HXTT 需要文件数据结构 (FD) 还使用 Delphy 开发的应用程序进行了测试,该应用程序提取了一些数据但不是全部

我不知道还有什么要调查的

谢谢!

0 投票
1 回答
312 浏览

x86 - Netcobol cobol 命令回复“参数无效”

在 Solaris10 x86 64bit 版本上,我安装了 Fujistu NetCobol,并执行了“cobol”命令。结果操作系统回复“参数无效”。

我按照用户指南中的示例使用了这个 cobol 命令。

有什么遗漏——一些我忽略的设置吗?

我已确认以下内容:

  • 具有 x 权限的 cobol
  • PATH 环境变量中的 cobol
  • NetCobol 安装后的环境变量设置
0 投票
2 回答
1057 浏览

cobol - COBOL - 如何从 .dat 文件中读取和导出文本

我有一个客户想从基于富士通 COBOL 的旧系统迁移到我们的系统,他说,他希望将他的旧数据保留在新系统中,如产品、制造商等。我没有 COBOL 源文件,我有:.DAT 文件.RDD 文件.FDD 文件

显然 .DAT 文件在INDEXED组织中,示例文件输出如下:

FDD 输出http ://textuploader.com/kxdv
RDD 输出http ://textuploader.com/kxdw

我不能简单地在记事本中读取 .DAT 文件,我尝试过 SiberDataViewer 但不成功,导出数据也需要付费。

如果有办法,我可以编写一个程序将所有这些文件导出为 csv、dbf、postgres 格式吗?
如果你还在阅读,谢谢。

0 投票
1 回答
286 浏览

cobol - 比较时指定的 NetCOBOL 值无效

我正在使用 NetCOBOL for .NET 来扩展 COBOL 应用程序。当我通读并输入文件时,我正在对数字字段和某些记录进行简单比较,但INVALID VALUE SPECIFIED出现错误。

该字段为 INV-MST-ONHAND 定义:

比较在这行代码中

它只发生在一些记录上。数据文件已编入索引,因此不易手动解析。我正在寻找一种方法来修复它,甚至跳过这些,但我不知道如何捕捉和处理这种错误情况。

这是完整的记录布局:

当我检查INV-MST-ONHAND(1)失败时的值时,Visual Studio 调试器显示 +0000000.000 的值,并且使用 Quick Watch 条件测试为真。

当我检查 INV-MST-LOCATION(1) 时,我看到了这个快速观看

0 投票
0 回答
48 浏览

.net - 将 .NET 类型转换为 netCOBOL

我有一个System.Object[]在外部库中返回的方法。

在 Vb.NET 的示例中,它完美地工作:

“文本”的类型是 System.Object[]

在COBOL中,调用方法时,返回类型转换错误:

OBJ-RET 的类型是 PIC N

如何转换System.Object[]PIC N


我已经尝试过了:

但我收到以下错误: