Calendar entries & Blackberry

HCL Domino Domino Forum
1

I have an application that creates calendar entries through script. Those calendar entries do not get synced to my users’ BlackBerries, while their normal calendar entries do.

Does anyone know of a solution?

The ‘Note item not found’ issue has been ‘beat to death’ in this forum, resolved it partially, but it doesn’t help.

Thanks in advance for any suggestions/recommendations.

2

Subject: Calendar entries & Blackberry

How does the script create the entries? Do they have a value in the “form” field?

I’m not sure what criteria the BES looks for to recognise a new doc but I would make sure that the script created docs appear in all the same hidden views as the manual ones.

3

Subject: RE: Calendar entries & Blackberry

Hidden views, hadn’t thought about that…

Here’s a sample of the code the server uses to add the entry to the calendar:

'Open the user’s mail file and add entry

		Set maildb = s.GetDatabase(sername, filename)

		Set caldoc = maildb.CreateDocument

		Dim rtitem As Variant

		'Set rtitem = doc.GetFirstItem("Body")

		'Call rtitem.CopyItemToDocument(caldoc, "Body")

		caldoc.AppointmentType = "0"

		caldoc.Form = "Appointment"

		caldoc.Subject = vactype + " Day"+ " " + vhours + " Hours"

		'caldoc.AppointmentType = "2"

		caldoc.AppointmentType = "0"

		'caldoc.StartDate = doc.vacdate(0)

		'caldoc.EndDate = doc.vacdate(0)

		'caldoc.StartTime = "08:00:00 AM"

		'caldoc.EndTime = "05:00:00 PM"

		'add this line so document would show up in Blackberry

		caldoc.From = doc.CreationUser(0)

		caldoc.Principal = doc.CreationUser(0)

		caldoc.Chair = doc.CreationUser(0)

		caldoc.~$BusyName = doc.CreationUser(0)

		caldoc.~$BusyPriority = "1" 

		'caldoc.StartDateTime = "08:00:00 AM"

		'caldoc.EndDateTime = "05:00:00 PM"

		caldoc.DeliveredDate = "08:00:00 AM"

		Set startdttm = New NotesDateTime(doc.StartDate(0) & " " & doc.StartTime(0)) 

		Set enddttm = New NotesDateTime(doc.StartDate(0) & " " & doc.EndTime(0)) 

		caldoc.StartDateTime = startdttm.LSLocalTime 

		caldoc.StartDate = startdttm.LSLocalTime

		caldoc.StartDate_2 = startdttm.LSLocalTime

		caldoc.EndDateTime = enddttm.LSLocalTime 

		caldoc.EndDate = enddttm.LSLocalTime

		caldoc.EndDate_2 = enddttm.LSLocalTime

		caldoc.StartTime = startdttm.LSLocalTime

		caldoc.StartTime_2 = startdttm.LSLocalTime

		caldoc.tmpStartTime_local = startdttm.LSLocalTime

		caldoc.EndTime = enddttm.LSLocalTime

		caldoc.EndTime_2 = enddttm.LSLocalTime

		caldoc.DispDur_2 = doc.dspDuration

		caldoc.DispDur_1 = doc.dspDuration 

		caldoc.DispDuration_1 = doc.dspDuration

		caldoc.calendarDateTime = startdttm.LSLocalTime

		caldoc.StartTimeZone = "Z=6$DO=1$DL=3 2 1 11 1 1$ZX=22$ZN=Central"

		caldoc.EndTimeZone = "Z=6$DO=1$DL=3 2 1 11 1 1$ZX=22$ZN=Central"

'----------- Set Other Fields ----------------

		caldoc.~$NoPurge = enddttm.LSLocalTime

		caldoc.tmpWasMailed = "1"

		caldoc.MailOptions=""

		caldoc.ExcludeFromView = "D; S"

		caldoc.OrgTable = "C0"

		caldoc.Location = doc.EvtLocation

		Set itemIcon = New NotesItem(caldoc, "_ViewIcon", 160)

		itemIcon.IsSummary = True

		caldoc.Logo = "stdNotesLtr28"

		caldoc.OrgState = "x"

		caldoc.Repeats = ""

		caldoc.Resources = ""

		caldoc.SaveOptions = ""

		caldoc.SequenceNum = "1"
4

Subject: RE: Calendar entries & Blackberry

Hello

Did you manage to solve this? I am having exactly the same problem :frowning:

Thanks

Mark

5

Subject: RE: Calendar entries & Blackberry

Mark,was not able to resolve.

I was able; however, to stop the ‘Note item not found’ message. Course, it serves no purpose, since there is NO real need to open the calendar event anyway.

6

Subject: Calendar entries & Blackberry

Was this ever resolved? I am having a the same problem and want to know how to fix this issue if possible?