how to get First day and Last day of the month

dFirstDayOfMonth: Date(Year(currentdate),Month(currentdate),1) 
dLastDayOfMonth: Date(DateAdd("d",-1,DateAdd("m",1,{@dFirstDayOfMonth})))