home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 500-599 / ff594.lzh / AnalyRimSrc / AnaRimSrcDoc.Zoo / reltbl.blk < prev    next >
Text File  |  1991-09-30  |  727b  |  24 lines
  1. C
  2. C  *** / R E L T B L / ***
  3. C
  4. C  BUFFER TO HOLD ONE PAGE FROM THE RELTBL RELATION
  5. C
  6.       COMMON /RELTBL/ RELBUF(1024),
  7.      X CNAME,LRROW,NRROW,RELMOD,RPBUF
  8.       INTEGER RELBUF
  9.       REAL*8 CNAME
  10.       INTEGER RELMOD
  11.       INTEGER RPBUF
  12.       INTEGER RELTBL(14,73)
  13.       EQUIVALENCE (RELBUF(2),RELTBL(1,1))
  14. C
  15. C  VARIABLE DEFINITIONS:
  16. C         RELBUF--BUFFER FOR ONE PAGE FROM THE RELTBL RELATION
  17. C         RELTBL--EQUIVALENCE ARRAY FOR EASIER USE OF RELBUF
  18. C         CNAME---CURRENT RELATION NAME SPECIFIED IN LOCREL
  19. C         LRROW---LAST ROW SENT IN TUPLER
  20. C         NRROW---NEXT AVAILABLE ROW FOR ADDING A TUPLE
  21. C         RELMOD--MODIFICATION FLAG - O MEANS NO, 1 MEANS YES
  22. C         RPBUF---RELATIONS PER RELBUF PAGE
  23. C
  24.