Listing A: MDX Code That Returns the Top 10 Non-Beer Products Purchased with Beer
WITH
  SET [BeerSet] AS '{ [Product].[All Products].[Drink].[Alcoholic Beverages].[Beer and 
Wine].[Beer] }'
  SET [BeerTrans] AS 'NONEMPTYCROSSJOIN( [Customers].[Name].MEMBERS
      , [Store].[Store Name].MEMBERS, [Time].[Month].MEMBERS, [BeerSet], 3)'
  MEMBER [Measures].[NumTrans] AS 'COUNT( NONEMPTYCROSSJOIN( [BeerTrans],
      { [Product].CURRENTMEMBER} ) )'
  SET [BeerProducts] AS 'DESCENDANTS( [Product].[All Products].[Drink].
      [Alcoholic Beverages].[Beer and Wine].[Beer], [Product].[Product Name] )'
  SET [NonBeerProducts] AS ' EXCEPT( [Product].[Product Name].MEMBERS, [BeerProducts] )'
SELECT { [Store Sales], [NumTrans] } ON COLUMNS,
  TOPCOUNT( [NonBeerProducts], 10, [NumTrans] ) ON ROWS
FROM Sales