MINICERN/packlib/zebra/zebra/rzcycle.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1996/03/06 10:46:55  mclareni
   6 * Zebra
   7 *
   8 *
   9 #ifndef CERNLIB_ZEBRA_RZCYCLE_INC
  10 #define CERNLIB_ZEBRA_RZCYCLE_INC
  11 *
  12 *
  13 * rzcycle.inc
  14 *
  15 *
  16 *     Pointers to cycle content
  17 *
  18 *     KLCYCL : length of cycle block (4,7)
  19 *     KPPCYC : pointer to previous cycle
  20 *     KFRCYC : first record number
  21 *     KSRCYC : secord record number
  22 *     KFLCYC : creation date/time and other stuff
  23 *     KORCYC : offset in first record to data
  24 *     KCNCYC : cycle number
  25 *     KNWCYC : number of words in d/s
  26 *     KKYCYC : key number to which this cycle belongs (only for version 1)
  27 *     KVSCYC : version of RZ cycles structure (0, 1)
  28 *
  29       INTEGER        KLCYCL, KPPCYC, KFRCYC, KSRCYC, KFLCYC, KORCYC,
  30      +               KCNCYC, KNWCYC, KKYCYC, KVSCYC
  31       COMMON/RZCYCLE/KLCYCL, KPPCYC, KFRCYC, KSRCYC, KFLCYC, KORCYC,
  32      +               KCNCYC, KNWCYC, KKYCYC, KVSCYC
  33
  34 #endif