(**********************************************************************

    :Program.    Time
    :Contents.   Anpassung des Module TimerSupports an mein Versionsmodule
    :Author.     Steffen Reith
    :Address.    Hessenstr. 64, D-8700 Wuerzburg
    :Copyright.  Shareware
    :Language.   Modula-2
    :Translator. M2Amiga A+L V3.32d
    :System.     $$Date: 15-06-1991  01:41:39
    :System.     $$CompilerRuns #20#
    :History.    V1.0  12-3-1991

**********************************************************************)
DEFINITION MODULE Time;

TYPE TimeFeld=ARRAY[0..8] OF CHAR;
     (* z.B. 10:30:40 *)
     DateFeld=ARRAY[0..10] OF CHAR;
     (* z.B. 10-03-1991 *)

PROCEDURE AskDate(VAR Time:TimeFeld; VAR Date:DateFeld);

END Time.