问题标签 [gnucobol]

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 投票
2 回答
2197 浏览

cobol - 在非常简单的 COBOL 程序中使用 OCCURS 时出错

这是我使用 OCCURS 声明变量的代码。

错误:

arrayex.cbl:12:错误:77 级项目 'WS-FIRSTARR' 不能有 OCCURS 子句

编译失败的任何原因?

0 投票
4 回答
9342 浏览

cobol - 开始使用 OpenCOBOL!(“你好世界!”)

我正在尝试制作一个非常简单的 COBOL 程序。我已经设置好我的目录、配置等,但是当我去编译它时,我得到了这个错误:

(“sampleCOBOL.cbl”是我的文件名)

这是我的文件包含的内容:

我知道错误发生在第 9 行(“停止运行”)。然而,为什么?

0 投票
1 回答
3475 浏览

unix - 配置:错误:gmp.h (GMP) 是必需的

当我尝试安装 open-cobol 我运行 ./configure 时,最后会显示此错误:

然后我这样做:

但我得到了这个:

0 投票
2 回答
9701 浏览

cobol - 比较 COBOL 中的 2 个 PIC X 字符串

我对 COBOL 真的很陌生,我想问一个问题。如果我有 2 个字符,我想知道它们是否是同一个字符串怎么办

我尝试在 google 上搜索并找到了 Search 方法。但我无法真正理解它,我认为它不适用于我的情况,因为我没有使用桌子。

0 投票
2 回答
2059 浏览

ubuntu - GnuCOBOL failing to find dynamic symbols, only on recent Ubuntu

Something changed recently, I think.

GnuCOBOL relies on dynamic linking, symbols looked up with dlsym at run-time. This CALL run-time support code has been in OpenCOBOL for some 7 years now. It no longer works on Ubuntu 14.04, but does under Fedora 19/20.

ldd no longer shows any libraries listed using -l

For instance as a test, Ubuntu 14.04.1

The following COBOL program

The binary has NO indication that libgtk-3.so is in the mix.

and then on Fedora 20, same version of the compiler (built slightly differently, finding ncursesw instead of ncurses - assuming this is not part of the issue at hand)

The generated C code (GnuCOBOL uses C intermediates) on Ubuntu

And Fedora

I get good results on Ubuntu (full ELF linkage hints) when gtk_init is called from C, not as a string passed to cob_resolve. Tested with gcc -o simple simple-gtk.c -lgtk-3

So what changed with the assumptions surrounding -llibname? It does not seem to be included in ELF data for dlopen to even bother trying looking for libgtk-3.so

More information: Erroneous compile lines on Ubuntu really make it look like this should be working. (Misspelling gtk)

And yet, with the correct compile line, the ELF is showing no linkage hints to gtk-3

I've been head scratching on this on and off for a while now. Looking for a hint as to what assumptions changed with Ubuntu and gcc and/or ld and/or dlopen dlsym.

The open-cobol package has been working in Debian and Ubuntu repositories for quite a few years now. Even older versions of GnuCOBOL (GNU Cobol, and or OpenCOBOL) on Ubuntu all fail now. Something changed and we didn't get the memo. More than willing to change the compiler sources, but looking for friendly StackOverflow insights first.

This does not seem to be a local environment issue, as this Ubuntu problem is showing up for others as well. This also feels like one of those DOH! simple to fix problems.

More than willing to add more compile logs, LD_DEBUG=all dumps, or straces etc.

0 投票
1 回答
13684 浏览

cobol - 在 COBOL 中的字符串中查找子字符串

我的问题是,给定我从文件中读取的变量,查看它是否包含或匹配另一个字符串。

换句话说,在一个文件中查找其变量的所有记录

布拉德 PIC X(30)

匹配或包含由键盘引入的字符串。

我非常有信心通过 INSPECT 指令解决了这个问题,并且我在我的代码中尝试了这样的事情:

其中 CITY 是我通过键盘引入的变量。

¿ 有人知道如何在“字符串”中找到“子字符串”吗?

例如,如果我介绍了“Zaragoza”,我的程序必须打印文件中变量 BBRADD 包含“Zaragoza”的所有记录。

0 投票
3 回答
1631 浏览

cobol - 在 COBOL 中输出带有子标题的报告

输入文件的格式是这样的:

有很多行。
我需要获取一个输出文件来重新排列带有如下标题的文件:

我的问题是因为输入文件中的区域没有排序。如何在标题“A 区公司”中添加第二个 A 区公司?我只能读取一次文件(我不能首先对区域 A 执行所有行,然后重新打开文件以再次读取)。而且我只能有 1 个输出文件。

0 投票
1 回答
620 浏览

cobol - 在 mac yosemite 10.10.2 上编译 COBOL 程序

当我运行我的 COBOL 代码时:

我收到一个错误:

(今天,)我以 root 身份安装了 GnuCOBOL

0 投票
2 回答
215 浏览

cobol - 输出错误

编写了我的程序,但我无法根据需要获得正确的输出下面是我的代码和我的输出输入。

我的程序程序是否有意义或者我应该修改它,这似乎是有道理的,但是在看了不同的书之后我不确定了。

我的输出如下,然后是它应该是什么。

应该:

0 投票
3 回答
1641 浏览

cobol - 接受“ESC-CODE FROM ESCAPE KEY”的问题

使用Microsoft COBOL 编译器 2.2 版,我的代码完全可以正常工作。

现在我正在使用具有 GNUCobol 版本 1.1.0 的 OpenCobol IDE 4.3.0,并且我被提示这几行

syntax error, unexpected "Literal", expecting LEADING or TRAILING

所以我通过添加VALUE关键字来修复它们:

但是一旦我这样做,我就会得到另一个提示

'ACCEPT .. FROM ESCAPE KEY' not implemented

在这条线上

ACCEPT ESC-CODE FROM ESCAPE KEY.

这可能是什么原因?什么可以解决这个问题?