Question

所以我正在为我的工作学习COBOL。这是我的第一个程序，我已经卡住了我的程序的目的是接受名称和日期并显示它。代码是这样的

IDENTIFICATION DIVISION.
PROGRAM-ID. PROG.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 NAME     PIC X(6)
PROCEDURE DIVISION.
DISPLAY 'Enter name(6 char max)'.
ACCEPT NAME.
DISPLAY 'Name is',NAME.
DISPLAY 'Date is', DATE.
STOP RUN.

我正在使用此编译器http://www.tutorialspoint.com/compile_cobol_online.php并收到此错误 sh-4.3 $ cobc -x -free * .cobc -o main
main.cobc：6：错误：语法错误，意外程序，期待EXTERNAL或GLOBAL

有什么想法吗？

Answer 1

除了一行之外的每一行都有句号（错误之前的行）

另外，我会将您回到您自己引用的网站：http://www.tutorialspoint.com/cobol/cobol_program_structure.htm

Answer 2

这是编译代码：

。（点）在X（6）之后错过了，压痕也很重要。

IDENTIFICATION DIVISION.
PROGRAM-ID. PROG.
DATA DIVISION.
    WORKING-STORAGE SECTION.
    77 NAME     PIC X(6).
PROCEDURE DIVISION.
    DISPLAY 'Enter name(6 char max)'.
    ACCEPT NAME.
    DISPLAY 'Name is ', NAME.
    DISPLAY 'Date is ', FUNCTION CURRENT-DATE.
STOP RUN.

COBOL程序出错

2 个答案: