116 lines
4.5 KiB
Plaintext
116 lines
4.5 KiB
Plaintext
|
********************************************************************************
|
||
|
*
|
||
|
* 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
|