Lotus Notes / Domino Sonstiges > Help-Desk Applikation !!Help!!

Help Version 2.0 Beta 1 released ...

<< < (7/12) > >>

Dr.Domino:
LOL! Da reden wir tatsächlich aneinander vorbei ... bie mire sehen diese Zeilen so aus


185   Dim DTCalc As New DateTimeCalculator (EXCLUDE_DAYS,EXCLUDE_DATES,SERVICEHOURS)
186   Dim dt1 As NotesDateTime
187   Set item = me_doc.GetFirstItem( "DateCreated" )
188   Set dt1 = New NotesDateTime ( DTCalc.GetNextBusinessDay(item.Text) )
189   Set item = NewTicket.ReplaceItemValue ("DTCreated", "")
190   Set item.DateTimeValue = dt1   

Womit wir in der Tat wieder bei den Businessdays wären *g*

eknori (retired):
jo, und wenn es kein

187   Set item = me_doc.GetFirstItem( "DateCreated" )

gibt, dann geht der Code eine Zeile später ( 188 ) auf die Bretter.

Also ersetze mal die Zeile 187 durch den folgenden Block

   If me_doc.HasItem ("DateCreated") Then
      Set item = me_doc.GetFirstItem( "DateCreated" )
   Elseif me_doc.HasItem ("ComposedDate") Then
      Set item = me_doc.GetFirstItem( "ComposedDate" ) <-- Zeile 188
   Else
      Set item = me_doc.GetFirstItem( "DeliveredDate" )
   End If

Das, was du da hast ist irgendwie ein uraltes Codeframent

Dr.Domino:
Gemacht ... und löppt ...


Das Code ist aber anscheinend in der "aktuellen" 2.0ß2 auf ONTF so drin :-)

Anyhow, Hauptsache Bug gefunden!

eknori (retired):
Da muss Tim aber einen reichlich alten Stand als Grundlage für den Aufbau der Beta verwendet haben. Ich habe hier mal gesucht und einen Post vom 25.09.07 gefunden, der den Codeblock schon behandelt:

http://atnotes.de/index.php?topic=35075.msg241493#msg241493

Thomas Schulte:
Hmm wir haben die aktuelle 1.6 gezogen extra dafür und dann alles eingebaut. Ich glaub wir müssen dann noch einmal einen Code Review machen. Mist.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete