cobol
데이터 분할

소개

데이터 부문의 섹션

COBOL의 섹션은 자신이 속한 부서에 따라 필수 또는 선택적 일 수 있습니다.

DATA DIVISION.
FILE SECTION.
FD SAMPLE-FILE
01 FILE-NAME PIC X(20).
WORKING-STORAGE SECTION.
01 WS-STUDENT PIC A(10).
01 WS-ID PIC 9(5).
LOCAL-STORAGE SECTION.
01 LS-CLASS PIC 9(3).
LINKAGE SECTION.
01 LS-ID PIC 9(5).

위의 예에서 01은 레벨 번호입니다.

레벨 번호

레벨 번호는 레코드의 데이터 레벨을 지정하는 데 사용됩니다. 기본 항목과 그룹 항목을 구별하는 데 사용됩니다. 기본 항목을 그룹화하여 그룹 항목을 만들 수 있습니다.

• 01 : 레코드 설명 항목. 그룹 레벨 번호는 항상 01입니다.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME               PIC X(25).   ---> ELEMENTARY ITEM 
01 WS-SURNAME            PIC X(25).   ---> ELEMENTARY ITEM    
01 WS-ADDRESS.                        ---> GROUP ITEM   
   05 WS-HOUSE-NUMBER    PIC 9(3).    ---> ELEMENTARY ITEM
   05 WS-STREET          PIC X(15).   ---> ELEMENTARY ITEM 

• 02 ~ 49 : 초등부
• 66 : 항목 이름 바꾸기
• 77 : 세분 ​​할 수없는 항목.
• 88 : 레벨 88은 COBOL 프로그램의 가독성을 개선하고 IF 테스트를 향상시키는 데 사용되는 특수 레벨 번호입니다. 레벨 88은 다른 변수 아래의 레벨과 비슷하지만 보이지 않습니다. PICTURE가 없지만 값이 있습니다. 레벨 88은 항상 다른 변수와 연관되며 해당 변수의 조건 이름입니다.

 01 YES-NO PIC X.
 88 ANSWER-IS-YES VALUE "Y".

다음 조건은 YES-NO가 "Y"와 같은지 여부를 테스트합니다.

 IF YES-NO = "Y"
 IF ANSWER-IS-YES

영숫자 또는 숫자 변수에는 레벨 88 조건 이름을 사용할 수 있습니다.

그림 절

PICTURE CLAUSE는 변수에 대한 두 가지를 정의합니다. 변수의 크기 (메모리에 값으로 사용 된 바이트 수)와 변수에 저장할 수있는 데이터의 유형입니다.