These  functions  provide  a  standard  way   of   returning   a
  character-string  value  that  indicates  the  calender date and
  time.  The return value is compatible with all string types.

  Syntax:

     DATE( t )

     TIME( t )

  The  parameter  't'  is  a  variable  of  the  predeclared  type
  TIMESTAMP.   You  can  either call the GETTIMESTAMP procedure to
  initialize 't' before you pass 't' to either DATE  or  TIME,  or
  you can construct your own TIMESTAMP object.

  The size of the function's return value depends  on  the  string
  length  that is normally returned by your system for either date
  or time data.

  Example:

  VAR
      Time_Var : TIMESTAMP;
      The_Time, The_Date : STRING(23);

  {In the executable section:}
  GETTIMESTAMP( Time_Var );
  The_Date := DATE( Time_Var );
  The_Time := TIME( Time_Var );
  WRITELN( The_Date, The_Time );  {Writes: 1-FEB-1989
                                           14:20:25.98 }