[Cobol] DATA DIVISION.

78901234567890123456789012345678901234567890123456789012345678901234567890
 DATA               DISIVION.

 FILE               SECTION.

 FD SUNGJUK-F       LABEL RECORDS ARE STANDARD
                    BLOCK COMTAINS 100 RECORDS
                    RECORD COMTAINS 21 CHARCTER
                    RECORDING MODE IS F.

 01 SUNGJUK-R.
     05 IN-HAK  PIC  X(01).
     05 IN-BAN  PIC  X(01).
     05 IN-BUN  PIC  9(02).
     05 IN-NAME PIC  X(08).
     05 IN-KOR  PIC  9(03).
     05 IN-ENG  PIC  9(03).
     05 IN-MAT  PIC  9(03).

 WORKING-STORAGE    SECTION.
 77 WK-CNT      PIC  9(06) VALUE 0.
 77 END-OF-FILE PIC  X(03) VALUE SPACE.

 LINKAGE            SECTION.

FILE SECTION.? ENVIRONMENT DIVISION의 FILE-CONTROL절에서 선언한 입출력 파일과 레코드에 대하여 설명하는 부분

FD(File Description)? ENVIRONMENT DIVISION의 SELECT문에서 정의한 파일들에 대한 설명의 시작을 나타냄. FD 다음에는 파일이름을 기술 그리고 파일이름은 SELECT문에서 정의된 파일이름과 같아야 하며 갯수도 동일해야함.

LEVEL-NUMBER? 논리 레코드의 특성, 레벨 번호, 각 항목의 구조와 이름, 성격 및 크기를 정의 레벨넘버? 계층번호라고도 하며 사용할 수 있는 번호는 01 ~ 49, 66, 77, 88이며 일반적으로 01 ~ 49를 사용. 88은 조건변수와 관련된 조건이름을 부여시 사용. 77은 레코드에 속하지 않는 독립된 항목에 표시하며 WORKING-STORAGE SECTION이나 LINKAGE SECTION에서만 사용

WORKING-STORAGE SECTION.? 연산에 필요한 기억 장소나 출력에 필요한 기억 장소들을 정의

LINKAGE SECTION.? Sub-Program 작성시 Sub-Program의 DATA DIVISION에 기술하며 Main-Program에서 호출된 프로그램에 Parameter를 넘겨 주는데 사용(받는 Parameter와 보내는 Parameter를 기술)