Calculate Date - code fragments

Conditions

Date diff

Number

string

First day in month

{DATE} = DateSerial(Year({DATE:Date1}), Month({DATE:Date1}), 1)

{DATE} = DateSerial(Year({DATE:Date1}), (DatePart("q", {DATE:Date1}) - 1) * 3 + 1, 1)

{DATE} = {DATE:Date1} - WeekDay({DATE:Date1}, FirstDayOfWeek) + 1

{DATE} = DateSerial(Year({DATE:Date1}), 1, 1)

{DATE} = DateSerial(Year({DATE:Date1}), Month({DATE:Date1})+1,0)

{DATE} = DateSerial(Year({DATE:Date1}), (DatePart("q", {DATE:Date1}) ) * 3 + , 1)  -1

{DATE} = {DATE:Date1} - Weekday({DATE:Date1}) + 7

{DATE} = DateSerial(Year({DATE:Date1}) , 12, 1)

{DATE:Date} = DateAdd("d", -30, {DATE:Date1})

{DATE:Date} = DateAdd("d", 1, {DATE:Date1})

{DATE:Date} = DateAdd("d", 30, {DATE:Date1})

{DATE:Date1} = Date

{DATE:Date2} = DateAdd("d", 1, Date)

{BOOLEAN:IsLeapYear} = ((Year({DATE:Date1}) Mod 4 = 0) And (Year({DATE:Date1}) Mod 100 <> 0)) Or (Year({DATE:Date1}) Mod 400 = 0)

{BOOLEAN:IsDate} = IsDate({VARIANT})

{BOOLEAN:IsLeapYear} = (({INTEGER:yr} Mod 4 = 0) And ({INTEGER:yr} Mod 100 <> 0)) Or ({INTEGER:yr} Mod 400 = 0)

{INTEGER:DayNumber}=DateDiff("d",CDate("1/1/" & Year({DATE:Date1})),{DATE:Date1}) + 1

{INTEGER:LengthTimeInterval}=DateDiff("d",{DATE:Date1},{DATE:Date2})

{INTEGER:DayInMonth}=Day({DATE})

{INTEGER:Month}=Month({DATE})

{INTEGER:Year}=Year({DATE})

{STRING:Month} = MonthName({BYTE})

{STRING:WeekDay} = WeekDayName({BYTE})