*******************************************************************************
*
*	UVNLS.H: BASIC include file for NLS (UNIVERSE.INCLUDE)
*
*	Module	%M%	Version	%I% 	Date	%H%
*
*	(c) Copyright 1998 Ardent Software Inc. - All Rights Reserved
*	This is unpublished proprietary source code of Ardent Software Inc.
*	The copyright notice above does not evidence any actual or intended
*	publication of such source code.
*
*******************************************************************************
*
*	Maintenance log - insert most recent change descriptions at top
*
*	Date.... GTAR# WHO Description.........................................
*	10/14/98 23801 SAP Change copyrights. 
*	08/07/97 21136 DTM Added token for SYSTEM(107)
*	5/25/95  15858 LDG Added tokens for SYSTEM(100 - 106)
*	4/26/95  16433 LDG Added token for the lowest 'other' mark char.
*	1/31/95  15858 LDG Module created for National Language Support.
*
*******************************************************************************
*
* Decimal values of the Unicode codepoints used to represent the uniVerse
* internal mark characters when viewed in a "wide" character external
* character set (that is, 16-bit Unicode).

EQU UNI$IM TO 63743       ;* 0xF8FF (Item Mark)
EQU UNI$FM TO 63742       ;* 0xF8FE (Field/Attribute Mark)
EQU UNI$AM TO 63742       ;* ...synonym
EQU UNI$VM TO 63741       ;* 0xF8FD (Value Mark)
EQU UNI$SM TO 63740       ;* 0xF8FC (Subvalue Mark)
EQU UNI$SVM TO 63740      ;* ...synonym
EQU UNI$TM TO 63739       ;* 0xF8FB (Text Mark)
                          ;* ...next 2 reserved
EQU UNI$SYSDEL TO 63736   ;* 0xF8F8 (lowest of the 8 mark characters)
EQU UNI$SQLNULL TO 63735  ;* 0xF8F7 (SQL Null)

* Tokens for SYSTEM() function calls related to NLS:

EQU NLS$ON TO 100         ;* 1 if uV/NLS is installed and NLS mode is turned on
                          ;* else 0. In all other cases this call will return 0,
                          ;* and so will all other SYSTEM() calls defined below.
EQU NLS$LOCALES TO 101    ;* 1 if NLS Locales/Conventions are supported, else 0.
EQU NLS$MESSAGES TO 102   ;* 1 if NLS External Messages are supported, else 0.
EQU NLS$TERMMAP TO 103    ;* Terminal mapname assigned to current terminal 
                          ;* print channel.
EQU NLS$AUXMAP TO 104     ;* Aux printer mapname assigned to current terminal 
                          ;* print channel.
EQU NLS$CONFIG TO 105     ;* Field-mark separated dynamic array containing the 
                          ;* in-memory Values of the uvconfig tunables related 
                          ;* to NLS maps. 
* The fields for SYSTEM(NLS$CONFIG) are as defined below - for a description
* of each field, see comments in the uvconfig file in uvhome relating to
* the tunable parameters with the same names:
   EQU NLS$MODE TO 1
   EQU NLS$READELSE TO 2
   EQU NLS$WRITEELSE TO 3
   EQU NLS$DEFFILEMAP TO 4
   EQU NLS$DEFDIRMAP TO 5
   EQU NLS$NEWFILEMAP TO 6
   EQU NLS$NEWDIRMAP TO 7
   EQU NLS$DEFPTRMAP TO 8
   EQU NLS$DEFTERMMAP TO 9
   EQU NLS$DEFDEVMAP TO 10
   EQU NLS$DEFGCIMAP TO 11
   EQU NLS$DEFICIMAP TO 12
   EQU NLS$DEFSEQMAP TO 13
   EQU NLS$OSMAP TO 14
EQU NLS$SEQMAP TO 106     ;* Current name of the map used for sequential I/O 
                          ;* (NLSDEFSEQMAP unless overriden by SET.SEQ.MAP).
EQU NLS$GCIMAP TO 107	  ;* Current name of the map used for GCI