Set: Current Calendar Month (Date)

CREATE STATIC SET CURRENTCUBE.[Current Calendar Month (Date)]
 AS filter(
  [Date].[Calendar Date].[Calendar Month],
  [Date].[Calendar Date].Properties( "Is Current Month" ) <> "0"
).item(0), DISPLAY_FOLDER = 'Current Dates';