SUBROUTINE DOSCOLR ( )

Description
DOScolr.for
Source file:doscolr.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
               17         SEQ  FMTD         OR   
               17         SEQ          A         
               17                         C      

Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write
External Functions and Subroutines Called
INTEGER            LCOUNT
Local Variables (+ indicates altered content)
CHARACTER         +SKIP
INTEGER           +NC,        +NCH_RUN
Referenced Common Block Variables (+ indicates altered content)
CRUN_DIRECTORY     CHARACTER*50       RUN_DIRECTORY
DOS_COL            CHARACTER*6       +COLORS(20)
DOS_COL            CHARACTER*6       +DOSCOL(20)
DOS_COL            INTEGER           +INDEX_DOS(20)
DOS_COL            INTEGER           +NCOLORS