CONSTANT

構文：

>>-.---.-CONSTANT-const-name-.-(numeric-lit)--.-><
   +-/-+                     +-"alphanum-lit"-+

パラメーター：

`const-name`	データ名。定数名を指定します。
`numeric-lit`	数字定数。定数の値を指定します。0 または、正の整数を指定します。
`alphanum-lit`	英数字定数。定数の値を指定します。

プロパティ：

デフォルト：	未設定
段階：	構文チェック
$SET：	任意

説明：

この指令を使用すると、定数 const-name はプログラム内でレベル 78 に定義されているものとして扱われます。定数の値はかっこ、または引用符で囲んで指定します。かっこが使用された場合は、定数は数字カテゴリの値です。引用符が使用された場合は、英数字カテゴリの値です。const-name および numeric-lit または alphanum-lit の組み合わせをかっこで囲むこともできます。

この機能を使って複数の表意定数を宣言する場合は、CONSTANT 指令を繰り返し指定します。

      $set CONSTANT BBC "British Broadcasting Corporation"
      $set CONSTANT EXP_DATE (2024)
       display BBC.
       display EXP_DATE.