CBL_NLS_INFO

Gets/sets national locale information.
Restriction: National Locale Support is only supported for native COBOL code.

Syntax:

call "CBL_NLS_INFO" using     function-code
                              info-category
                              info-buffer
                    returning status-code

Parameters:

function-code
Call prototype (see Key): cblt-x1-compx.
Picture: pic x comp-x.
Contains one of the following:
1 Get national locale information
2 Set national locale information
info-category
Call prototype (see Key): cblt-x1-compx.
Picture: pic x comp-x.
info-buffer
Call prototype (see Key): pic x(n).
Picture: pic x(n).
status-code
See Library Routines - Key

On Entry:

With function-code = 1
info-category
Category of information to get from the NLS module:
1 Currency symbol
2 Thousands separator
3 Decimal separator
With function-code = 2
info-category
Category of information to set:
1 Currency symbol
2 Thousands separator
3 Decimal separator
info-buffer
Information to set (null-terminated). The thousands and decimal separators are each one character long. The currency symbol is up to 10 characters long.

On Exit:

With function-code = 1
info-category
Category of information to get from the NLS module:
1 Currency symbol
2 Thousands separator
3 Decimal separator
status code
Indicates whether the routine was successful:
0 Success
164 Invalid parameter specified
200 Internal error
With function-code = 2
info-category
Category of information to set:
1 Currency symbol
2 Thousands separator
3 Decimal separator
info-buffer
Information to set (null-terminated). The thousands and decimal separators are each one character long. The currency symbol is up to 10 characters long.
status code
Indicates whether the routine was successful:
0 Success
164 Invalid parameter specified
200 Internal error

Comments:

This routine enables you to both get and set information about the national locale. With function-code = 2 (set information) the change made applies only to the program that made the call.