Hey Sergey,
Here's a complicated "one-liner" solution (I think)...
? SYS( 10, VAL( SYS( 11, DATE() ) ) - MOD( VAL( SYS( 11, DATE() - ( WEEK( DATE() ) - 1 ) * 7 ) ), 7 ) )
:)
Jos
In the End, we will remember not the words of our enemies, but the silence of our friends - Martin Luther King, Jr.