Warning, /include/zebra/rzcycle.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/03/06 10:46:54 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_ZEBRA_RZCYCLE_INC
0010 #define CERNLIB_ZEBRA_RZCYCLE_INC
0011 *
0012 *
0013 * rzcycle.inc
0014 *
0015 *
0016 * Pointers to cycle content
0017 *
0018 * KLCYCL : length of cycle block (4,7)
0019 * KPPCYC : pointer to previous cycle
0020 * KFRCYC : first record number
0021 * KSRCYC : secord record number
0022 * KFLCYC : creation date/time and other stuff
0023 * KORCYC : offset in first record to data
0024 * KCNCYC : cycle number
0025 * KNWCYC : number of words in d/s
0026 * KKYCYC : key number to which this cycle belongs (only for version 1)
0027 * KVSCYC : version of RZ cycles structure (0, 1)
0028 *
0029 INTEGER KLCYCL, KPPCYC, KFRCYC, KSRCYC, KFLCYC, KORCYC,
0030 + KCNCYC, KNWCYC, KKYCYC, KVSCYC
0031 COMMON/RZCYCLE/KLCYCL, KPPCYC, KFRCYC, KSRCYC, KFLCYC, KORCYC,
0032 + KCNCYC, KNWCYC, KKYCYC, KVSCYC
0033
0034 #endif
