2016-07-16 83 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

相关问题