home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d1xx / d143 / rim.lha / Rim / RimSrcAmi.Arc / ATTBLE.BLK next >
Text File  |  1988-01-05  |  961b  |  30 lines
  1. C
  2. C  *** / A T T B L E / ***
  3. C
  4. C  BUFFER TO HOLD ONE PAGE FROM THE ATTRIBUTE RELATION
  5. C
  6.       COMMON /ATTBLE/ ATTBUF(1024),
  7.      X CANAME,CRNAME,CRSTRT,CROW,LROW,NAROW,ATTMOD,APBUF
  8.       INTEGER ATTBUF
  9.       REAL*8 CANAME
  10.       REAL*8 CRNAME
  11.       INTEGER CRSTRT
  12.       INTEGER CROW
  13.       INTEGER ATTMOD
  14.       INTEGER APBUF
  15.       INTEGER ATTBLE(9,113)
  16.       EQUIVALENCE (ATTBUF(2),ATTBLE(1,1))
  17. C
  18. C  VARIABLE DEFINITIONS:
  19. C         ATTBUF--BUFFER FOR ONE PAGE FROM THE ATTRIBUTE RELATION
  20. C         ATTBLE--EQUIVALENCE ARRAY FOR EASIER USE OF ATTBUF
  21. C         CANAME--CURRENT ATTRIBUTE NAME
  22. C         CRNAME--CURRENT RELATION NAME
  23. C         CRSTRT--CURRENT START IN ATTBUF FOR CRNAME
  24. C         CROW----NEXT ROW IN ATTBLE TO GET
  25. C         LROW----LAST ROW SENT IN TUPLEA
  26. C         NAROW---NEXT AVAILABLE ROW FOR ADDING A TUPLE
  27. C         ATTMOD--MODIFICATION FLAG - O MEANS NO, 1 MEANS YES
  28. C         APBUF---ATTRIBUTES PER ATTBUF PAGE
  29. C
  30.