C-------------------------------------------------------------------C
C  Directory Management        January 1983                         C
C  Written by John C. Hayre, Texas Instruments                      C
C  Send suggestions and/or complaints to:                           C
C                                                                   C
C               Veeco Integrated Automation			    C
C               10355 Brockwood Rd				    C
C               Dallas, Texas 75238                                 C
C               (Attention John Hayre)                              C
C                                                                   C
C  Phone: 214-349-8482                                              C
C-------------------------------------------------------------------C
C Commons for showfile                                              C
C-------------------------------------------------------------------C
	LOGICAL*1 EOF,DERR,PATFOUND,GENSRCH,Hl_Now,Hl_String
  	BYTE DIREC
  	INTEGER*2 IOSB(4),CH1,FILLEN
        Integer*4 Hl_Rec,Hl_Pos,SrchSiz,Termch(2),BuffSize,Last,
     1    F1,PAGESize,Highrec,Currec
C
	CHARACTER*132 BUFFER
	CHARACTER*80 SRCHPAT
  	CHARACTER*65 FNAME
  	CHARACTER*15 WINDOW_MSG,TOPLINE
  	CHARACTER*3  CMND
        CHARACTER*1 Last_Cmd, This_Cmd
C
	COMMON /INTBLK/CURREC,HIGHREC,EOF,DIREC,CH1,IOSB,PAGESIZE,
     1                F1,FILLEN,TERMCH,LAST,DERR,PATFOUND,
     1		      BUFFSIZE
  	COMMON /STRBLK/FNAME,CMND,WINDOW_MSG,TOPLINE
	COMMON /LINE_BUFF/BUFFER
        Common /SFDM1/SrchPat
        Common /SFDM2/SrchSiz
        Common /SFDM3/GenSrch ! Shared with showfile
        Common /HL1/Hl_Rec,Hl_Pos
        Common /HL2/Hl_Now,Hl_String
        Common /Cmdss/Last_Cmd,This_Cmd