


      FFFFiiiilllleeeeSSSSttttaaaattttuuuussss((((3333BBBB))))               ((((RRRRiiiiddddggggeeee))))               FFFFiiiilllleeeeSSSSttttaaaattttuuuussss((((3333BBBB))))



      NNNNAAAAMMMMEEEE
           FileStatus - check the status of a stream file

      SSSSYYYYNNNNTTTTAAAAXXXX
           FUNCTION FileStatus (var f : Text) : Error;

      DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
           _F_i_l_e_S_t_a_t_u_s checks the status of the open stream file
           associated with ffff.  The value returned is zero if no errors
           have occurred during any operations on the stream file.

           The status may be tested immediately after an OpenFile call
           to check that the file was correctly opened, or it may be
           checked after an input/output operation to insure that the
           transfer was successfully completed.

      SSSSEEEEEEEE AAAALLLLSSSSOOOO
           OpenFile (3B)

      NNNNOOOOTTTTEEEESSSS
           ErNotOpen is returned if the stream file is not open.

           ErEOF is returned if there was an attempt to read past end
           of file.

           ErFileStatus is returned if if any other error has occurred.





























      Page 1                                                   (9010-E)



