COBOLのCOMP型の使い方は？

COBOL言語では、COMP型が整数変数を定義するために使用されます。

使えるCOMPタイプは3種類あります。

1. 2 バイトの整数の変数を定義するために使用されます。
2. 10進小数点付きの2バイトの整数変数を定義します。
3. 4バイトの整数型変数を定義します。

以下は、COMP型を使用する例です。

01 MY-VARIABLE COMP PIC S9(4).

上記のコードでは、MY-VARIABLE という名前の変数が定義され、COMP タイプを使用し、-9999 ～ 9999 の整数値を保持できます。

01 MY-VARIABLE COMP-3 PIC S9(5)V9(2).

上記のコードは、MY-VARIABLEという名前の変数を定義します。これはCOMP-3 型を使用して、小数点を 2 桁含む-9999.99 から 9999.99 までの整数値を格納できます。

01 MY-VARIABLE COMP-4 PIC S9(9).

MY-VARIABLE という名前の変数を定義しています。COMP-4 型を使用して、-999999999 から 999999999 までの整数を格納できます。

COMP-3型変数は格納時に圧縮され、格納領域を削減する点に注意してください。COMP型およびCOMP-4型変数はデータ格納に必要な量のバイトを使用します。