LOCALE OF

The LOCALE OF special register returns the equivalent of a locale mnemonic-name associated with the specified data item.

If the data item does not have a locale associated with it, the keyword COBOL is returned. The LOCALE OF special register cannot be modified, and can only be specified in the PROCEDURE DIVISION where a locale mnemonic-name is allowed.

A date-time data item can be used in expressions using the LOCALE OF special register.