ISO2002

ISO2002 COBOL 標準規格で予約されている語を予約語として扱い、特定の機能の動作を変更して ISO2002 COBOL 標準規格の機能と互換性を持たせます。

構文:

>>-.----.-.-ISO2002.-------.-.----><
   |    | |        +"<opt>"+ |
   +-/--+ +-NOISO2002--------+

パラメーター:

<opt>
<opt> は、次のいずれかになります。
1
これは、Net Express および Server Express との下位互換性を目的としています。これには、次の動作が含まれます。
  • ANS85 PERFORM VARYING の動作。
  • プログラム名はデータ名と同じにすることができます。
  • COMMUNICATION SECTION は認識されません。
  • INHERITANCE 句のクラス名は、REPOSITORY 段落で指定された ID である必要があります。
  • OCCURS ASCENDING/DESCENDING KEY を OBJECT REFERENCE にすることはできません。
  • SOURCE-COMPUTER/OBJECT-COMPUTER は FACTORY または OBJECT 段落では使用できません。
  • CURSOR IS、CURRENCY SIGN、CRT 句は、外側のレベルの SPECIAL-NAMES 段落でのみ使用できます。
  • ALPHABET、およびその他の SPECIAL-NAMES 句は、FACTORY または OBJECT 段落でのみ使用できます。
  • CURRENCY SIGN SYMBOL literal-1 を E または U にすることはできません。
  • ファイル状態に関する ISO2002 の追加の値。
  • CLASS-ID WITH DATA の動作。
  • OBJECT-STORAGE は .cls/.ins ファイルに書き込まれません。
  • USAGE OBJECT REFERENCE は、EXTERNAL、REDEFINES にすることも再定義することもできず、OCCURS DEPENDING ON を指定することもできません。
  • クラス名は小文字に変換されません。
  • CYCLE、PARAGRAPH、ONLY、および RELATION は、追加のコンテキスト依存の語です。
2
注: このオプションは、パラメーターなしで ISO2002 を指定することと同等です。
ISO2002"1" のすべての動作、および Visual COBOL のリリース以降に追加された次の追加の動作が含まれます。
  • PROCEDURE DIVISION/CALL RETURNING の動作。
  • USAGE POINTER は NULL に初期化されます。
  • OCCURS の VALUE 句の拡張。

プロパティ:

デフォルト: NOISO2002
段階: 構文チェック
$SET: 最初の行

説明:

ISO2002 標準規格と最大限に互換性を持たせるには、DIALECT"ISO2002" 指令も設定する必要があります。