diff --git a/mdl/m_datetime.pas b/mdl/m_datetime.pas
index 066c3b7..a3550e1 100644
--- a/mdl/m_datetime.pas
+++ b/mdl/m_datetime.pas
@@ -4,6 +4,10 @@ Unit m_DateTime;
 
 Interface
 
+Const
+  DayString   : Array[0..6] of String[3]  = ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat');
+  MonthString : Array[1..12] of String[3] = ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec');
+
 Procedure WaitMS            (MS: Word);
 Function  TimerMinutes      : LongInt;
 Function  TimerSeconds      : LongInt;