you might want to add a timer to the screen object with _SCREEN.AddObject("MyDateMenu","MyDateMenu") to refresh part of the menu.
define a class based on the timer object with interval of 1000. remove the old menu ( ok, about 1 second old ) then add the new one ( this would be to update seconds, you cound change the interval 60000 to just update the mins ) on each timer event, where the new date and time is used as the key.

define Class MyDateMenu as timer
   this.interval = 1000

   procedure timer
      relase pad DateMenu of _Msy Menu
      DEFINE PAD DateMenu OF _MsysMenu PROMPT ttoc(datetime())
   endproc
enddefine

not tested...probably missing something, but i've done similar things in the past.

- jer