Set: Current Calendar Quarter (Date)

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