The code set module must be compiled using DIALECT"MF", and the NOCANCEL directive; otherwise, you may experience RTS114 abends when the module is first called when running through an enterprise server region.
The sample program CSnnnn.cbl, which is supplied in the src\codeset sub-directory of your installation directory, contains the necessary sections, declarations and directives.
Windows:
md mylang cd mylang
UNIX:
mkdir mylang cd mylang
Windows:
set mfcodeset=nnnn
UNIX:
export MFCODESET=nnnn
where nnnn refers to an MFCODESET value (listed in the Supported country codes topic) whose character set translation tables are most similar to the customized versions you want to create.
codecomp /p mapfile.a2e mapfile.e2a
The files mapfile.a2e and mapfile.e2a are created in the current directory.
codecomp mapfile.a2e mapfile.e2a
A codeset.cpy file is created in the current directory.
Windows:
copy "%ProgramFiles(x86)%\Micro Focus\Enterprise Developer\src\codeset\csnnnn.cbl" csnnnn.cbl
UNIX:
cp $COBDIR/src/codeset/csnnnn.cbl csnnnn.cbl
where %ProgramFiles(x86)%\Micro Focus\Enterprise Developer is your installation directory and nnnn is a number between 2000 through 9999 (excluding 9122) that you use to refer to your customized code set module.
Windows:
cbllink -d csnnnn.cbl
UNIX:
cob -z csnnnn.cbl