The LOCALE clause is used to define locale mnemonic names and their IBM® i equivalent
locale object name and library.

LOCALE Clause - Format
>>-LOCALE--+-locale-name-1-----------------------------+-------->
'-literal-4--+----------------------------+-'
'-+----+--LIBRARY--literal-5-'
'-IN-'
>--+----+--mnemonic-name-5-------------------------------------><
'-IS-'
- locale-name-1
- Specifies a system-specific name that refers to a locale object. For ILE COBOL,
the only supported locale-name-1 is POSIX.
- literal-4
- Literal-4 must be a locale object name. It must be a nonnumeric literal
with a maximum length of 10 characters.
- literal-5
- Literal-5 is used to specify the name of the operating system library
in which the locale object is to be found. It must be an nonnumeric literal
with a maximum length of 10 characters. The special value *LIBL (search using
the job's library list) may be specified. If the LIBRARY phrase is omitted
, the job's library list is used to search for the locale object.
- mnemonic-name-5
- Mnemonic-name-5 provides a reference to the locale identified by locale-name-1
or the values specified for literal-4 and literal-5. It can only be used in
a FORMAT clause, PICTURE clause, Format 8 of the SET statement, or in the
argument list of some intrinsic functions.