param(
   [string] $ServerName, 		<# The name of the Analysis Services Instance #>
   [string] $DatabaseName, 		<# The name of the Database our Cube is in #>
   [string] $CubeName,     		<# The name of the Cube that our Measure Group is in #>
   [string] $MeasureGroupName, 	<# The name of the Measure Group that our Partition is in #>
   [string] $SourcePartitionName, 	<# The name of the Partition we want to merge in to another partition #>
   [string] $NewPartitionName, 	<# The desired name of the new partition #>
   [string] $NewPartitionQuery 	<# The Query source for the new partition (will use the same datasource as the SourcePartition #>
)
 
[System.Reflection.Assembly]::LoadWithPartialName("Microsoft.AnalysisServices") >$NULL
 
$server = New-Object Microsoft.AnalysisServices.Server
$server.Connect($ServerName)
 
$database = $server.Databases.GetByName($DatabaseName)
$cube = $database.Cubes.GetByName($CubeName)
$measureGroup = $cube.MeasureGroups.FindByName($MeasureGroupName)
$sourcePartition = $measureGroup.Partitions.GetByName($SourcePartitionName)
$sourceQueryBinding = $sourcePartition.Source
 
$newPartition = $sourcePartition.Clone()
$newPartition.ID = $NewPartitionName
$newPartition.Name = $NewPartitionName
$measureGroup.Partitions.Add($newPartition) > $NULL
$newPartition.Source = New-Object Microsoft.AnalysisServices.QueryBinding($sourceQueryBinding.DataSourceID, $NewPartitionQuery)
$newPartition.Update()
 
$server.Disconnect()

SET ANSI_NULLS ON
GO
 
SET QUOTED_IDENTIFIER ON
GO
 
/*************************************************************************************
***
*** Procedure:  		[Utility_CloneSSASPartition]
*** Purpose:		Executes PowerShell script to clone a SSAS partition
***			
***			
*** Author:		tl
*** Date Created:		2010-01-15
*** 
*** Revision History
*** Date		Author			Description
*** 2010-01-15	tl			Created
*************************************************************************************/
 
CREATE PROCEDURE [dbo].[Utility_CloneSSASPartition_S01]
(
	@ServerName AS VARCHAR(255),
	@DatabaseName AS VARCHAR(255),
	@CubeName AS VARCHAR(255),
	@MeasureGroupName AS VARCHAR(255),
	@SourcePartitionName AS VARCHAR(255),
	@NewPartitionName AS VARCHAR(255),
	@NewPartitionQuery AS VARCHAR(255)
)
AS 
 
SET NOCOUNT ON
DECLARE @cmd VARCHAR(8000)
SET @cmd = 
	'powershell.exe -Command "& {'
	+ ' C:\cloneSSASPartition.ps1'
	+ ' -ServerName:\"' + @ServerName + '\"'
	+ ' -DatabaseName:\"' + @DatabaseName + '\"'
	+ ' -CubeName:\"' + @CubeName + '\"'
	+ ' -MeasureGroupName:\"' + @MeasureGroupName + '\"'
	+ ' -SourcePartitionName:\"' + @SourcePartitionName + '\"'
	+ ' -NewPartitionName:\"' + @NewPartitionName + '\"'
	+ ' -NewPartitionQuery:\"' + @NewPartitionQuery + '\"}"'
 
PRINT @cmd
EXEC xp_cmdshell @cmd

EXEC [dbo].[Utility_CloneSSASPartition_S01]
	 @ServerName = 'TESTSERVER'
	,@DatabaseName = 'TestDatabase'
	,@CubeName = 'TestCube'
	,@MeasureGroupName = 'Test Measure Group'
	,@SourcePartitionName = 'Test Partition - 200912'
	,@NewPartitionName = 'Test Partition - 201001'
	,@NewPartitionQuery = 'SELECT * FROM dbo.FactTableMonth(''1/1/2010'', ''2/1/2010'')'

what was sales for nichole nara
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Customer].[Customer].[Nichole Nara]} ON 0 FROM [Adventure Works])
$13,295.38
what were sales for nichole nara in cy 2004
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Date].[Calendar Year].[CY 2004]} ON 0 FROM (SELECT {[Customer].[Customer].[Nichole Nara]} ON 0 FROM [Adventure Works]))
$2,419.06
what were sales for nichole nara in cy 2004 in north america
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Sales Territory].[Sales Territory Group].[North America]} ON 0 FROM (SELECT {[Date].[Calendar Year].[CY 2004]} ON 0 FROM (SELECT {[Customer].[Customer].[Nichole Nara]} ON 0 FROM [Adventure Works])))
No Results Found
what were sales for nichole nara in cy 2004 for bikes
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Product].[Category].[Bikes]} ON 0 FROM (SELECT {[Date].[Calendar Year].[CY 2004]} ON 0 FROM (SELECT {[Customer].[Customer].[Nichole Nara]} ON 0 FROM [Adventure Works])))
$2,384.07
what were sales in north america in fy 2003 for bikes
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Product].[Category].[Bikes]} ON 0 FROM (SELECT {[Date].[Fiscal Year].[FY 2003]} ON 0 FROM (SELECT {[Sales Territory].[Sales Territory Group].[North America]} ON 0 FROM [Adventure Works])))
$1,739,306.95
sales for cy 2004 in cy q1, cy q2, and cy q4 in north america and canada
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Sales Territory].[Sales Territory Group].[North America],[Customer].[Country].[Canada]} ON 0 FROM (SELECT {[Date].[Calendar Quarter of Year].[CY Q1],[Date].[Calendar Quarter of Year].[CY Q2],[Date].[Calendar Quarter of Year].[CY Q4]} ON 0 FROM (SELECT {[Date].[Calendar Year].[CY 2004]} ON 0 FROM [Adventure Works])))
I don't know - Query Failure: Members belong to different hierarchies in the  function.
sales for cy 2004 in cy q1, cy q2, and cy q4 in north america
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Sales Territory].[Sales Territory Group].[North America]} ON 0 FROM (SELECT {[Date].[Calendar Quarter of Year].[CY Q1],[Date].[Calendar Quarter of Year].[CY Q2],[Date].[Calendar Quarter of Year].[CY Q4]} ON 0 FROM (SELECT {[Date].[Calendar Year].[CY 2004]} ON 0 FROM [Adventure Works])))
$3,967,371.16
sales between cy 2003 and cy 2004 for large resellers
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT [Large Resellers] ON 0 FROM (SELECT {[Date].[Calendar Year].[CY 2003]:[Date].[Calendar Year].[CY2004]} ON 0 FROM [Adventure Works]))
$19,561,960.04
sales for top 50 customers in fy 2004 in fy q1 and fy q3
SELECT {[Measures].[Internet Sales Amount]} ON 0  FROM (SELECT {[Date].[Fiscal Quarter of Year].[FY Q1],[Date].[Fiscal Quarter of Year].[FY Q3]} ON 0 FROM (SELECT {[Date].[Fiscal Year].[FY 2004]} ON 0 FROM (SELECT [Top 50 Customers] ON 0 FROM [Adventure Works])))
$177,263.41

;WITH [ProcessEvent] AS
(
SELECT
	'Process' AS [Event]
	,cast([TextData] AS XML).value
		('declare namespace B="http://schemas.microsoft.com/analysisservices/2003/engine";           
		(//B:DatabaseID)[1]'
		,'VARCHAR(1024)') AS [DatabaseID]
	,cast([TextData] AS XML).value
		('declare namespace B="http://schemas.microsoft.com/analysisservices/2003/engine";           
		(//B:DimensionID)[1]'
		,'VARCHAR(1024)') AS [DimensionID]
	,cast([TextData] AS XML).value
		('declare namespace B="http://schemas.microsoft.com/analysisservices/2003/engine";           
		(//B:MeasureGroupID)[1]'
		,'VARCHAR(1024)') AS [MeasureGroupId]
	,[StartTime]
	,[Duration]
FROM dbo.zTrace_MSAS_20091023_2 T
WHERE 
	T.[EventClass] = 16 
	AND T.[EventSubclass] IN (3, 12)
	AND [TextData] LIKE '%Process%'
),
[QueryEvent] AS
(
SELECT
	'Query' AS [Event]
	,[DatabaseName] AS [DatabaseID]
	,NULL AS [DimensionID]
	,NULL AS [MeasureGroupId]
	,[StartTime]
	,[Duration]
FROM dbo.zTrace_MSAS_20091023_2 T
WHERE T.[EventClass] = 10
),
[Event] AS
(
	SELECT * FROM [ProcessEvent]
	UNION
	SELECT * FROM [QueryEvent]
)
SELECT
	 ROW_NUMBER() OVER (ORDER BY [StartTime] ASC) AS [EventId]
	,DATEADD(HOUR, -5, [StartTime]) AS [StartTime]
	,DATEDIFF(MILLISECOND, (SELECT MIN([StartTime]) FROM Event), [StartTime]) [RelativeStartTime]
	,[Duration]
	,[Event]
	,[DatabaseID]
	,CASE
		WHEN [DimensionID] IS NOT NULL THEN 'Dimension'
		WHEN [MeasureGroupID] IS NOT NULL THEN 'Measure Group'
		ELSE 'None'
	 END AS [ObjectType]	,CASE
		WHEN [DimensionID] IS NOT NULL THEN [DimensionID]
		WHEN [MeasureGroupID] IS NOT NULL THEN [MeasureGroupID]
		ELSE 'None'
	 END AS [ObjectId]	
FROM [Event]
WHERE
	DATEDIFF(MILLISECOND, (SELECT MIN([StartTime]) FROM Event), [StartTime]) >= @StartMillisecond
	AND DATEDIFF(MILLISECOND, (SELECT MIN([StartTime]) FROM Event), [StartTime]) < @EndMillisecond
	AND Duration >= @MinDuration

CREATE TABLE #Temp_SCDInserts ([PartId] INT)
 
-- INSERTS for new Parts
INSERT INTO #Temp_SCDInserts
SELECT   
	[PartId]
FROM 
	Part a WITH(NOLOCK)
	INNER JOIN PartType b WITH(NOLOCK) 
		ON a.PartTypeId = b.PartTypeId
	INNER JOIN PartSupplier c WITH(NOLOCK) 
		ON a.PartSupplierId = c.PartSupplierId
	INNER JOIN PartSupplierCategory d WITH(NOLOCK) 
		ON c.PartSupplierCategoryId = d.PartSupplierCategoryId
EXCEPT
SELECT
	[PartId]	
FROM
	DW.dbo.Dim_Part WITH(NOLOCK)
 
-- UPDATES
SELECT 
	 dim.[PartKeyId]
	,a.[PartName]
	,b.[PartTypeId]
	,b.[PartTypeName]
	,c.[PartSupplierId]
	,c.[PartSupplierName]
	,d.[PartSupplierCategoryId]
	,d.[PartSupplierCategoryName]
INTO #Temp_SCDUpdates
FROM DW.dbo.Dim_Part dim WITH(NOLOCK)
	INNER JOIN Part a WITH(NOLOCK)
		ON dim.PartId = a.PartId -- Business Key
	INNER JOIN PartType b WITH(NOLOCK) 
		ON a.PartTypeId = b.PartTypeId
	INNER JOIN PartSupplier c WITH(NOLOCK) 
		ON a.PartSupplierId = c.PartSupplierId
	INNER JOIN PartSupplierCategory d WITH(NOLOCK) 
		ON c.PartSupplierCategoryId = d.PartSupplierCategoryId
WHERE
	dim.PartName <> a.PartName
	OR dim.PartTypeId <> b.PartTypeId
	OR dim.PartTypeName <> b.PartTypeName
	OR dim.PartSupplierId <> c.PartSupplierId
	OR dim.PartSupplierName <> c.PartSupplierName
	OR dim.PartSupplierCategoryId <> d.PartSupplierCategoryId
	OR dim.PartSupplierCategoryName	<> d.PartSupplierCategoryName
 
-- INSERT new records
INSERT INTO [DW].[dbo].[Dim_Part]
	([PartId]
	,[PartName]
	,[PartTypeId]
	,[PartTypeName]
	,[PartSupplierId]
	,[PartSupplierName]
	,[PartSupplierCategoryId]
	,[PartSupplierCategoryName])
SELECT 
	 a.[PartId]
	,a.[PartName]
	,b.[PartTypeId]
	,b.[PartTypeName]
	,c.[PartSupplierId]
	,c.[PartSupplierName]
	,d.[PartSupplierCategoryId]
	,d.[PartSupplierCategoryName]
FROM #Temp_SCDInserts i
	INNER JOIN Part a WITH(NOLOCK)
		ON i.PartId = a.PartId -- Business Key
	INNER JOIN PartType b WITH(NOLOCK) 
		ON a.PartTypeId = b.PartTypeId
	INNER JOIN PartSupplier c WITH(NOLOCK) 
		ON a.PartSupplierId = c.PartSupplierId
	INNER JOIN PartSupplierCategory d WITH(NOLOCK) 
		ON c.PartSupplierCategoryId = d.PartSupplierCategoryId
 
-- UPDATE existing records
UPDATE [DW].[dbo].[Dim_Part]
SET
	 [PartName] = b.[PartName]
	,[PartTypeId] = b.[PartTypeId]
	,[PartTypeName] = b.[PartTypeName]
	,[PartSupplierId] = b.[PartSupplierId]
	,[PartSupplierName] = b.[PartSupplierName]
	,[PartSupplierCategoryId] = b.[PartSupplierCategoryId]
	,[PartSupplierCategoryName] = b.[PartSupplierCategoryName]
FROM 
	[DW].[dbo].[Dim_Part] AS a
	INNER JOIN #Temp_SCDUpdates AS b 
		ON a.PartKeyId = b.PartKeyId  -- Join on Business Keys or Surrogate Key
 
 
DROP TABLE #Temp_SCDInserts
DROP TABLE #Temp_SCDUpdates

SELECT
	 DatabaseName
	,ObjectName
	,CAST(query_plan.VALUE('
		declare namespace QP="http://schemas.microsoft.com/sqlserver/2004/07/showplan";   
		sum((/QP:ShowPlanXML/QP:BatchSequence/QP:Batch/QP:Statements/QP:StmtSimple/QP:QueryPlan/@CompileTime))','NVARCHAR(MAX)') AS FLOAT)/1000.0/60.0 AS [CompileTime]
	,query_plan
	,query_plan.VALUE('
		declare namespace QP="http://schemas.microsoft.com/sqlserver/2004/07/showplan";   
		count((//QP:ColumnsWithNoStatistics))','INT') AS [ColumnsWithNoStatistics]
	,query_plan.VALUE('
		declare namespace QP="http://schemas.microsoft.com/sqlserver/2004/07/showplan";   
		count((//QP:TableScan))','INT') AS [TableScan]
	,query_plan.VALUE('
		declare namespace QP="http://schemas.microsoft.com/sqlserver/2004/07/showplan";   
		count((//QP:IndexScan))','INT') AS [IndexScan]
	,query_plan.VALUE('
		declare namespace QP="http://schemas.microsoft.com/sqlserver/2004/07/showplan";   
		count((//QP:RelOp[@PhysicalOp="Nested Loops"]))','INT') AS [NestedLoop]
	,query_plan.VALUE('
		declare namespace QP="http://schemas.microsoft.com/sqlserver/2004/07/showplan";   
		count((//QP:RelOp[@PhysicalOp="Hash Match"]))','INT') AS [HashMatch]
	,query_plan.VALUE('
		declare namespace QP="http://schemas.microsoft.com/sqlserver/2004/07/showplan";   
		count((//QP:RelOp[@PhysicalOp="Merge Join"]))','INT') AS [MergeJoin]
FROM 
	(	
		SELECT
			OBJECT_NAME(st.objectid,st.dbid) AS ObjectName,
			DB_NAME(st.dbid) AS DatabaseName,
			st.dbid,
			st.objectid,
			qs.plan_handle
		FROM 
			sys.dm_exec_query_stats AS qs
			CROSS APPLY sys.dm_exec_sql_text(qs.sql_handle) AS st
		WHERE
			ObjectId IS NOT NULL
		GROUP BY
			st.dbid,
			st.objectid,
			qs.plan_handle
	) a
	CROSS APPLY sys.dm_exec_query_plan(plan_handle) qp
WHERE DatabaseName = 'NameOfDatabase'
ORDER BY DatabaseName, ObjectName

Name: View Member Definition
 
Action Target
    Target Type: Cells
    Target object: All cells
 
Action Content
    Type: URL
    Action expression: "http://i.domain.com/doc/Defs.aspx#" 
                       + [Measures].CurrentMember.Name
 
Additional Properties
    Invocation: Interactive
    Description: View Member Definition
    "View Definition Of " + [Measures].CurrentMember.Name + "..."
    Caption is MDX: True

SELECT [Path], ContentText
FROM
(
SELECT [Path], cast(cast([content]AS varbinary(8000)) AS varchar(8000)) AS [ContentText]
FROM [catalog] cat WITH(nolock)
WHERE [type]=2
) a
WHERE ContentText LIKE '%ColumnName%' 
	OR ContentText LIKE '%columnname%' 
	OR ContentText LIKE '%MeasureName%' 
	OR ContentText LIKE '%AttributeName%' 
	OR ContentText LIKE '%etc...%'

DECLARE @PercentOfAverage AS DECIMAL(10, 2)
DECLARE @Yesterday AS DECIMAL(10, 2)
DECLARE @SevenDayAverage AS DECIMAL(10, 2)
 
 
SELECT SliceName,Threshold
INTO #Temp_SliceList
FROM (
	SELECT 'Slice1' AS 'SliceName', .8 AS 'Threshold'
	UNION
	SELECT 'Slice2', 0.9
) a
 
DECLARE @tsql NVARCHAR(MAX)
 
DECLARE @slice VARCHAR(255)
DECLARE @threshold DECIMAL(10,2)
DECLARE @slicecursor CURSOR
 
SET @slicecursor = CURSOR FOR
	SELECT slicename,threshold FROM #Temp_SliceList
 
OPEN @slicecursor
 
FETCH NEXT FROM @slicecursor INTO @slice, @threshold
 
WHILE (@@FETCH_STATUS = 0) 
BEGIN
 
 
	CREATE TABLE #Temp_MdxResults 
	  (Yesterday DECIMAL(10,2),
		SevenDayAverage DECIMAL(10,2),
		PercentOfAverage DECIMAL(10,2))
 
	SET @tsql = '
INSERT INTO #Temp_MdxResults (Yesterday, SevenDayAverage, PercentOfAverage)
SELECT    ISNULL("[Measures].[Yesterday Foo]", 0) AS ''Yesterday'',
						ISNULL("[Measures].[Average 7-Day Foo]", 0) AS ''SevenDayAverage'',
						ISNULL("[Measures].[Percent Change]", 0) AS ''PercentOfAverage''
			  FROM      OpenRowset(''MSOLAP'',
								   ''DATA SOURCE=SERVER\INSTANCE; Initial Catalog=SSASDB;'',''
WITH 
MEMBER Measures.[Yesterday Foo] AS SUM
(
	{
		StrToMember("[Time].[Calendar Date].[" + VBA!format(VBA!dateadd("d",-1,VBA![date]()),"yyyy-MM-dd 00:00:00") + "]")
	},
	[Measures].[Foo]		
)
MEMBER Measures.[Average 7-Day Foo] AS AVG
(
	{
		StrToMember("[Time].[Calendar Date].[" + VBA!format(VBA!dateadd("d",-2,VBA![date]()),"yyyy-MM-dd 00:00:00") + "]"):StrToMember("[Time].[Calendar Date].[" + VBA!format(VBA!dateadd("d",-9,VBA![date]()),"yyyy-MM-dd 00:00:00") + "]")
	},
	[Measures].[Foo]		
)
MEMBER Measures.[Percent Change] AS Measures.[Yesterday Foo]/Measures.[Average 7-Day Foo]
SELECT 
{Measures.[Yesterday Foo], Measures.[Average 7-day Foo], Measures.[Percent Change]} ON 0,
{
	[Slice Dimension].[Slice Attribute].&[' + @slice + ']
}ON 1
FROM [Cube]'') a'
 
	EXEC (@tsql)
 
	SELECT  
		@PercentOfAverage = CAST(tot.PercentOfAverage AS DECIMAL(10, 2)),
		@Yesterday = CAST(tot.Yesterday AS DECIMAL(10, 2)),
		@SevenDayAverage = CAST(tot.SevenDayAverage AS DECIMAL(10, 2))
	FROM    #Temp_MdxResults tot
 
	DROP TABLE #Temp_MdxResults
 
	IF @PercentOfAverage < @Threshold 
		BEGIN
			--Do Something useful here
 
		END
	FETCH NEXT FROM @slicecursor INTO @slice, @threshold
END