By
Published: 02 Aug 2001
This script finds the last date of the month whether or not the month has 28, 29, 30 or 31 days. The field that holds the date is from the current document and is called "BeginPer." The NotesDateTime variable "endday" is what holds the value of the last date of month.
If Month(uidoc.FieldGetText("BeginPer")) <> 12 Then
nam_dt = (Month(uidoc.FieldGetText("BeginPer"))+1) & "/01/" & Year(uidoc.FieldGetText("BeginPer"))
Else
nam_dt = "01/01/" & (Year(uidoc.FieldGetText("BeginPer")) + 1)
End If
Set endday = New NotesDateTime(nam_dt)
Call endday.AdjustDay(-1)
Dig Deeper on Domino Resources - Part 6