NAME: GetFTime

     USE: Procedure that accepts a valid file variable that has been
          assigned but not opened and returnes a packed time value.
          Errors are returned through DosError.

     DEPENDENCY:  The DOS unit must be used placed in the uses section.

     SYNTAX: GetFTime(Var FileVar; Var TimeValue);