Makes the Compiler accept characters of the Double-byte Character Set (DBCS) for use in ideographic languages such as Japanese, Chinese and Korean.
Syntax:
>>-.---.-.-------DBCS-"integer"-.---------><
A-/-+ +.----.-DBCS-----------+
+-NO-+
Parameters:
-
integer
- One of:
- 1
- Behavior as in earlier versions of this Compiler.
- 2
- Provides full System Application Architecture (SAA) DBCS support. This directive sets DBSPACE.
- 3
- Includes DBCS support as in IBM COBOL/370. This includes the use of PIC N, PIC G, and DBCS literals specified with "delimiter N".
Properties:
Default:
|
NODBCS
|
Phase:
|
Syntax check
|
$SET:
|
Initial
|
Dependencies:
Set to DBCS"2" immediately by SAA, VSC2"2", VSC2"3" or MF"7".
Set to DBCS"3" immediately by COBOL370 or MF"integer" where
integer > 7.