*
* $Id: dzeditkeep.inc,v 1.1.1.1 1996/03/04 16:13:19 mclareni Exp $
*
* $Log: dzeditkeep.inc,v $
* Revision 1.1.1.1  1996/03/04 16:13:19  mclareni
* Dzdoc/Zebpack
*
*
*
* dzeditkeep.inc
*
C--   The number of words needed in the store
      PARAMETER (NWDOCQ = 400000)
      COMMON/MYCOMM/IDFENC(1),LQ(NWDOCQ)
      DIMENSION IQ(NWDOCQ-9)
      EQUIVALENCE (IQ(1),LQ(9))
 
      PARAMETER(NWKEY = 2,MAXKEY=2000)
      COMMON/DZDEDP/IWKID,ICONID,IWKTYP,ILOCNR,
     &    IDATCH,ITIMCH,IXDZDS,IMODEG,
     &    KEYS(NWKEY,MAXKEY),
     &    MARKUP(MAXKEY),
     &    INTWST,
     &    IWMETA, ITYMET, IERFIL,
     &    LUNOUT, LUNMET, LUNSGM, LUNLST,
     &    LUNCOM, LUNLAS, LUNRZ, LUNCAR, LUNGKS, LUNLIS, LUNSCR,
     &    LUNPOS, LUNPIC, LUNEXE,LUNSC1, LUNPLO, LUNFZF, LUNHTM
     &    IC1000, IOPWKF, ISGMOP, ILSTOP, ISCROP, IPOSTF,
     &    IRWRZF, IQUITF
 
      INTEGER LUPOUT, LUPMET, LUPSGM, LUPLST,
     &LUPCOM, LUPLAS, LUPRZ, LUPCAR, LUPGKS, LUPLIS, LUPSCR,
     &LUPPOS, LUPPIC, LUPEXE,LUPSC1, LUPPLO, LUPFZF, LUPHTM
 
      PARAMETER (LUPOUT=6, LUPMET=61, LUPSGM=62, LUPLST=63,
     &LUPCOM=64, LUPLAS=65, LUPRZ=32, LUPCAR=33, LUPGKS=68,
     &LUPLIS=69, LUPSCR=70,
     &LUPPOS=71, LUPPIC=72, LUPEXE=73,LUPSC1=74, LUPPLO=75,
     &LUPFZF=76, LUPHTM=77)
 
      CHARACTER*8  CHOPDZ, CHKEY, CHBSEL, CHDZED, CHKEYC
      CHARACTER*64 CHRZF, CHCARD, CHLIST,CHMETA,CHSGML,
     &             CHCOMP, CHSUBD, CHFZF, CHPOST, CTITLE,CHFZFI
      CHARACTER*4  CTT,CHIDBK,CHIDUP, CHBSBK, CHBSUP,
     &             ANYCHA, CTEMP,
     &             CHLOPT
 
      COMMON/DZDEDC/ CHKEY,CHBSEL,CHDZED,CHKEYC,
     &               CHRZF, CHCARD, CHLIST,CHMETA,CHSGML,
     &               CHCOMP, CHSUBD, CHFZF, CHPOST, CTITLE,
     &               CHOPDZ,CTT,CHIDBK,CHIDUP, CHBSBK, CHBSUP,
     &               ANYCHA, CTEMP,
     &               CHLOPT, CHFZFI
      LOGICAL LISTAC,LISTSG,LISTTO, LSINGL,LWILDC
      COMMON/DZDPRL/LISTAC,LISTSG,LISTTO, LWILDC,
     &              LSINGL
 
      COMMON/DZDEDL/LTOP,LTAUX,LUP,LT,LD1,LD2,LSUPL
      PARAMETER (NWPAW=100000,NWKUIP=30000,NWHIGZ=30000)
      COMMON/PAWC/IXPAW,IXHBOO,IXKUIP,IXHIGZ,PAW(NWPAW)
      COMMON/QUEST/IQUEST(100)
      COMMON /ZUNIT/ IQREAD,IQPRNT,IQPR2,IQLOG,IQPNCH,IQTTIN,IQTYPE