Margin = 
VAR SalesAmount =
SUMX ( Sales, Sales[Quantity] * Sales[Net Price] )

VAR TotalCost =
SUMX ( Sales, Sales[Quantity] * Sales[Unit Cost] )

VAR Margin = SalesAmount - TotalCost

RETURN
Margin


tbCustomers = ALL (
Customer[CustomerKey], 
Customer[Company Name], 
Customer[Name])


Customers = 
VAR CustomerCode= ALL (Customer[CustomerKey], Customer[Company Name], Customer[Name])
VAR CustomerNames = 
ADDCOLUMNS( CustomerCode, "Customers", 
    IF ( ISBLANK ( Customer[Company Name] ),
    Customer[Name], Customer[Company Name] )
            )
RETURN CustomerNames



BestCustomers = 
VAR CustomerKeys= ALL (Customer[CustomerKey], Customer[Company Name], Customer[Name])
VAR CustomerNames = 
ADDCOLUMNS(CustomerKeys,
"Customers", 
IF ( ISBLANK ( Customer[Company Name] ),
Customer[Name], Customer[Company Name] )
)
VAR TopCustomers = FILTER (CustomerNames, VAR SalesOfCustomer = SUMX ( RELATEDTABLE ( Sales ), 	Sales[Quantity] * Sales[Net Price] ) RETURN SalesOfCustomer >= 50000 )
RETURN TopCustomers


BestCustomers2 = 
VAR CustomerKeys2= ALL (Customer[CustomerKey], Customer[Company Name], Customer[Name])
VAR CustomerNames2 = 
ADDCOLUMNS(CustomerKeys2,
"Customers2", 
IF ( ISBLANK ( Customer[Company Name] ),
Customer[Name], Customer[Company Name] )
)
VAR TopCustomers2 = FILTER (CustomerNames2, '@MyMeasures'[Sales Amount]>50000)
RETURN TopCustomers2



BestCategories = 
VAR Subcategories =
ALL ( 'Product'[Category], 'Product'[Subcategory] )

VAR AverageSales =
AVERAGEX (Subcategories,
          SUMX ( RELATEDTABLE ( Sales ), Sales[Quantity] * Sales[Net Price] )
         )

VAR TopCategories =
FILTER ( Subcategories,
	VAR SalesOfCategory =
	SUMX ( RELATEDTABLE ( Sales ), Sales[Quantity] * Sales[Net Price] )
        RETURN SalesOfCategory >= AverageSales * 2 )

RETURN TopCategories