インテル® Fortran コンパイラー 14.0 ユーザー・リファレンス・ガイド
NLS Function: Returns the codepage number for the system (Window) codepage or the console codepage.
result = NLSGetEnvironmentCodepage (flags)
The result type is INTEGER(4). The result is zero if successful; otherwise, it returns one of the following error codes:
NLS$ErrorInvalidFlags - flags has an illegal value.
NLS$ErrorNoConsole - There is no console associated with the given application. So, operations with the console codepage are not possible.