CODEPAGE

CODEPAGE affects the coded character set identifier (CCSID) for an EBCDIC code page for processing compile-time and runtime COBOL operations that are sensitive to character encoding.

Syntax

Read syntax diagramSkip visual syntax diagramCODEPAGE=*ccsid
Default
CODEPAGE=1140
ccsid
Specifies a valid coded character set identifier (CCSID) integer that identifies an EBCDIC code page.

The default CCSID 1140 is the equivalent of CCSID 37 (EBCDIC Latin-1, USA), but additionally includes the euro symbol.

Recommendation: To avoid unnecessary conversions and associated performance overhead on systems that use both COBOL and Db2®, use the same CODEPAGE compiler option setting as in your Db2 subsystem parameters and application programming defaults (specify in DSNHDECP).

Note: If you specify the TEST option, you must set the CODEPAGE option to the CCSID that is used for the COBOL source program. In particular, programs that use Japanese characters in DBCS literals or DBCS user-defined words must be compiled with the CODEPAGE option set to a Japanese codepage CCSID.

For further details, see CODEPAGE in the Enterprise COBOL Programming Guide.