変数と画像

COBOL では、使用されるすべての変数は DATA DIVISION 内で宣言する必要があります。具体的には、プログラム ロジックに使用されるメモリ内の一時変数は、WORKING-STORAGE SECTION 内に存在します。

レベル番号

COBOL 変数宣言では、レベル番号を使用してデータを階層的に構造化し、編成します。

• 01: メイン変数またはグループ項目 (最上位) を定義します。
• 05、10、15: レベル 01 グループ項目内で下位フィールドを定義します。
• 77: これ以上細分化できなかった、歴史的に示された独立した基本変数。

現在の実践では、独立した基本変数を宣言するためにレベル 01 が一般的に使用されています。

PICTURE (または PIC) 条項

PICTURE (PIC と省略) 句は、データのタイプと変数の文字長を指定します。 3 つの基本的な形式文字は次のとおりです。

1. X (英数字): 文字、数字、特殊文字を含めることができます。
   • PIC X(10) は、ちょうど 10 文字の文字列を宣言します。
2. 9 (数値): 数字のみを含めることができます。
   • PIC 9(3) は、3 桁の整数 (999 まで) を宣言します。
3. V (暗黙的小数点): 小数部の開始位置を表すために 10 進数で使用されます (小数点は物理的に保存されません)。
   • PIC 9(3)V99 は、3 桁の整数と小数点以下 2 桁の数値を宣言します。

VALUE 句

宣言時に変数に初期値を割り当てるには、VALUE 句を使用します。

01 WS-PROJECT-NAME PIC X(15) VALUE "ELEARNER".
01 WS-USER-AGE     PIC 9(3)  VALUE 25.

すべての変数定義はピリオド . で終わる必要があります。

自分で試してみてください