Das Notes Forum

Domino 9 und frühere Versionen => ND8: Administration & Userprobleme => Thema gestartet von: Tode am 27.08.12 - 09:47:01

Titel: Out Of Office: Seltsame Anzeige
Beitrag von: Tode am 27.08.12 - 09:47:01

Folgendes Phänomen:

Server 8.5.2 FP 2, Mailschablone 8.5.2, Clients 8.5.2

Im Konfig- Dokument des Servers ist der OOO- Service aktiviert.

Ein User aktiviert den OOO (Service).
Nach der Rückkehr wird der OOO automatisch deaktiviert und auch per tell router o und im Files- Tab als deaktiviert angezeigt. So weit also alles OK.

ABER: Im Out Of Office Profile ist das Feld "TaskState" immer noch auf "1". Auch der Feld "CurrentStatus" steht auf 1.
Das Feld TaskType steht korrekt auf "2" (für Service).

Der Server erkennt also sauber, dass der OOO deaktiviert ist, es wird alles korrekt verarbeitet. Nur ich als Programmierer kann das nicht erkennen, weil die Felder, die das angeblich steuern, nicht korrekt gesetzt sind. Wenn man von ner externen App erkennen will, ob gerade der OOO aktiv ist, dann ist das ziemlich blöde...

Kann das jemand bestätigen?

Natürlich kann ich -da ich sowieso das OOO- Profil auslese- auch die beiden Datumsfelder auslesen und prüfen, ob heute dazwischen liegt, aber grundsätzlich wäre es interessant zu wissen, woran das liegt...

EDIT: Das mit den Datumsfeldern ist auch ne schlechte Idee... die können ja für heute gesetzt sein, und der OOO trotzdem nicht aktiv...

Titel: Re: Out Of Office: Seltsame Anzeige
Beitrag von: Tode am 27.08.12 - 10:12:34

Antworte ich mir mal selbst: Das scheint "by Design" so zu sein... IBM selbst weiss, das das TaskState- Feld nicht korrekt gesetzt wird, wie folgender Code aus der OutOfOffice- Lib beweist (aufgerufen aus dem QueryOpen des OutOfOffice- Profile):

Code

'**********************************************************
'**                       VALIDATE SERVICE STATUS          				    **
'**********************************************************	
	Public Function IsServiceDisabled() As Integer
		'//  make sure time stamp gets updated on profile note
		
		On Error Goto ErrHandler
		
		IsServiceDisabled = False 
		
		Call GetUITimes()		
		
		Set Me.m_dtNow = New NotesDateTime("")
		Me.m_dtNow.SetNow
		
		If Me.m_noteUIDoc.Document.GetItemValue("dateFirstDayBack")(0) <> "" Then
			Call TIMEGetFromItem("dateFirstDayBack", Me.m_noteUIDoc.Document, Me.m_dtFirstDayBack)
		Else		
			'//for whatever reason, the return date is empty. Let's set to some date in the past, 
			'//so this function can return false, and we can set the Status as Disable.
			Set Me.m_dtFirstDayBack = New notesdatetime(yesterday)		
		End If
		
		'// If Return date is set earlier than Now, Task has to be disabled...
		If Me.m_TaskState = "0" Or (Me.m_dtFirstDayBack.Timedifferencedouble(Me.m_dtNow) < 0_ 
		And Me.m_TaskState = "1") Then		
			IsServiceDisabled = True	
			Exit Function
		End If
		
		Exit Function
ErrHandler:
		Call ProcessError(Cstr( Getthreadinfo(LSI_THREAD_PROC) ), Cstr(Error), Cstr( Getthreadinfo(LSI_THREAD_CALLPROC)), Cstr( Erl ))	
		
	End Function	

muss ich halt die selbe Prüfung in mein eigenes Script einbauen...