Adventure Works DW - Kpi - Growth in Customer Base

KPI properties

name	value
name	Growth in Customer Base
description	The ratio between the customer count in the current period to that of the previous period.
id	KPI 5
display folder	Customer Perspective\Expand Customer Base
associated measure group id	Internet Sales
trend graphic	Standard Arrow
status graphic	Road Signs

Value

[Measures].[Growth in Customer Base]

Goal

Case
    When [Date].[Fiscal].CurrentMember.Level Is [Date].[Fiscal].[Fiscal Year]
    Then .30
    When [Date].[Fiscal].CurrentMember.Level Is [Date].[Fiscal].[Fiscal Semester]
    Then .15
    When [Date].[Fiscal].CurrentMember.Level Is [Date].[Fiscal].[Fiscal Quarter]
    Then .075
    When [Date].[Fiscal].CurrentMember.Level Is [Date].[Fiscal].[Month]
    Then .025
    Else "NA"
End

Status

Case
    When KpiValue( "Growth in Customer Base" ) >= 
         KpiGoal ( "Growth in Customer Base" ) 
    Then 1
    When KpiValue( "Growth in Customer Base" ) >= 
         KpiGoal ( "Growth in Customer Base" ) * .90
         And
         KpiValue( "Growth in Customer Base" ) < 
         KpiGoal ( "Growth in Customer Base" )         
    Then 0
    Else -1
End

Trend

Case
    When IsEmpty
         (
           ParallelPeriod
           (
             [Date].[Fiscal].[Fiscal Year],
             1,
             [Date].[Fiscal].CurrentMember
           )
         )
    Then 0  
    When VBA!Abs
         (
          ( 
            KpiValue( "Growth in Customer Base" ) 
            - 
            (
              KpiValue( "Growth in Customer Base" ),
              ParallelPeriod
              ( 
                [Date].[Fiscal].[Fiscal Year],
                1,
                [Date].[Fiscal].CurrentMember
              )
            )
          ) 
          /
          (
            KpiValue( "Growth in Customer Base" ),
            ParallelPeriod
            ( 
              [Date].[Fiscal].[Fiscal Year],
              1,
              [Date].[Fiscal].CurrentMember
            )
          )  
         ) <=.02
    Then 0
    When ( 
           KpiValue( "Growth in Customer Base" ) 
           - 
           (
             KpiValue( "Growth in Customer Base" ),
             ParallelPeriod
             ( 
               [Date].[Fiscal].[Fiscal Year],
               1,
               [Date].[Fiscal].CurrentMember
             )
           ) 
         )
         /
         (
           KpiValue( "Growth in Customer Base" ),
           ParallelPeriod
           ( 
             [Date].[Fiscal].[Fiscal Year],
             1,
             [Date].[Fiscal].CurrentMember
           )
         ) >.02
    Then 1
    Else -1
End