2011-09-16 8 views

答えて

9

PIC X(15)実質的に任意のタイプのデータの15文字を表し、 数字、文字またはその他の記号(印刷可能かどうか)を表すことができます。

PIC ----,---,---.99 の値を+999999999.99〜-999999999.99の範囲で保持できる数値編集データ項目を表します。この項目には、負の値の場合は、先頭のマイナス記号が表示されます。そうでない場合は、先頭に数字が表示されます。表示されている の数字は、その正面に少なくとも1桁の数字がある場合は、指定された位置にカンマ区切り文字が付きます。ここで

は、特定の番号が表示される方法のいくつかのサンプルです:このような

999999999.99 displays as 999,999,999.99 
1234.56  displays as  1,234.56 
0   displays as   .00 
-1234567.12 displays as -1,234,567.12 
-3   displays as   -3.00 

変数は表示のみです。それらとの演算については とは思わないでください!与えられた以下のデータ宣言:

01 DISP-NBR PIC ----,---,---.99. 
01 NBR  PIC S9(9)V99. 

MOVE操作が...

ADD 1 TO NBR 

が完全に有効ですが、しかし、両方とも有効

MOVE 1234.56 TO NBR 
MOVE 1234.56 TO DISP-NBR 

ある

ADD 1 TO DISP-NBR 

ウィルあなたにコンパイルエラーを与えます。 DISP-NBRには数値データが含まれていますが、ディスプレイには 形式しかありません。純粋な数値のデータ項目を使用して数値計算を行い、MOVEを入力すると、「pretty printing」のフィールド が表示されます。

は、COBOLで使用される可能性のある要素のすべてとその内容を記述しています。

2

最初の数字は任意の英数字の数字を持つことができます。

2番目の数字は、数値の書式設定に使用されます。ダッシュとは、マイナスの数字がある場合、数字の横に(左に)ダッシュが表示されることを意味します。ダッシュは1つだけ表示されます。数字が正の場合は、ダッシュごとにスペースが表示されます。

関連する問題