Lotus Notes Calendar Help

The Calendar Profile is a special, hidden "configuration" document. Add the following code as an agent in the user's mailbox and run it. It will display all values from the Calendar Profile in a message box. Since there are so many items to display, it only displays 25 at a time. Look for $BusyName in those popups.

Note that the code has a security function to stop users from running it.

	' // if this is an authorized user, we're done
	Dim session As New NotesSession
	
' delete this section if you do not want to restrict this function using a role in the ACL
	Dim v As Variant
	v = Evaluate( {@UserRoles *= "[Admin]"} )
	If (v(0) = "1") Then
		Msgbox "Error: you are not authorized to use this function"
		Exit Sub
	End If
' delete the above section if you do not want to restrict this function using a role in the ACL
	
	
	Dim db As NotesDatabase
	Dim doc As NotesDocument
	Dim x As Variant
	Dim c As Integer
	
	Set db = session.CurrentDatabase
	
	Set db = session.CurrentDatabase
	Set doc = db.GetProfileDocument("CalendarProfile")
	
	Forall items In doc.Items
		c = c + 1		
		x = x + items.name + " - "  + Str$(items.type) + " - " + items.text + Chr$(10)
		
		If c >= 25 Then		
			Msgbox x
			x = ""
			c = 0
		End If
		
	End Forall
	
	If c >= 1 Then		
		Msgbox x
	End If
	

Select allOpen in new window

I am very new to this can you please clarify this and how to exactly perform this.

Anyone??

I doubt very much it's the calendar profile. The message refers to a document that no longer exists. The way a calendar entry is created actually creates at least one more document. There is a parent document that contains all dates a repeated entry appears on, and there's an entry per occurrence. What sometimes happens is that the user accidentally deletes the main document. Then, if the user decides to delete one entry, Notes tries to update the main document. Or something like that. When that linked document cannot be found, execution just stops.

The idea would be to remove the document the dirty way. There will be discrepancies in the database, but they aren't very important.

Just something to try first: can you delete the entry using Ctrl-X ?

Hi Sjef Bosman,

It won't let me attempt that because the item is not present on the user's calendar and the only visibility is when the user goes to free/busy time chart.

(I tried to delete it from there too and can not)