SPORTHK_READ - read an ASCII housekeeping file

SUBROUTINE SPORTHK_READ ( NAME, LUN, STATUS )

   NAME = CHARACTER*(*) (given)
            name of ASCII housekeeping file
   LUN = INTEGER (given)
            FORTRAN unit number to be used in reading the file
   STATUS = INTEGER (given and returned)
            global status