opencobol

0熱度

1回答

正如標題所示，我在獲取COBOL程序的所需輸出時遇到了一些困難。該程序從一個文件中獲取數據並以特定格式輸出，這是一項家庭作業。當我運行該程序時，它適用於名稱標題，學校標題標題和列標題。第一門課程正常工作，然後輸出開始切斷一個，並混淆了所有其他輸出。輸入文件示例 CMPS161 ALGORITHM DSGN/IMPLMNT I A 3.00 CMPS280 ALGORITHM DSGN/IMPLE

0熱度

1回答

COBOL COMPUTE來自文件的十進制值

嘗試理解計算。使用FSemesterTotal這是一個PIC 99V99像這樣計算獲得的學分的總和是否是正確的？ COMPUTE FSemesterTotal =獲得+獲得。我認爲在我的循環中應該有一個計數器來檢查我是否讀取了第一個獲得的值，以便我可以將其添加到第二個值，以確定如何在COBOL中完成此操作。目前我的輸入是這樣的， CMPS161 ALGORITHM DSGN/IMPLMNT I

1熱度

2回答

COBOL期待文件結尾

我在cygwin終端中使用OpenCOBOL來編譯該程序，該程序只應從輸入文本文件中讀取並將其打印到格式化的輸出文件中。當我嘗試編譯我得到這個錯誤： programonerjm.cbl:13: Error: syntax error, unexpected "SOURCE-COMPUTER", expecting "end of file" 我不能完全肯定我procedure division

0熱度

2回答

錯誤：語法錯誤，意想不到的「標識符」，期待「文件結尾」

這是一個示例程序，我爲我的COBOL類做了一些示例程序，並且遇到了一些關於當我試圖編譯時遇到的錯誤代碼的問題命令行。請看下面。 COBOL下面是我的終端代碼。我該如何解決「意想不到的標識符」？ IDENTIFICATION DIVISION. PROGRAM-ID. SAMPLE135. AUTHOR. ME. ENVIRONMENT DIVISION.

0熱度

1回答

如何選擇和顯示最新日期（openCobol）

Im Cobol的新功能。 Date的一列需要標識要顯示的最新日期。 2004年8月9日 2016年2月7日 24/04/1995 27/09/2016 它能夠識別27/09/2016作爲最新日期

1熱度

1回答

是否可以在cobol循環中顯示多個屏幕？

所以我想在OpenCobolIDE中製作一個程序，它使用COBOL中的SCREEN SECTION功能創建一個菜單，用戶可以選擇是否要輸入數據或顯示數據。此數據正在順序.txt文件中記錄。寫入過程正常，所以我不在這裏添加這部分代碼。問題在於閱讀過程。我希望程序在PERFORM循環中多次顯示DISPLAY-SCREEN，以顯示我的文件中的所有記錄，但這不起作用。我認爲通過從我的DISPLAY-SC

4熱度

2回答

從打包十進制字段中拆分數字

我在我的文件上有一個7位的打包十進制字段。如何定義可提取/分離這7位數字的數據項？例如我想在一個數據項中有前兩位數字，而在另一個數據項中有其他數字，所以我可以在以後處理它們。

1熱度

1回答

如何接受cobol中的數值使用屏幕部分

所以我試圖做一個簡單的程序cobol，使用屏幕部分，這將只計算2個數字的總和。我使用的編譯器是OpenCobolIDE。問題是我收到一個錯誤，說我的WS-N1變量不是數字值。下面是代碼： IDENTIFICATION DIVISION. PROGRAM-ID.PGM001. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SE

0熱度

1回答

COBOL程序將不會結束

我目前正在編寫一個COBOL程序，其中包含一個屏幕，用於檢查和顯示文件中的記錄。但是，當我嘗試輸入「F」或「Q」以外的命令時，程序會一直卡住。雖然它是假設與我試圖調用錯誤message.The錯誤消息，以顯示新的屏幕是「<>」 Identification Division. Program-ID. Lab10b. Environment Division. In

0熱度

1回答

cobol＆JCL刪除多餘的空格

我試圖接受來自jcl的輸入，例如'John Snow'並從我的cobol程序使用JUSTIFIED RIGHT VALUE SPACES運行它將字符串移動到右側，但是我需要刪除額外的空間使用我的cobol pgm。例如我的工作存儲是： 01 ALPHA-ITEM PIC X(50). 01 MOVE-ITEM REDEFINES ALPHA-ITEM PIC X(50). 0