오류 : 구문 오류, 예기치 않은 "식별자", "파일 끝"예상

Question

이것은 내 COBOL 클래스에서 수행하는 샘플 프로그램이며 컴파일 할 때 얻는 오류 코드에 대한 몇 가지 질문이있었습니다 명령 행 아래를 봐주세요. COBOL 아래에 내 터미널 코드가 있습니다. "예기치 않은 식별자"를 수정하려면 어떻게해야합니까?

 IDENTIFICATION DIVISION. 
    PROGRAM-ID.  SAMPLE135. 
    AUTHOR.   ME. 

    ENVIRONMENT DIVISION. 


    DATA DIVISION. 
    77 FIELD-A PIC 9(2). 
    77 FIELD-B PIC 9(2). 
    77 FIELD-C PIC 9(3) VALUE ZERO. 
    77 FIELD-D PIC 9(3) VALUE ZERO. 

    WORKING-STORAGE SECTION. 

    PROCEDURE DIVISION. 
    FIRST-PARAGRAPH. 
     MOVE ZEROS TO FIELD-A FIELD-B. 
     PERFORM SECOND-PARAGRAPH. 
     PERFORM THIRD-PARAGRAPH. 
     PERFORM SECOND-PARAGRAPH. 
     PERFORM WRITE-DATA. 
     STOP RUN.  

    SECOND-PARAGRAPH. 
     ADD 10 TO FIELD-A. 
     ADD 20 TO FIELD-B. 

    THIRD-PARAGRAPH. 
     MULTIPLY FIELD-A BY FIELD-B GIVING FIELD-C. 
     DIVIDE FIELD-A INTO FIELD-B GIVING FIELD-D. 

    WRITE-DATA. 
     DISPLAY FIELD-A. 
     DISPLAY FIELD-B. 
     DISPLAY FIELD-C. 
     DISPLAY FIELD-D. 

    END PROGRAM. 



Sample2.cbl:9: Error: syntax error, unexpected "Identifier", expecting "end of file" 

Answer 1

'77'데이터 항목의 위치가 잘못되어 들여 쓰여 있습니다. 또한 필드 이름이 영역 B (자유 형식을 사용하지 않는 한)에서 시작하는지 확인하십시오. 코볼 코드에서 그것은 일반적으로 만 사용하는 것이 좋습니다 간주됩니다

DATA DIVISION. 

WORKING-STORAGE SECTION. 
    77 FIELD-A   PIC 9(2). 
    77 FIELD-B   PIC 9(2). 
    77 FIELD-C   PIC 9(3) VALUE ZERO. 
    77 FIELD-D   PIC 9(3) VALUE ZERO. 

---

시도 '.' 그들은 절대적으로 (절차 전에) 필요 마지막으로

---

SECOND-PARAGRAPH. 
    ADD 10    TO FIELD-A 
    ADD 20    TO FIELD-B 

    . 
THIRD-PARAGRAPH. 

즉 때 그것은 내가

Answer 2

노동 기억 부 헤더는 반드시 가지고 문 PIC 및 도 표준적인 들여 쓰기 입니다 77 레벨 정의 이전에 왔습니다.

 DATA DIVISION. 
     WORKING-STORAGE SECTION. 
     77 FIELD-A PIC 9(2). 
     77 FIELD-B PIC 9(2). 
     77 FIELD-C PIC 9(3) VALUE ZERO. 
     77 FIELD-D PIC 9(3) VALUE ZERO. 

끝 마커에 프로그램 이름도 누락되었습니다.

 END PROGRAM SAMPLE135.