elapmil.prg

/* This is an original work by Alexander B. Spencer and is placed in the
   public domain.

      Rev 1.2   15 Aug 1991 23:03:32   GLENN
   Forest Belt proofread/edited/cleaned up doc

      Rev 1.1   14 Jun 1991 19:51:44   GLENN
   Minor edit to file header

      Rev 1.0   07 Jun 1991 23:39:42   GLENN
   Initial revision.
 */

FUNCTION ft_ElapMin( cTime1, cTime2 )
   RETURN ;
      ( ( Val( Left( cTime2, 2 ) ) * 60 ) + Val( Right( cTime2, 2 ) ) ) - ;
      ( ( Val( Left( cTime1, 2 ) ) * 60 ) + Val( Right( cTime1, 2 ) ) )