home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware 1 2 the Maxx
/
sw_1.zip
/
sw_1
/
DBASE
/
AMSF20.ZIP
/
AMSCTL.INC
next >
Wrap
Text File
|
1992-01-06
|
2KB
|
40 lines
C
C AMS KERNEL CONTROL INFORMATION
C
C CONSTANTS
C NVERSN : AMS VERSION NUMBER
C NDATA : NO. OF DATA BASES ALLOWED (5)
C MAVAIL : MEMORY AVAILABLE (DEFAULT 30000)
C INTL : NO. OF BYTES OR WORDS PER INTEGER (MACHINE DEPENDENT)
C LENG : RECORD LENGTH OF DIRECT FILE (DISK DEPENDENT)
C LENDIR : DIRECTORY LENGTH PER MATRIX (16)
C MCK : MEMORY CHECK TOGGLE
C NDT : NO. OF INTEGER WORDS PER DATA TYPE FOR INTEGER, REAL,
C AND COMPLEX (MACHINE DEPENDENT)
C NDB : DATABASE I/O CHANNEL (LOGICAL UNIT NUMBER)
C LIMIT : PRINTING LINES/PAGE
C NTM : LUN FOR TERMINAL SCREEN (MACHINE DEPENDENT)
C NTR : LUN FOR KEYBOARD (MACHINE DEPENDENT)
C NTF : LUN FOR TEXT FILE (MACHINE DEPENDENT)
C
C VARIABLES
C IA : MEMORY BANK (A LARGE INTEGER ARRAY)
C NARY : NO. OF ARRAYS IN DIRECTORY
C OPENED : DATABASE OPENED/CLOSED INDICATOR
C NREC : NEXT AVAILABLE DIRECT FILE RECORD
C NOFF : NEXT AVAILABLE RECORD OFFSET
C IDIR : DIRECTORY ENTRY LOCATION
C ISORT : INDICATOR FOR DIRECTORY SORTED
C NXTLOC : NEXT FREE MEMORY LOCATION
C KCTM : DATABASE CREATION DATE/TIME
C KATM : DATABASE LASTEST ACCESS DATE/TIME
C IBUFF : DATABASE FILE I/O BUFFER, IBUFF(LENG)
C DBNAME : DATABASE FILE NAME
C RTN : AMS ROUTINE NAME CURRENTLY EXECUTED FOR ERROR REPORT
C
COMMON /AMSCTL/ NDATA,NDB(5),NARY(5),NOPEN(5),NREC(5),NOFF(5),
* KATM(6,5),KCTM(6,5),NDT(0:2),LENG,INTL,LENDIR,MCK,
* IDIR,NXTLOC,ISORT,LIMIT,NTM,NTR,NTF,IBUFF(128),
* NVERSN
COMMON /AMSTXT/ DBNAME(5),RTN
CHARACTER DBNAME*60,RTN*6