LISTING 4: Determining Recent Trends for Best-Selling Brands

with set [TenBest] as 'TopCount( [Product].[Brand Name].Members,
 10, [Unit Sales] )'
  set [LastMonth] as 'Tail(Filter([Time].[Month].Members, Not IsEmpty([Time].CurrentMember)),1)'
 set [Last6Months] as ' [LastMonth].item(0).item(0).Lag(6) : 
[LastMonth].item(0).item(0)'
select [Last6Months] on COLUMNS,
 [TenBest] on ROWS
from Sales