COBOL 程序错误

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: 错误：语法错误，意外过程，需要外部或全局

有什么想法吗？

Answer 1

除一行外的每一行都有一个句点（错误之前的那一行）

另外，我会将您指向您自己的参考网站：http://www.tutorialspoint.com/cobol/cobol_program_structure.htm

Answer 2

编译代码如下：

.(dot) 在 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 程序错误

Error in COBOL program

cobol