COBOL 구조

COBOL 워드는 사용자 정의어, 시스템 이름, 또는 예약어를 이루는 문자열이다.

대부분의 사용자 정의 이름 (section 이름, paragraph 이름 및 레벨 번호 제외)에는 적어도 하나 이상의 영문자가 포함되어야 한다. 우선순위 번호와 레벨 번호 지정은 반드시 고유할 필요는 없다. COBOL 워드에서 사용되는 소문자는 대문자로 인식된다.

특수문자를 제외하고 COBOL 워드는 다음으로 이루어질 수 있다.

다음은 LENGTH, RANDOM, SUM을 제외한 모든 COBOL 워드의 규칙이다.

위와 달리 COBOL 워드 LENTGH, RANDOM, SUM에 대해서는 다음 규칙이 적용된다.

COBOL이 기본적으로 제공하는 워드 리스트의 하나로 Intrinsic Functions을 지정한다.

COBOL 소스 유닛에서 미리 정의, 예약되어 있어 사용자 정의어 혹은 시스템명으로 사용할 수 없는 문자열이다.

예약어는 다음과 같은 종류가 있다.

리터럴은 문자열을 구성하는 문자에 의해 또는 Figurative constant 사용에 따라 그 값이 정해지는 문자열이다.

다음은 각 리터럴의 사용법에 대한 설명이다.

숫자 리터럴은 0에서 9까지의 숫자, 부호(+ 또는 -) 및 소수점으로 구성되는 문자열이다. 리터럴이 소수점을 포함하지 않을 경우에는 해당 리터럴은 정수이다.

다음은 숫자 리터럴을 설정하는 데 적용되는 규칙이다.

숫자 리터럴의 값은 리터럴 내의 숫자로 구성된 리터럴로 사이즈는 사용자가 지정한 숫자의 자릿수이다. 숫자 리터럴은 고정소수점 및 부동소수점이 있다.

다음은 부동소수점 리터럴의 포맷 및 규칙에 대한 설명이다.

PICTURE 문자열은 다음의 규칙에 따라 사용한다.

주석은 컴퓨터 문자 셋 임의의 조합으로 생성된 문자열로 프로그램의 실행에 영향을 주지 않는다. 2bytes 문자는 같은 행에 입력되어야 하고 여러 라인의 주석도 가능하다. 주석에 대해서는 문법 체크는 하지 않는다.

주석은 다음과 같은 2가지 타입이 있다.

어떤 이름이 여러 계층에 있을 때 해당 계층의 상위 레벨의 이름을 하나 또는 복수 지정함으로써 유일한 참조를 할 수 있다. 여기서 지정하는 상위 레벨의 이름을 qualifier라 하며, 이 이름을 고유하게 하는 프로세스를 Qualification이라고 한다.

Data division에서 Qualification은 모두 레벨 번호 다음에 쓴 데이터명에 대해 이루어진다. 즉, Qualification에 의해 이름이 고유하게 되는 경우 또는 전혀 참조되지 않는 경우를 제외하고 같은 그룹에 2개의 같은 데이터 이름을 기술할 수 없다.

Qualification 사용 규칙이다.

다음은 EMPLOYEE-NO라는 필드를 포함한 레코드를 갖는 파일이 여러 개 있고, 그 중 한 개의 파일에만 MASTER-RECORD라는 이름의 레코드로 Qualification한 예이다.

다음의 내용을 주의해서 사용한다.

Subscripting은 subscriptor를 사용하여 테이블 아이템 개별 요소를 참조하는 방법이다.

subscriptor로 정수, 데이터명, 데이터명에 "+" 또는 "-" 연산자와 함께 기술된 산술식을 사용할 수 있다. 데이터명을 사용할 경우에는 숫자 기본 항목인 정수여야 한다. subscriptor 전체는 괄호로 구분한다. subscriptor로 사용하는 데이터에는 부호가 있을 수 있으나 반드시 양의 부호(+)여야 한다. subscriptor의 최솟값은 1이며 리스트나 테이블의 첫 번째 아이템을 가리킨다. subscriptor의 최댓값은 OCCURS clause에서 지정한 최댓값이다.

테이블 아이템을 식별하기 위한 subscriptor 조합은 대상이 되는 테이블 요소의 데이터명 뒤에 괄호로 감싸고 기술한다. 여러 개의 subscriptor를 지정할 때에는 데이터 구조 계층에 상위의 것부터 쓴다. 즉, 중첩된 테이블로 표현된 다차원 테이블에서 가장 바깥쪽 테이블이 major 테이블이 되며 가장 안쪽의 테이블이 minor 테이블로 간주될 경우에 subscriptor는 왼쪽부터 오른쪽, 즉 major, middle, minor 순으로 지정된다.

예를 들어 TABLE-THREE는 다음과 같이 정의되어 있다.

TABLE-THREE에 유효한 subscriptor를 사용한 참조는 다음과 같다.

다음은 Subscripting Format이다.

각 테이블 항목의 참조는 다음 경우를 제외하고 subscriptor를 지정해야 한다.

다음은 subscriptor에 따른 각 Subscripting의 사용에 대한 설명이다.

Reference modification은 데이터 항목의 왼쪽의 문자 위치(시작 행)와 그 데이터 항목의 길이(옵션)을 지정함으로써 데이터 항목을 정의하는 방법이다.

Reference modification은 data-name-1에 의해 참조된 데이터 항목의 부분집합 데이터 항목을 생성한다. 이 데이터 항목은 다음과 같은 방법으로 참조 대상의 데이터 항목에서 추출된다.

참조 대상 평가는 다음의 기준으로 적용된다.

다음 예제에서는 WHOLE-NAME에 의해 참조된 데이터 항목의 첫 10 문자를 FIRST-NAME에 참조된 데이터 항목으로 이동한다.

다음 예제는 WHOLE-NAME에 의해 참조된 데이터 항목 마지막 15 글자를 LAST-NAME에 참조된 데이터 항목으로 이동한다.

다음 예제는 TAB의 3번째 항목의 4번째와 5번째 문자를 SUFFIX라는 변수로 MOVE한다.

본 절에서는 Data division에서 이름을 참조하는 방법에 대해서 설명한다.

COBOL 프로그램의 데이터 항목을 참조하는 가장 기본적인 방법이다. 이는 qualifier, Subscripting 또는 Reference modification을 하지 않는 단순한 data-name-1을 의미한다. 단순한 데이터 참조는 단일 기본 항목 또는 그룹 항목을 참조할 수 있다. 단순한 데이터 항목은 다음 포맷으로 참조한다.

identifier는 데이터 항목을 참조하기 위해 문자열과 분리구를 나열한 조합을 말한다. 다음 포맷으로 데이터 항목을 참조한다.

다음의 사항에 주의해서 데이터 항목을 참조한다.

condition-name은 프로그램 내에서 유일하게 지정하거나 또는 Qualification, Subscripting을 통해 유일하게 참조되어야 한다. condition-name을 유일하게 하기위해 Qualification할 경우에는 관련된 조건변수를 첫 Qualifier로 사용할 수 있다.

Qualification할 경우에는 조건변수에 관련된 데이터 그룹 내에 정의된 데이터명이나 조건변수명 자체를 사용해서 조건명을 유일하게 한다. 조건변수를 참조하기 위해 인덱스나 Subscripting이 필요한 경우에는 해당 조건명을 참조할 때에도 같은 조합의 인덱스와 Subscripting을 사용한다.

프로그램에서 명시적으로 참조되는 paragraph 이름은 section 내에서 유일해야 한다.

Function Identifiers는 함수 평가의 결과로써 생성되는 데이터 항목을 참조하기 위한 이름이다. 이 이름은 문자열과 분리구를 정해진 형식에 맞게 조합하여 사용한다.

Function ID는 임의의 statement에서 receiving 오퍼랜드로 사용될 수 있으나 다음의 경우는 주의한다.

다음과 같은 경우 A는 RANDOM 함수의 인수로 간주된다.

다음은 A를 MAX 함수의 인수 설정하는 예이다.

또는

또는

Function ID를 사용한 참조 일반 규칙은 다음과 같다.

COBOL 프로그램 요소는 다음과 같은 종류의 명시적인 지정과 암묵적인 지정이 가능하다.