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.