CALL 文、CANCEL 文、ENTRY 文、および CHAIN 文に関連する識別子やリテラルと、PROGRAM-ID 句のプログラム名を、大文字のみまたは小文字のみにします。
構文:
>>-.---.-.-----FOLD-CALL-NAME--"case"-.----><
+-/-+ +---NOFOLD-CALL-NAME---------+
パラメーター:
- case
- UPPER または LOWER
プロパティ:
デフォルト: |
NOFOLD-CALL-NAME |
段階: |
構文チェック |
$SET: |
最初の行 |
説明:
ハイフンを使わずに指令名 FOLDCALLNAME を指定しても、コンパイラでは認識されます。
CALL 識別子 文で呼び出される名前は、この指令で指定された形式 (大文字か小文字のどちらか) になりますが、識別子 の内容自体は変更されません。
FOLD-CALL-NAME 指令は、ファイル名で大文字と小文字を区別しない環境から区別する環境に COBOL コードを転送する場合に有用です。
この指令を使用すると、コンパイラは ANSI'85 規格のプログラム間通信モジュールに従って CALL 文内のプログラム名の大文字と小文字を区別しません。
NOFOLD-CALL-NAME を指定すると、通常の COBOL 表記規則では、引用符で囲まない場合に、大文字のみのプログラム名が使用されます。これは、入れ子プログラムのルート プログラムにも当てはまります。引用符で囲んだ場合も含め、すべてのサブプログラム名は大文字のみになります(プログラム名を引用符で囲むのは Micro Focus 拡張です)。
プログラム名は、完全にリンクされている実行可能プログラムのエントリ ポイントとしてアクセスすることもできます。
.obj コードをコンパイルする場合は、CASE 指令を指定する必要があります。
FOLD-CALL-NAME は、SET procedure-pointer-name-1 TO ENTRY procedure-pointer-name-1 形式の SET 文には影響しません。