LANGLEVEL

Rocket ® COBOL システムとの上位互換をサポートする機能です。固有の予約語を部分的に有効にし、特定の機能の動作を変更して、指定したバージョンとの互換性を持たせます。

構文：

>>-.---.-.--------LANGLEVEL-"integer"-.---><
   +-/-+ |                            |
         +.----.--LANGLEVEL-----------+
          +-NO-+

パラメーター：

integer
互換性を持たせる Rocket ® COBOL のレベルを指定します。
1
  • Professional COBOL V1.0、V1.1、および V1.2
  • Level II COBOL V2.5 および V2.6
  • Level II COBOL/ET V1.1
2
  • VS COBOL Workbench V1.2
  • VS COBOL V1.2
3
  • VS COBOL Workbench V1.3
  • VS COBOL Workbench V2.0
  • Professional COBOL V2.0
  • VS COBOL V1.5
4
  • COBOL/2 V1.1
  • Professional COBOL/2
  • COBOL/2 Workbench V2.2
  • Microsoft COBOL V3.0
5
  • COBOL/2 V1.2
  • COBOL/2 Workbench V2.3
6
  • COBOL/2 V2.4
  • COBOL/2 Workbench V2.4
  • Microsoft COBOL V4.0
7
  • COBOL/2 V2.5
  • COBOL/2 Workbench V2.5
  • Microsoft COBOL V4.5
8
  • COBOL V3.0
  • COBOL Workbench V3.0
  • Microsoft COBOL V5.0
9
  • COBOL V3.1
  • COBOL Workbench V3.1
10
  • 古いリリースの構文が有効な COBOL V3.1
  • 古いリリースの構文が有効な COBOL Workbench V3.1
  • COBOL V3.2 および V3.3
  • COBOL Workbench V3.2 および V3.3
  • Object COBOL V3.2 および V3.3
  • COBOL V4.0 (UNIX)
11
  • Visual Object COBOL 1.0
  • 古いリリースの構文が有効な COBOL V3.4 および V4.0
  • 古いリリースの構文が有効な COBOL Workbench V3.4 および V4.0
12
  • Mainframe Express 3.0 および 3.1、Net Express 4.0、5.0、および 5.1、Server Express 4.0、5.0、および 5.1
13
  • Net Express 5.1 WS2
14
  • Net Express 6.0
15
  • Net Express 6.0 SP1、Net Express 5.1 WS5
  • Visual COBOL R1
16
  • Visual COBOL R3 以降、Enterprise Developer 2.0
17
  • Visual COBOL および Enterprise Developer 2.2 Update 1 以降
18
  • Visual COBOL および Enterprise Developer 2.2 Update 2 以降
19
  • Visual COBOL および Enterprise Developer 3.0 以降
20
  • Visual COBOL および Enterprise Developer 5.0 以降
21
  • Visual COBOL および Enterprise Developer 6.0 以降
22
  • Visual COBOL および Enterprise Developer 8.0 以降
23
  • Visual COBOL および Enterprise Developer 10.0 以降

プロパティ：

デフォルト： LANGLEVEL"24"
段階： 構文チェック
$SET： 最初の行

依存関係：

LANGLEVEL"7" を指定すると直ちに DBCS"2" が設定されます。

integer > 7 の場合は、DBCS"3" および DBSPACE が直ちに設定されます。

説明：

この COBOL システムの旧バージョンでの BLANK LINE 指定の動作は、OLDBLANKLINE 指令を使用すると実装できます。この COBOL システムの旧バージョンでの NEXT SENTENCE 指定の動作は、OLDNEXTSENTENCE 指令を使用すると実装できます。

LANGLEVEL"10" 以下を指定した場合、旧バージョンとの互換性を確保するため、データ名は 30 文字までで切り捨てられます。

LANGLEVEL"11" には、V3.2 および V3.3 の MF-OO 指令によって有効化されたすべての予約語が含まれます。

LANGLEVEL"12" には、LANGLEVEL"11" のすべての予約語と、Mainframe Express 3.0、Net Express 4.0、および Server Express 4.0 で追加された予約語が含まれます。

下位互換性を保つため、以前の指令名 (MF または MFLEVEL) も指定できます。ただし、指令のリストには新しい指令名が表示されます。