CBL_NLS_INFO

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 language information
2	Set national language 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 language. With function-code = 2 (set information) the change made applies only to the program that made the call.