DBCS

日本語、中国語、および韓国語などの表意文字言語で使用する場合に、コンパイラで 2 バイト文字セット (DBCS) の文字が認識されるようにします。

構文：

>>-.---.-.-------DBCS-"integer"-.---------><
   A-/-+ +.----.-DBCS-----------+
          +-NO-+

integer

次のいずれかになります。

1: このコンパイラの古いバージョンと同じ動作になります。
2: システムアプリケーションアーキテクチャ (SAA) DBCS をすべてサポートします。この場合、DBSPACE が設定されます。
3: IBM COBOL/370 と同じように、DBCS をサポートします。この場合、PIC N、PIC G、および delimiter N で指定される DBCS リテラルも使用できます。

SAA、VSC2"2"、VSC2"3"、または MF"7" を指定するとすぐに DBCS"2" に設定されます。

COBOL370、または MF"integer" (integer > 7 の場合) を指定するとすぐに DBCS"3" に設定されます。