Data Division

level-number는 1에서 49 사이에 숫자나 66, 77, 88들 중에 하나를 지정할 수 있다.

01과 77은 Area A에서 시작되어야 하며, data-name 또는 FILLER 혹은 그 외의 Data description과 공백 문자로 구분되어야 한다.

1에서 9까지 한 자리 level-number를 기술했을 경우는 level-number 01에서 09까지 지정한 것과 동일하게 처리한다.

data description entry는 첫 번째 entry와 동일한 컬럼에서 시작하거나 level-number에 따라 들여쓰기가 가능하다. 들여쓰기는 level-number와는 관계가 없으며 단지 코드의 가독성을 높이기 위한 것이다. 들여쓰기는 컬럼 수는 Area B의 크기만 넘지 않으면 제한은 없다.

data-name-1은 프로그램 내에서 데이터 항목을 구분하는 식별자로써 data-name-1은 반드시 level-number 바로 다음에 기술해야 한다.

level-66과 level-88 항목은 반드시 data-name-1을 기술해야 한다.

FILLER는 memory alignment 등을 맞추기 위해 기술되는데 FILLER로 지정된 항목은 프로그램 내에서 참조할 수 없다.

FILLER keyword는 옵션으로 FILLER가 지정되어 있는 경우는 FILLER 바로 전에 level-number가 지정되어야 한다.

조건변수에 FILLER를 지정할 수는 있지만 condition-name에는 FILLER를 지정할 수 없다.

MOVE CORRESPONDING statement이나 ADD CORRESPONDING statement 또는 SUBTRACT CORESPONDING statement을 처리할 때는 FILLER 항목은 무시된다. 또한 INITIALIZE statement에서도 FILLER 항목은 무시된다.

integer-2는 테이블의 크기를 지정하는 값으로 0보다 큰 양의 정수 값을 지정해야 한다.

ASCENDING 또는 DESCENDING 지정에 따라 데이터들이 올림차순 또는 내림차순으로 정렬된다. 데이터의 정렬 순서는 data-name-2의 값에 따라 결정된다.

다음은 data-name-2 항목에 대한 설명이다.

ASCENDING KEY 또는 DESCENDING KEY 구를 지정하는 경우는 다음과 같은 규칙을 따라 한다.

INDEXED BY phrase는 해당 테이블에 사용될 인덱스를 지정한다.

picture character-string에 A symbol만 지정되어 있는 항목이다. 항목의 값으로는 Latin alphabetic과 공백 문자, fugurative constant의 symbolic-characters 만을 포함해야 한다.

Alphabetic 항목은 USAGE DISPLAY가 명시적으로 지정하거나 암묵적으로 지정된 것으로 간주한다.

picture character-string에 9, P, V, S symbol 들로만 포함되어 있는 항목이다.

USAGE clause에 Binary, Packed decimal(internal decimal), Zoned decimal(External decimal)인 numeric 타입의 항목이다.

Numeric 타입 항목은 다음의 표와 같다.

Internal decimal과 Zoned decimal 타입의 경우 지정할 수 있는 자릿수는 최대 31자리까지 가능하다.

Value로 지정할 수 있는 항목은 numeric literal이거나 figurative constant ZERO이다.

다음은 PICTURE에 따른 Valid range에 대한 예시이다.

picture character-string에 지정한 Symbol에 의해 특정 위치에 특정 문자가 삽입되거나 특정 문자가 치환이 일어나는 항목이다.

picture character-string에 B P V Z 9 0 / , . + - CR DB * cs symbol이 지정된다.

다음과 같은 규칙이 적용되면 numeric-edited 항목이 된다.

최대 31자리 숫자 지정이 가능하다.

PICTURE의 최대 string갯수는 249를 넘어선 안된다.

USAGE DISPLAY를 지정했을 경우, VALUE clause에는 alphanumeric literal 이나 figurative constant를 지정해야 한다.

picture character-string이 X만 지정되어 있거나 X A 9가 혼용되어 지정되어 있는 항목이다. 항목의 값은 컴퓨터의 문자 셋에서 지정 가능한 모든 문자를 포함할 수 있다. item은 모든문자가 symbol X로 이루어져 있다고 간주한다.

Alphanumeric 항목은 USAGE DISPLAY가 명시적으로 지정하거나 암묵적으로 지정된 것으로 간주한다.

VALUE clause에 alphanumeric 문자를 지정하거나 ZERO, SPACE, QUOTE, HIGH-VALUE, LOW-VALUE, symbolic-character, ALL alphanemeric-literal 같은 Figurative constant를 지정할 수 있다.

picture character-string에 A X 9 B 0 / 이 지정된다.

picture string은 최소 하나의 A 또는 X가 포함되어야 하며, 최소하나의 B나 0이나 /가 포함되어야 한다.

USAGE DISPLAY가 명시적으로 지정하거나 암묵적으로 지정된 것으로 간주한다.

VALUE clause에 Alphanumeric 문자를 지정하거나 ZERO, SPACE, QUOTE, HIGH-VALUE, LOW-VALUE, symbolic-character, ALL alphanemeric-literal 등과 같은 Figurative constant를 지정할 수 있다.

picture character-string에 G symbol이 지정되어 있는 항목으로 한 개의 G에 해당 하는 문자 한개는 2bytes의 저장공간을 차지한다.

Picture paragraph에 G symbol이 지정된 경우는 USAGE DISPLAY-1를 명시적으로 지정하거나 암묵적으로 지정된 것으로 간주한다.

VALUE clause에는 DBCS literal이나 figurative constant SPACE 또는 figurative constant ALL DBCS-literal을 지정해야 한다.

external floating-point는 부호, 가수, E, 부호, 지수 형식으로 표시하는 부동소수점 표기법이다.

USAGE DISPLAY를 지정하면 display floating-point 데이터 항목을 의미한다.

V를 제외한 모든 문자는 실제 저장공간을 차지한다.

OCCURS, REDEFINES, RENAME clause을 함께 지정할 수 있다.

BLANK WHEN ZERO, JUSTIFIED, VALUE clause은 함께 지정할 수 없다.

SIGN, SYNCHRONIZED clause을 지정한 경우는 해당 clause은 무시한다.

데이터는 assumed decimal point를 기준으로 정렬되며 필요에 따라서는 truncation이나 0으로 padding이 발생한다.

Assumed decimal point가 지정되어 있지 않은 경우는 데이터 가장 오른쪽에 assumed decimal point가 지정되어 있다고 가정하고 데이터 정렬을 한다.

소수점을 기준으로 데이터를 정렬하며, 필요에 따라서는 왼쪽 끝이나 오른쪽에서 truncation이나 0으로 padding이 발생한다.

필드의 가장 왼쪽에 소수점이 있다고 가정하여, 이 소수점 다음에 숫자들이 왼쪽 정렬된다.

데이터는 왼쪽 정렬되며, 정렬된 데이터에 따라 지수는 조정된다.

데이터는 왼쪽으로 정렬된다. 필요에 따라서는 truncation이나, 공백 padding이 발생한다.

JUSTIFIED clause가 지정되어 있는 경우, JUSTIFIED규칙에 따라 데이터 정렬이 발생한다.

Simple insertion

Special insertion

Fixed insertion

Floating insertion

Zero suppression과 치환 편집은 0이 아닌 숫자 왼쪽에 있는 0을 공백이나 *으로 편집되는 것으로 picture character-string에 Z * + - cs symbol을 지정한다. Z * + - cs symbol은 서로 혼용해서 지정할 수 없다.

소수점 왼쪽에 일부 혹은 전부가 Zero suppression symbol로 지정되어 있는 경우, 가장 왼쪽의 0이 아닌 숫자 바로 전까지 Zero suppression 편집이 일어난다.

소수점 왼쪽, 오른쪽 모두가 Zero suppression symbol로 지정이 되어 있고, 데이터 항목의 값이 0인 경우 지정한 Zero suppression symbol에 편집이 발생한다.

Zero suppression과 치환 편집은 다음의 규칙을 따른다.

다음은 Zero suppression 예제이다(b는 공백을 의미한다).

data-name-2에 의해 지정되 데이터 공간의 또 다른 data description으로 data-name-1을 redefining 항목 또는 REDEFINES subject라고 한다.

data-name-1뿐만 아니라 data-name-1에 종속된 항목은 VALUE clause를 설정하면 안된다.

data-name-1이나 FILLER가 명시되지 않았을 경우, REDEFINES clause는 level-number의 바로 뒤에 명시해야 한다.

data-name-2를 redefined 항목 또는 REDEFINES object라고 한다.

data-name-2는 REDEFINES clause을 지정할 수 있다. 그러나 OCCURS clause은 지정할 수 없다. 단, data-name-2의 상위 항목에는 OCCURS가 지정될 수 있다.

새롭게 그룹핑된 항목들을 식별하기 위한 식별자 이다.

level-66 항목은 level-01, level-77, level-88 또 다른 level-66 항목은 재정의할 수 없다. 또, data-name-2, data-name-3에는 OCCURS clause을 지정해서는 안된다.

data-name-1은 01-level entry로 qualified 될 수 있고, 다른 entry의 qualifier로는 사용될 수 없다.

data-name-2와 data-name-3는 각각 새롭게 그룹핑할 첫 번째 데이터 항목과 마지막 데이터 항목의 식별자로써 elementary 데이터 항목이나 alphanumeric 그룹 항목을 지정할 수 있다.

두 data-name은 같은 항목을 나타내선 안되고, qualified 될 수 있다.

OCCURS clause가 지정되어 있거나, 상위 아이템에 OCCURS가 있는 data-name-2, data-name-3는 지정할 수 없다. 또한 data-name-2와 data-name-3 사이에 있는 항목은 OCCURS DEPENDING clause가 지정되어서는 안된다.

THROUGH의 약어이다.

BINARY USAGE는 binary 데이터 항목을 표현한다. 음수의 표현은 동일한 값을 가지는 양수의 2의 보수법에 의해 표현된다.

USAGE clause에 지정한 BINARY, COMPUTATIONAL, COMP, COMPTATIONAL-4, COMP-4는 BINARY 데이터를 표현하는 동일한 방법이다.

BINARY 데이터는 big-endian으로써 부호있는 BINARY 데이터에 대해서 부호는 leftmost bit에 포함되어 있다.

BINARY 데이터의 메모리 저장공간은 다음 같이 PICTURE clause 지정에 따라 결정된다.

internal decimal 항목으로 1byte 안에 두 개의 숫자가 저장되며, 마지막 byte의 4bits 내에는 부호가 저장된다.

PACKED-DECIAML, Computational-3, COMP-3는 모두 PACKED-DECIMAL 데이터를 표현하는 동일한 방법이다.

single precision을 가지는 internal floating-point 항목으로 4 bytes 저장공간을 차지한다.

COMPUTATIONAL-1, COMP-1은 모두 internal floating-point 데이터를 표현하는 방법이다.

double precision을 가지는 internal floating-pointitem으로 8 bytes 저장공간을 차지한다.

COMPUTATIONAL-2, COMP-2는 모두 long floating-point 데이터를 표현하는 방법이다.

USAGE COMP-5로 지정된 항목은 binary 데이터와 동일하게 저장공간에 표현된다.

다음은 picture phrase의 지정에 따른 저장공간 및 저장할 수 있는 최댓값과 최솟값을 정리한 표이다.

COMP-5 type은 주로 COBOL 프로그램이 아닌 프로그램과 데이터를 주고받을 때 사용되며, byte-order는 프로그램이 실행되는 컴퓨터의 byte-order와 동일하다.

COMP-5 데이터 항목으로 scaling factor를 표현할 수 있다. 예를 들어 PICTURE S99V99 COMP-5인 데이터가 있다면, 범위는 -327.68 ~ +327.67이다.

External decimal 항목은 zoned decimal 항목이라고도 하며, 한 개의 숫자가 메모리 1byte를 차지하고 있다. 각 byte의 상위 4bits는 zone bits로 low-order byte의 zone bits는 해당 숫자의 부호를 나타낸다.각 byte의 하위 4bits는 숫자를 저장하고 있다.

External decimal 항목은 최대 31자리 숫자를 표현할 수 있다.

External decimal의 PICTURE character string으로는 9, S, V, P 만 사용할 수 있다.

SPACE, ZERO와 같은 Figurative constant는 해당 Figurative constant가 의미하는 문자 또는 숫자로 치환된다.

numeric 항목에 지정하는 VALUE 값은 numeric이어야 한다. 만약, working-storage이나 local-storage의 항목에 VALUE 값을 지정하는 경우, 지정한 VALUE 값은 numeric move 규칙에 맞게 alignment 된다. 또한 0이 아닌 숫자의 truncation이 발생하는 VALUE 값은 지정해서는 안된다. 만약, VALUE 값에 부호가 있다면 picture character-string에 부호 기호를 지정해야 한다.

VALUE 값으로 지정하는 숫자는 PICTURE clause에 지정한 범위 안에 있는 숫자를 지정해야 한다.

USAGE DISPLAY가 지정된 alphabetic, alphanumeric, alphanumeric-edited, numeric-edited 항목에 VALUE 값을 지정하는 경우, 지정 가능한 VALUE 값은 alphanumeric 리터럴이나 Figurative constant이며, 지정한 문자의 크기는 항목의 크기를 초과해서는 안된다.

alphanumeric 그룹에 VALUE 값을 지정하는 경우 VALUE 값은 alphanumeric 리터럴이나 Figurative constant이여야 하며, 지정한 문자의 크기는 그룹 항목의 크기를 초과해서는 안된다.

DBCS 항목에 VALUE 값을 지정하는 경우는 DBCS 리터럴, SPACE, ALL DBCS 리터럴이여야 한다. 또한, 지정한 문자의 크기는 데이터 항목의 크기를 초과해서는 안된다.

internal floating-point인 COMP-1, COMP-2 항목에 VALUE 값을 지정하는 경우, VALUE 값은 floating-point 리터럴이나 figurative constant ZERO 또는 소수점 없는 0 또는 소수점이 있는 0을 지정해야 한다.