Ungereimtheit bei Verwendung von ExcludeFromView

[Bille]

Hallo zusammen!

Ich lasse aus einer Datenbank einen Kalendereintrag erstellen (wir verwenden Notes 6.5.3).

Code

...
	Kaldoc.AppointmentType = "0"
	Kaldoc.ExcludeFromView = "D"
...

Das klappt soweit auch wunderbar. Nur tritt jetzt bei zwei Kollegen das Problem auf, dass die Kalendereinträge auch in der Ansicht "Gesendet" angezeigt werden. Bei allen anderen Kollegen erscheinen die Einträge nicht unter "Gesendet".

Mir sind jetzt Unterschiede in den Dokumenteneigenschaften aufgefallen. Das Feld "ExcludeFromView" enhält jeweils den Wert "D". Allerdings handelt es sich bei den "problembehafteten Kalendereinträgen" um den Datentyp "Textliste" mit Länge 5 Bytes. Bei den "funktionierenden Einträgen" ist es der Datentyp "Text" mit Länge 1 Byte.

Kann mir jemand sagen, warum das so ist, bzw. wie diese unterschiedlichen Werte zustandekommen können.
Die Maildatenbanken verwenden die gleiche Schablone und die Kalendereinträge werden auch jeweils aus der gleichen Funktion aufgerufen.

Gruß
Bille

[klaussal]

Wenn beide Docs tatsächlich mit der gleichen Function erzeugt werden, dürfte es keinen Unterschied geben, ausser die Function macht irgendwo einen Schlenker. Aber mehr sagt mir meine Glaskugel nicht.

[Bille]

Hallo Klaus,

es wird definitiv die gleiche Funktion aufgerufen. Nach meiner Meinung macht diese auch nirgendwo einen Schlenker. Ich hab sie unten mal komplett angehängt.

Code

Sub SY_KalendereintragErstellen(doc As NotesDocument, Benutzer As String, Datum As Variant, ZeitVon As Variant, ZeitBis As Variant)
	Dim s As New NotesSession 
	Dim Vollname As String, x As Variant, y As Variant, dbserver As String, dbfilename As String
	Vollname = SY_NamenTausch(Benutzer) & "/xxxxxx/DE"
	x = SY_DBLookup("names.nsf","($VIMPeople)",Vollname,"MailServer")
	y = SY_DBLookup("names.nsf","($VIMPeople)",Vollname,"MailFile")
	dbfilename = y(0)
	Dim ServerName As New NotesName(x(0))
	dbserver = ServerName.Common
	Dim db As NotesDatabase 
	Set db = s.GetDatabase(dbserver, dbfilename)
	Dim Kaleintrag As String
	Kaleintrag = "TA: " & doc.Personen(0) & " / " & doc.Kundenna(0)
	
	If db.IsOpen Then
		Print "Eintrag in Kalender wird erstellt."
	Else
		Call db.Open(dbserver,dbfilename)
	End If
	Dim Datum1 As Variant, Zeit1 As Variant, Zeit2 As Variant, Beginn As Variant, Ende As Variant 
	Datum1 = Datum
	Zeit1 = ZeitVon
	Zeit2 = ZeitBis
	Beginn = Cdat(Datum & " " & ZeitVon) 
	Ende = Cdat(Datum & " " & ZeitBis)
	
	Dim Kaldoc As NotesDocument 
	Set Kaldoc = db.CreateDocument
	Kaldoc.Form = "Appointment"
	Kaldoc.Subject = Kaleintrag
	Kaldoc.StartDate =   Beginn		
	Kaldoc.EndDate = Ende
	Kaldoc.StartDateTime = Beginn
	Kaldoc.EndDateTime = Ende
	Kaldoc.StartTime = Beginn
	Kaldoc.EndTime = Ende
	Kaldoc.CalendarDateTime = Beginn
	Kaldoc.AppointmentType = "0"
	Kaldoc.ExcludeFromView = "D"
	Kaldoc.Principal = Vollname
	Kaldoc.~$Alarm = 1
	Kaldoc.~$AlarmDescription = Kaleintrag
	Kaldoc.~$AlarmOffset = -15
	Kaldoc.~_ViewIcon = 160
	Kaldoc.~$PublicAccess = "1"
	
	Dim rtitem As NotesRichTextItem
	Set rtitem = Kaldoc.CreateRichTextItem("Body" )
	Call rtitem.AppendText("TA: " & doc.Anlass(0))   
	Call rtitem.AppendText("  -> ")   
	Call rtitem.AppendDocLink(doc, "")
	
	Call Kaldoc.Save(True, False)	
End Sub

[klaussal]

Auch bei "normalen" Kalendereinträgen ist ExcludeFromView eine Textliste wenn mehrere Werte drin stehen oder auch nur ein Textfeld (Länge 1 Byte), wenn nur "D" drin steht. Der Fehler müsste demnach woanders zu suchen sein. 

[Driri]

Hi,

Schuß ins Blaue :

Schau doch mal in den Vorgaben bei den beiden betroffenen Usern nach, was dort unter Kalender/Aufgaben -> Anzeigen im Abschnitt "Kalendereinträge in Mail-Ansichten anzeigen" gesetzt ist. Per Standard ist dort z.B. die Option "Neue Besprechungseinladungen nicht in der Ansicht 'Gesendet' anzeigen" gesetzt.

[Bille]

Nein, die Einstellung in den Vorgaben ist bei den betroffenen Usern gleich. Dh. sowohl bei denen wo's funktioniert, als auch bei denen, wo's nicht klappt ist die o.g. Option angehakt.
Trotzdem danke für den Tipp.

Nochmal wg. der Textliste:
Bei den problemhaften Einträgen steht im Feld ExcludeFromView nur ein "D" drin und trotzdem taucht dort beim Datentyp Textliste auf. Das hat mich einfach irritiert, da bei den funktionierenden Einträgen der Typ nur Text war ...

Hat noch jemand eine Ahnung, wo ich weiter suchen kann?

[Driri]

Es ist meiner Meinung nach sehr schwierig, da über das Forum Support für zu leisten. Das ist ein ziemliches Stochern im Nebel 

Kannst Du das mit einer der betroffenen Maildatenbanken mal an einem anderen Client nachvollziehen ? Somit könnte man evtl. die Maildatenbank als Fehlerquelle ausschließen.

Wenn es wirklich ein Client-Problem ist, würde ich mal das übliche durchprobieren :

- cache.ndk löschen
- desktop komprimieren/löschen
- bookmark.nsf neu erzeugen

[Bille]

Ok, dann werde ich meine Admins mal bitten, diese Schritte durchzuführen.

Danke an Euch für die Tipps!
Bille