2016-07-16 88 views
-1

cobol中的語法有問題。我使用Ubuntu的4.2.0-16,通用開放式COBOL包,和我有錯誤:

~/cobol$ cobc -free -x -o cal cal.cbl 
cal.cbl:6: Error: syntax error, unexpected $undefined, expecting "end of file" 

我cal.cbl文件:

IDENTIFICATION DIVISION. 
PROGRAM-ID. cal. 
ENVIRONMENT DIVISION. 

DATA DIVISION. 
?? OPTION PIC 9 VALUE ZERO. 
?? NUM1 PIC 9(5)V9(2) VALUE ZERO. 
?? NUM2 PIC 9(5)V9(2) VALUE ZERO. 
?? RESULT PIC 9(10)V9(2) VALUE ZERO. 

PROCEDURE DIVISION. 
ACCEPT OPTION. 

DISPLAY "INSERT FIRST OPTION". 
ACCEPT NUM1. 
DISPLAY "INSERT SECOND OPTION". 
ACCEPT NUM2. 

STOP RUN. 

我在新cobolt,我知道關於列的一些事情,那就是爲什麼我使用-free標誌來編譯,但是這個錯誤對我來說沒有意義。

爲何出現此錯誤時,請幫助:)

+1

是不是真的?選項 ??;這當然是無效的。還應該有一個工作存儲部分? –

回答

4

??是沒有有效的COBOL字和無級號(這是需要在第6行)。 GnuCOBOL 2.X好得多在許多方面,包括用戶信息:

cal.cob: 6: Error: Invalid symbol: ? - Skipping word 
cal.cob: 6: Error: PROCEDURE DIVISION header missing 
cal.cob: 6: Error: syntax error, unexpected Identifier 
cal.cob: 7: Error: Invalid symbol: ? - Skipping word 
cal.cob: 7: Error: syntax error, unexpected Identifier 
cal.cob: 8: Error: Invalid symbol: ? - Skipping word 
cal.cob: 8: Error: syntax error, unexpected Identifier 
cal.cob: 9: Error: Invalid symbol: ? - Skipping word 
cal.cob: 9: Error: syntax error, unexpected Identifier 
cal.cob: 11: Error: syntax error, unexpected PROCEDURE 
cal.cob: 12: Error: 'OPTION' is not defined 
cal.cob: 15: Error: 'NUM1' is not defined 
cal.cob: 17: Error: 'NUM2' is not defined 

變化??0177,你沒有錯誤了。插入WORKING-STORAGE SECTIONLOCAL-STORAGE SECTIONDATA DIVISION和您的程序編譯好。

獲取有關COBOL的更多信息,請致電Programmer's Guide

+0

感謝西蒙,它的工作:)現在我將使用GnuCOBOLT。 – Karol

相關問題