      REM PLW.COMMON
*PIC-LAN
*INCLUDE
*
*
*Y
*
*
*
*
*
************************************************************************
************************************************************************
***                                                                  ***
*** COPYWRITE 1988-2002 MODULAR SOFTWARE                             ***
***                                                                  ***
*** THIS PROGRAM IS PROPRIETARY TO MODULAR SOFTWARE AND MAY NOT BE   ***
*** USED, COPIED, EXAMINED, OR DISCLOSED WITHOUT A VALID LICENSE     ***
*** FROM MODULAR SOFTWARE.                                           ***
***                                                                  ***
************************************************************************
************************************************************************
*
*
*
*
      INCLUDE PLW.DEFS
*
*$PC OFF
*
      COMMON PLS$VARS(50)
*
      EQUATE PL$STATE.FD         TO PLS$VARS(1)
      EQUATE PL$CONN.FD          TO PLS$VARS(2)
      EQUATE PL$CTRL.FD          TO PLS$VARS(3)
      EQUATE PL$DATA.FD          TO PLS$VARS(4)
      EQUATE PL$MAIL.BOX.FD      TO PLS$VARS(5)
      EQUATE PL$PROC.FD          TO PLS$VARS(6)
      EQUATE PL$DSG.HANDLES      TO PLS$VARS(7)
      EQUATE PL$FILE.LIST        TO PLS$VARS(8)
      EQUATE PL$CFG              TO PLS$VARS(9)
      EQUATE PL$LOG.FD           TO PLS$VARS(10)
      EQUATE PL$V.PORT.NO        TO PLS$VARS(11)
      EQUATE PL$LOGFNAME.FD      TO PLS$VARS(12)
      EQUATE PL$LOGIP.FD         TO PLS$VARS(13)
      EQUATE PL$MD.FD            TO PLS$VARS(14)
      EQUATE PL$MAIL.FD          TO PLS$VARS(15)
*$*   EQUATE PL$MAIL.XREF.FD     TO PLS$VARS(16)
      EQUATE PL$BW.LOG.FD        TO PLS$VARS(17)
      EQUATE PL$MAIL.DATA.FD     TO PLS$VARS(18)
      EQUATE PL$MAIL.ROUTE.FD    TO PLS$VARS(19)
      EQUATE PL$RESTART.FLG      TO PLS$VARS(20)
      EQUATE PL$LISTEN.LST       TO PLS$VARS(21)
      EQUATE PL$ILOCK.FD         TO PLS$VARS(22)
*
      EQUATE PL$PGCTRL.FD        TO PLS$VARS(23)
      EQUATE PL$PGCACHE.FD       TO PLS$VARS(24)
      EQUATE PL$PGDATA.FD        TO PLS$VARS(25)
      EQUATE PL$PGBASIC.FD       TO PLS$VARS(26)
      EQUATE PL$PGNAME           TO PLS$VARS(27)
      EQUATE PL$PRSTR            TO PLS$VARS(28)
      EQUATE PL$OFFLINE          TO PLS$VARS(29)
      EQUATE PL$CNLOCKCNT        TO PLS$VARS(30)
      EQUATE PL$CRLFCRLF         TO PLS$VARS(31)
      EQUATE PL$LFLF             TO PLS$VARS(32)
*
      EQUATE PL$WORK.FD          TO PLS$VARS(33)
      EQUATE PL$BASXREF.FD       TO PLS$VARS(34)
      EQUATE PL$LOCK.FD          TO PLS$VARS(35)
      EQUATE PL$APP.FD           TO PLS$VARS(36)
*
      EQUATE PL$LOGUSAGE.FD      TO PLS$VARS(38)
*
      EQUATE PL$EXTRAHTTP        TO PLS$VARS(40)
      EQUATE PL$PBHDR            TO PLS$VARS(41)
*
      EQUATE PL$RPC.FD           TO PLS$VARS(43)
      EQUATE PL$RPC.SUBS.FD      TO PLS$VARS(44)
      EQUATE PL$RPC.RESP.FD      TO PLS$VARS(45)
*
      EQUATE RESX                TO PLS$VARS(50)
*
      COMMON PLW$VARS(20)
*
      EQUATE PLW$DIR             TO PLW$VARS(1)
      EQUATE PLW$LEVEL           TO PLW$VARS(9)
*
      EQUATE PLW$EXT             TO PLW$VARS(10)
      EQUATE PLW$EXT.PARM        TO PLW$VARS(11)
*
      COMMON ST$ARRAY(50)
*
      EQUATE ST$CFG              TO ST$ARRAY(1)
      EQUATE ST$PLCB             TO ST$ARRAY(2)
      EQUATE ST$OWN              TO ST$ARRAY(3)
      EQUATE ST$OWN.ATTR         TO 3
      EQUATE ST$TP               TO ST$ARRAY(4)
      EQUATE ST$OBUF.BCB         TO ST$ARRAY(5)
      EQUATE ST$OBUF.CNT         TO ST$ARRAY(6)
      EQUATE ST$IBUF             TO ST$ARRAY(7)
      EQUATE ST$OBUF             TO ST$ARRAY(8)
      EQUATE ST$CLOSESENT        TO ST$ARRAY(9)
*
* Elements for HTTP server
*
      EQUATE ST$IP               TO ST$ARRAY(10)
      EQUATE ST$KILL.TIME        TO ST$ARRAY(11)
      EQUATE ST$CMD              TO ST$ARRAY(12)
      EQUATE ST$HTTP.HDR         TO ST$ARRAY(13)
      EQUATE ST$HTTP.VAL         TO ST$ARRAY(14)
      EQUATE ST$POST.LEN         TO ST$ARRAY(15)
      EQUATE ST$KEEP.ALIVE       TO ST$ARRAY(16)
      EQUATE ST$RIP              TO ST$ARRAY(17)
      EQUATE ST$LIP              TO ST$ARRAY(18)
      EQUATE ST$POST.DATA        TO ST$ARRAY(19)
      EQUATE ST$DATA.LEN         TO ST$ARRAY(20)
*
* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
*
*$*   COMMON F$ARRAY(500)
      COMMON F$ARRAY(50)
*
      COMMON CFG$ARRAY(6)
*
      EQUATE CFG$IP              TO CFG$ARRAY(1)
      EQUATE CFG$PATH            TO CFG$ARRAY(2)
      EQUATE CFG$TP              TO CFG$ARRAY(3)
      EQUATE CFG$PARM            TO CFG$ARRAY(4)
      EQUATE CFG$OPT             TO CFG$ARRAY(5)
      EQUATE CFG$NAME            TO CFG$ARRAY(6)
*
      COMMON NCFG$ARRAY(5)
*
      EQUATE NCFG$IP             TO NCFG$ARRAY(1)
      EQUATE NCFG$PATH           TO NCFG$ARRAY(2)
      EQUATE NCFG$TP             TO NCFG$ARRAY(3)
      EQUATE NCFG$PARM           TO NCFG$ARRAY(4)
      EQUATE NCFG$OPT            TO NCFG$ARRAY(5)
*
      COMMON DATA$ARRAY(10)
*
      EQUATE DATA$TP             TO DATA$ARRAY(1)
      EQUATE DATA$FNAME          TO DATA$ARRAY(2)
      EQUATE DATA$FNUM           TO DATA$ARRAY(3)
      EQUATE DATA$DSGPLCB        TO DATA$ARRAY(4)
      EQUATE DATA$DSGPATH        TO DATA$ARRAY(5)
      EQUATE DATA$HOSTPATH       TO DATA$ARRAY(5)
      EQUATE DATA$OPT            TO DATA$ARRAY(6)
      EQUATE DATA$PREFIX         TO DATA$ARRAY(7)
*
      COMMON CTRL$ARRAY(10)
*
      EQUATE CTRL$TP             TO CTRL$ARRAY(1)
      EQUATE CTRL$MIME           TO CTRL$ARRAY(2)
      EQUATE CTRL$TM             TO CTRL$ARRAY(3)
      EQUATE CTRL$TMS            TO CTRL$ARRAY(4)
      EQUATE CTRL$SUB            TO CTRL$ARRAY(5)
      EQUATE CTRL$HDR            TO CTRL$ARRAY(6)
      EQUATE CTRL$NMHDR          TO CTRL$ARRAY(7)
      EQUATE CTRL$HEXFLG         TO CTRL$ARRAY(8)
      EQUATE CTRL$CACHETM        TO CTRL$ARRAY(9)
      EQUATE CTRL$CACHETM$N      TO 9
*
      COMMON PR$ARRAY(10)
*
      EQUATE PR$NOW              TO PR$ARRAY(1)
      EQUATE PR$PLCB             TO PR$ARRAY(2)
      EQUATE PR$STATE            TO PR$ARRAY(3)
*
      COMMON VAR$VALS(500)
      COMMON VAR$NAMES
      COMMON VAR$CNT
*$PC ON
