AtNotes Übersicht Willkommen Gast. Bitte einloggen oder registrieren.
21.09.21 - 10:30:29
Übersicht Hilfe Regeln Glossar Suche Einloggen Registrieren
News:
Schnellsuche:
+  Das Notes Forum
|-+  Lotus Notes / Domino Sonstiges
| |-+  Projekt Bereich
| | |-+  Help-Desk Applikation !!Help!! (Moderatoren: eknori, Thomas Schulte)
| | | |-+  Escalation - BUG in 1.5.1
« vorheriges nächstes »
Seiten: [1] Nach unten Drucken
Autor Thema: Escalation - BUG in 1.5.1  (Gelesen 1699 mal)
eknori
@Notes Preisträger
Moderator
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 11561


« am: 30.10.06 - 08:24:04 »

Kaum draussen, schon der erste BUG ...

Beim Erstellen der Tabelle für die eskalation wird die Anzahl der zeilen falsch berechnet, wenn man die Option "Gruppierung" verwendet.

Um das problem zu beheben, muss ab Zeile 619 in der class:Escalation der fett gedruckte Eintrag verwendet werden

Zitat
         UniqueRcpt = Me.UniqueItems ( tcol , rcpt )
            Forall r In UniqueRcpt ' Now split this list into single recipients
               Set sCol =  Me.SubCol ( tCol , rcpt, Cstr ( r ) )
               ' sCol contains all Tickets from tCol for a given Recipient "r"
               ' now send the collection sCol to the recipient Cstr (r ) using Template
               Set doc = New NotesDocument ( db ) ' create temp doc
               Set rtItem = New NotesRichTextItem ( doc, DEFAULT_NEW_RT_FIELD)
               Call rtItem.AppendRTItem (Template.GetFirstItem(DEFAULT_NEW_RT_FIELD)) ' Get Template Body
               '********************************************* Create Table START
               ' fixes an error, where the rows are calculated wrong. base for calculation is sCol not tCol   --- START            
               Call rtItem.AppendTable (sCol.Count + 1, columns,,, tableColStyles) ' create table               
               'Call rtItem.AppendTable (rows, columns,,, tableColStyles) ' create table
               ' --- END


Ausserdem werden ab Zeile 645 noch die hard codierten color strings verwendet.

Hier müssen folgende zeilen geändert werden, damit die Farben aus der Konfiguration gezogen werden.

Zitat
               rtTable.Style = TABLESTYLE_TOP
               Set color = s.CreateColorObject ' Create color object for use in setting cell colors
               ' fixed 30.10.2006, Ulrich Krause --- START         
               color.NotesColor = Me.GetColor (TABLE_COLOR_HEADER)
               Call rtTable.SetColor (color) ' Set the top row color to light gray background
               color.NotesColor = Me.GetColor (TABLE_COLOR_ALTERNATE)
               ' --- END

Gespeichert
Seiten: [1] Nach oben Drucken 
« vorheriges nächstes »
Gehe zu:  


Einloggen mit Benutzername, Passwort und Sitzungslänge

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006, Simple Machines Prüfe XHTML 1.0 Prüfe CSS
Impressum Atnotes.de - Powered by Syslords Solutions - Datenschutz | Partner: