SIGN

符号を含んだ数字 DISPLAY データ項目に対して、符号のデフォルトの規則を指定する。

構文：
>>-.---.--SIGN--"convention"---------------><
   +-/-+
パラメーター：
規則

符号付きの場合、符号保存規則は以下のいずれかにする。

  • ASCII
  • MF (ASCII と同じ)
  • EBCDIC
  • IBM (EBCDIC と同じ)
  • acu
  • mbp
  • ncr
  • realia
  • vax

デフォルトの符号モードの場合は、以下のいずれかにする。

  • INCLUDED
  • TRAILING
  • SEPARATE
  • TRAILING-SEPARATE
  • LEADING
  • LEADING-SEPARATE

詳細については、以下の 説明を参照。

属性：
デフォルト： SIGN"ASCII" および SIGN"TRAILING"
段階： 構文チェック
$SET： 初期
依存性：

CHARSET"ASCII" により、SIGN"ASCII" に設定される。

CHARSET"EBCDIC" により、SIGN"EBCDIC" に設定される。

DIALECT"RM" により、SIGN"EBCDIC" および SIGN"TRAILING" に設定される。

説明：

規則のパラーメータのオプションには以下の意味がある。

ASCII、MF
Micro Focus の保存規則。
EBCDIC、IBM
IBM の保存規則。IBM COBOL、RM/COBOL-85、および X/Open COBOL 標準との互換性がある。

マネージ COBOL の場合、SIGN"EBCDIC" を HOST-NUMMOVE、HOST-NUMCOMPARE、または SIGN-FIXUP のいずれかと併用すると、無効な組み合わせの指令となり、コンパイル時に拒否される。ネイティブ COBOL の場合、この組み合わせは有効となる。

acu
ACUCOBOL-GT の保存規則。RM/COBOL (not RM/COBOL-85) および以前のバージョンの ACUCOBOL-GT によって生成されたデータとの互換性がある。
mbp
MBP COBOL の符号保存規則。
重要：USAGE DISPLAY の MBP COBOL の符号保存規則は、IBM COBOL および他の一部の COBOL で使用される符号保存規則と直接競合する。そのため、MBP フォーマットの符号付き USAGE DISPLAY 項目は、プログラムが mbp オプションを指定してコンパイルされた場合にのみ正しく解釈される。これは、コンパイル時に適合しない符号規則が指定された場合でも通常はランタイムが正しい値を抽出できる他の符号規則とは異なる。
制約：MBP COBOL には COMP-2 記憶域タイプがない。
ncr
このオプションにより、異なる数値フォーマットを使用できる。フォーマットは、EBCDIC または IBM オプションを使用する場合に使われるフォーマットと同じ。ただし、正の COMP-3 項目は x0C ではなく、x0B を正の符号値として使用する。 このオプションは、NCR COBOL との互換性がある。
realia
Realia の符号保存規則。S9(n) 変数の符号情報は Realia COBOL の規則を使用して保存され、その規則の 2 進 10 進変換は Realia コンパイラが実行する変換と同じ。
vax
このオプションでは、VAX COBOL と互換性のある数値符号フォーマットが作成される。これらのフォーマットは IBM フォーマットと同じであるが、符号なし COMP-3 フィールドは X"0F" ではなく X"0C" を符号位置に置く点が異なる。

SIGN 指令を繰り返し使用して、符号およびデフォルトの符号モードの符号保存規則を指定することもできる。

INCLUDED および TRAILING 符号モードはともに終了符号を示す。SEPARATE および TRAILING-SEPARATE 符号モードは後続分離符号を示す。LEADING 符号モードは先行符号を示す。LEADING-SEPARATE 符号モードは先行分離符号を示す。TRAILING-SEPARATE または LEADING-SEPARATE 内では、オプションでハイフンを使用できる。

デフォルトの符号モードは、特殊名段落内の NUMERIC SIGN 句またはデータ記述項内の SIGN 句によってオーバーライドできる。

他参照：

関連項目