********************************************************************************
*
*	uniVerse include file for BASIC FILEINFO() function
*
*	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.
*
*******************************************************************************
*
*	Maintenence log - insert most recent change descriptions at top
*
*	Date.... GTAR# WHO Description.........................................
*	04/23/99 24742 GMH Add special FINFO$HDRLAYOUT and access keywords
*	10/14/98 23801 SAP Change copyrights. 
*	12/20/94 15741 EAP Added FINFO$NLSMAP
*	02/01/94 12297 JSW Initial implementation.
*
*******************************************************************************

EQUATE FINFO$IS.FILEVAR       TO 0   ;* Anything
EQUATE FINFO$VOCNAME          TO 1   ;* PI only
EQUATE FINFO$PATHNAME         TO 2   ;* ALL
EQUATE FINFO$TYPE             TO 3   ;* ALL
EQUATE FINFO$HASHALG          TO 4   ;* LH, SH
EQUATE FINFO$MODULUS          TO 5   ;* LH, SH
EQUATE FINFO$MINMODULUS       TO 6   ;* LH
EQUATE FINFO$GROUPSIZE        TO 7   ;* LH
EQUATE FINFO$LARGERECORDSIZE  TO 8   ;* LH
EQUATE FINFO$MERGELOAD        TO 9   ;* LH
EQUATE FINFO$SPLITLOAD        TO 10  ;* LH
EQUATE FINFO$CURRENTLOAD      TO 11  ;* LH (percentage)
EQUATE FINFO$NODENAME         TO 12  ;* ALL. Null if local, else nodename
EQUATE FINFO$IS.AKFILE        TO 13  ;* LH
EQUATE FINFO$CURRENTLINE      TO 14  ;* SEQ
EQUATE FINFO$PARTNUM          TO 15  ;* Distributed, Multivolume
EQUATE FINFO$STATUS           TO 16  ;* Distributed, Multivolume
EQUATE FINFO$RECOVERYTYPE     TO 17  ;* ALL
EQUATE FINFO$RECOVERYID       TO 18  ;* LH
EQUATE FINFO$IS.FIXED.MODULUS TO 19  ;* LH
EQUATE FINFO$NLSMAP           TO 20  ;* ALL
EQUATE FINFO$MAXOPTION        TO 20  ;* Maximum key
EQUATE FINFO$HDRLAYOUT        to 99  ;* Special key to retrieve hdr layout

** These EQUATES are used with the FILEINFO function when a user
** requests the FINFO$HDRLAYOUT key.  The values here are 1 greater
** then their 'C' counterpart (in filehdr.h), since these are used as 
** field indexes into a dynamic array.  Do not change these without
** changing those in filehdr.h

EQUATE FH$REVISION            TO 1
EQUATE FH$MODULUS             TO 2
EQUATE FH$SEPARATION          TO 3
EQUATE FH$FILETYPE            TO 4
EQUATE FH$INDEXFLAGS          TO 5
EQUATE FH$FREECHAIN           TO 6
EQUATE FH$T30INFOALL          TO 7
EQUATE FH$T30TYPE             TO 8
EQUATE FH$T30SPLIT            TO 9
EQUATE FH$T30MERGE            TO 10
EQUATE FH$T30CURMOD           TO 11
EQUATE FH$T30BASEMOD          TO 12
EQUATE FH$T30LARGEREC         TO 13
EQUATE FH$T30CURRLOAD         TO 14
EQUATE FH$T30SELECTCNT        TO 15
EQUATE FH$T30NEXTSPLIT        TO 16
EQUATE FH$SICADATA            TO 17
EQUATE FH$PARTBLOCK           TO 18

EQUATE FH$STATALL             TO 30
EQUATE FH$STAT01              TO 31
EQUATE FH$STAT02              TO 32
EQUATE FH$STAT03              TO 33
EQUATE FH$STAT04              TO 34
EQUATE FH$STAT05              TO 35
EQUATE FH$STAT06              TO 36
EQUATE FH$STAT07              TO 37
EQUATE FH$STAT08              TO 38
EQUATE FH$STAT09              TO 39
EQUATE FH$STAT10              TO 40
EQUATE FH$STAT11              TO 41
EQUATE FH$STAT12              TO 42
EQUATE FH$STAT13              TO 43
EQUATE FH$STAT14              TO 44
EQUATE FH$STAT15              TO 45
EQUATE FH$STAT16              TO 46
EQUATE FH$STAT17              TO 47
EQUATE FH$STAT18              TO 48
EQUATE FH$NLSSORTCUM          TO 49
EQUATE FH$NLSSORTMAP          TO 50

EQUATE FH$TLFILNUM            TO 61
EQUATE FH$pTLFILNUM           TO 62
EQUATE FH$TLFLAGS             TO 63
EQUATE FH$CHKPOINT            TO 64
EQUATE FH$TXWARMLSN           TO 65
EQUATE FH$NLSMAPCSUM          TO 66
EQUATE FH$NLSMAPNAME          TO 67

EQUATE FH$CLEARTIME           TO 81
EQUATE FH$BAKTIME             TO 82
EQUATE FH$BAKFLGS             TO 83
EQUATE FH$BAKCNT              TO 84
EQUATE FH$INDEXPATH           TO 86
EQUATE FH$MKDBSTAMP           TO 88
EQUATE FH$UVREADONLY          TO 89
EQUATE FH$UVSCHEMA            TO 90
EQUATE FH$IDXCOLCNT           TO 91
EQUATE FH$IDXCOLMAP           TO 92
EQUATE FH$UDRFLAGS            TO 93
EQUATE FH$UDRUNIQUE           TO 94
EQUATE FH$RESIZEPATH          TO 95