先生と生徒の会話形式で理解しよう

生徒

「先生、COBOLで小数点を使いたいんですが、どうやって書けばいいですか？」

先生

「COBOLでは、小数点は特別な書き方で指定します。まずは小数点の位置を示す‘V’という記号を使うんです。」

生徒

「‘V’って何ですか？普通の小数点じゃないんですか？」

先生

「‘V’は実際の小数点ではなく、数字の中に小数点があることを示すための記号です。実際に表示されるわけではありません。」

生徒

「なるほど！あと、符号付きのデータ型もあるって聞いたのですが、どういう意味ですか？」

先生

「符号付きは、数字がプラスかマイナスかを表せるという意味です。‘S’という記号を使って示します。」

生徒

「じゃあ、‘S’と‘V’を組み合わせて使うこともできるんですか？」

先生

「そうです。符号付きで小数点を含む数字を扱いたいときに組み合わせて使います。具体的に見ていきましょう！」

1. COBOLでの小数点の扱いとは？

COBOLでは、数字の中に小数点を入れる場合、実際の小数点「.」ではなく、V（バーチャルポイント）という記号を使います。これは「数字のここに小数点がある」とプログラムに教えるための特別な記号で、画面や帳票に小数点がそのまま表示されるわけではありません。

例えば、PIC 9(3)V99という書き方は、「3桁の整数部分と2桁の小数部分」を表しています。数字で言うと「123.45」のような形ですね。

ポイントは「Vはあくまで小数点の位置を示すためのものであって、実際の小数点ではない」ということです。

2. 符号付きデータ型（S）の意味と使い方

COBOLの数字には、プラスやマイナスの符号（サイン）を持てるものがあります。符号を持つ数字は符号付き（Signed）と呼ばれます。符号付きデータ型は数字が正の数か負の数かを判別できるので、計算や比較を正確に行いたい時に重要です。

符号付きデータ型は、PIC S9(n)のように、Sを付けて表します。ここで、nは数字の桁数です。

例えば、PIC S9(4)なら、4桁の符号付き整数で、「+1234」や「-5678」のような数字を扱えます。

符号があるかないかはこのSの有無で決まります。Sが無いと符号なし（非符号）で、負の数は扱えません。

3. 小数点付きの符号付きデータ型の書き方

小数点の位置を示すVと符号付きのSは一緒に使うことができます。これで、符号付きの小数を扱うことが可能です。

例えば、PIC S9(3)V99は「符号付きで、小数点以下2桁の数字」を表しています。これは、+123.45や-678.90のような数字を表せるということです。

ここでのポイントは、小数点はあくまで仮想的に位置を示しているだけで、プログラム内部では整数として扱われていることです。

4. 実際のCOBOLコード例で理解しよう

では、符号付き小数のデータ型を使った簡単なサンプルコードを見てみましょう。


       IDENTIFICATION DIVISION.
       PROGRAM-ID. SAMPLE.

```
   DATA DIVISION.
   WORKING-STORAGE SECTION.
   01  PRICE           PIC S9(3)V99 VALUE 12345.
   01  DISCOUNT        PIC S9(2)V99 VALUE -2500.

   PROCEDURE DIVISION.
       DISPLAY "価格: " PRICE
       DISPLAY "割引: " DISCOUNT
       STOP RUN.
```

この例では、PRICEは123.45（12345を小数点2桁分動かしている）を表し、DISCOUNTは-25.00を表します。符号付きなので、割引がマイナスであることも示せます。