diff --git a/mystic/mis_common.pas b/mystic/mis_common.pas
index 1b0b33d..2fee9ce 100644
--- a/mystic/mis_common.pas
+++ b/mystic/mis_common.pas
@@ -104,7 +104,7 @@ Var
       'S' : Res := User.Security >= strS2I(Data);
       'T' : Res := True;
       'U' : Res := User.PermIdx = strS2I(Data);
-      'W' : Res := strS2I(Data) = m_DateTime.DayOfWeek;
+      'W' : Res := strS2I(Data) = m_DateTime.DayOfWeek(CurDateDos);
       'Z' : If IgnoreGroup Then Begin
               Check := False;
               First := True;