Hi

The formula could be little long, but it is working, at present I am not getting any better thoughts to reduce the size

Current Year :

Datevar dt;
if weekdayname(weekday(date(year(currentdate),11,01)-1)) = "Sunday"
Then
dt:=date(year(currentdate),11,01)-1
else
if weekdayname(weekday(date(year(currentdate),11,01)-2)) = "Sunday"
Then
dt:=date(year(currentdate),11,01)-2
Else
if weekdayname(weekday(date(year(currentdate),11,01)-3)) = "Sunday"
Then
dt:=date(year(currentdate),11,01)-3
Else
if weekdayname(weekday(date(year(currentdate),11,01)-4)) = "Sunday"
Then
dt:=date(year(currentdate),11,01)-4
Else
if weekdayname(weekday(date(year(currentdate),11,01)-5)) = "Sunday"
Then
dt:=date(year(currentdate),11,01)-5
Else
if weekdayname(weekday(date(year(currentdate),11,01)-6)) = "Sunday"
Then
dt:=date(year(currentdate),11,01)-6
Else
if weekdayname(weekday(date(year(currentdate),11,01)-7)) = "Sunday"
Then
dt:=date(year(currentdate),11,01)-7


Previous Year :

Datevar dt1;
if weekdayname(weekday(date(year(currentdate)-1,11,01)-1)) = "Sunday"
Then
dt1:=date(year(currentdate-1),11,01)-1
else
if weekdayname(weekday(date(year(currentdate)-1,11,01)-2)) = "Sunday"
Then
dt1:=date(year(currentdate)-1,11,01)-2
Else
if weekdayname(weekday(date(year(currentdate)-1,11,01)-3)) = "Sunday"
Then
dt1:=date(year(currentdate)-1,11,01)-3
Else
if weekdayname(weekday(date(year(currentdate)-1,11,01)-4)) = "Sunday"
Then
dt1:=date(year(currentdate)-1,11,01)-4
Else
if weekdayname(weekday(date(year(currentdate)-1,11,01)-5)) = "Sunday"
Then
dt1:=date(year(currentdate)-1,11,01)-5
Else
if weekdayname(weekday(date(year(currentdate)-1,11,01)-6)) = "Sunday"
Then
dt1:=date(year(currentdate)-1,11,01)-6
Else
if weekdayname(weekday(date(year(currentdate)-1,11,01)-7)) = "Sunday"
Then
dt1:=date(year(currentdate)-1,11,01)-7