home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 1: Amiga
/
FrozenFish-Apr94.iso
/
bbs
/
alib
/
d1xx
/
d143
/
rim.lha
/
Rim
/
RimSrcAmi.Arc
/
CDCDBS.BLK
< prev
next >
Wrap
Text File
|
1988-01-05
|
914b
|
24 lines
C
C *** / C D C D B S / ***
C
C CURRENT DATABASE PERMANENT FILE DATA - CDC CYBER (BOEING)
C
COMMON /CDCDBS/DBDATA(5,10),NUMOPN
INTEGER DBDATA
INTEGER NUMOPN
C
C VARIABLE DEFINITIONS:
C DBDATA(1,J) -- DATABASE NAMES IN H FORMAT (6HDBNAME)
C DBDATA(2,J) -- DATABASE PERMANENT FILE NAMES IN H FORMAT
C DBDATA(3,J) -- PERMANENT FILE USER NUMBERS IN H FORMAT
C DBDATA(4,J) -- PERMANENT FILE PASSWORDS IN H FORMAT
C DBDATA(5,J) -- DATABASE MODIFICATION INDICATORS
C 0 = USER CONTROLLED FILE HANDLING
C 1 = INDIRECT ACCESS
C 2 = DIRECT ACCESS (READ ONLY)
C 3 = DIRECT ACCESS (WRITE)
C 4 = "DEFINE" DATABASE
C <0 = DATABASE HAS BEEN MODIFIED (IE -1)
C NUMOPN - NUMBER OF DATABASES IN DBDATA
C