Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 7/13/2023
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

NLSGetLocale

NLS Subroutine: Returns the current language, country, or codepage. This routine is only available for Windows.

Module

USE IFNLS

CALL NLSGetLocale ([language] [,country] [,codepage])

language

(Output; optional) Character*(*). Is the current language.

country

(Output; optional) Character*(*). Is the current country.

codepage

(Output; optional) INTEGER(4). Is the current codepage.

NLSGetLocale returns a valid codepage in codepage.

Example

 USE IFNLS
 CHARACTER(50) cntry, lang
 INTEGER(4)    code
 CALL NLSGetLocale (lang, cntry, code)    ! get all three
 CALL NLSGetLocale (CODEPAGE = code)      ! get the codepage
 CALL NLSGetLocale (COUNTRY = cntry, CODEPAGE =code) ! get country
                                                     ! and codepage

See Also