Want selected date in written $TY Column, When I run this this is not showing the particular filter

[Anonymous]

Written TY =

VAR DtSelected=SELECTEDVALUE(Dates[TRNDATE])

Var StrtDate=STARTOFYEAR(Dates[TRNDATE])

Var EndDate =  SELECTEDVALUE(Dates[TRNDATE])

Var Result=

Calculate(

    Sum('WO 3Years'[Written $ TY]), All('WO 3Years'[DATE]), DATESBETWEEN('WO 3Years'[DATE],StrtDate, EndDate))

Return

 Result

[lbendlin]

Unless you are using fiscal years you can simplify your code.

Written TY =
VAR DtSelected=SELECTEDVALUE(Dates[TRNDATE])
return 
Calculate(
    Sum('WO 3Years'[Written $ TY]), 
    'WO 3Years'[DATE]<=DtSelected, 
    YEAR('WO 3Years'[DATE])=YEAR(DtSelected)
)

[Anonymous]

This is not working