Subject: RE: REPOST: Tuning Web-Apps
Here we go - I hope you don’t get a heart-attack 
<?xml version='1.0' encoding='utf-8'?>
<view name=‘(WebGenehmigt2005)’ xmlns=‘http://www.lotus.com/dxl’ version=‘6.5’
maintenanceversion=‘3.0’ replicaid=‘C1256D7B003A9CBC’ showinmenu=‘false’
publicaccess=‘false’ designerversion=‘6.5’ unreadmarks=‘none’ onopengoto=‘lastopened’
onrefresh=‘displayindicator’ headers=‘simple’ opencollapsed=‘false’ showresponsehierarchy=‘true’
showmargin=‘true’ shrinkrows=‘true’ extendlastcolumn=‘false’ unreadcolor=‘black’
totalscolor=‘gray’ rowlinecount=‘9’ headerlinecount=‘1’ rowspacing=‘1’ treatashtml=‘true’
bgcolor=‘white’ altrowcolor=‘#e3e7fc’ headerbgcolor=‘white’ boldunreadrows=‘false’
evaluateactions=‘false’ allownewdocuments=‘false’ allowcustomizations=‘true’
hidemarginborder=‘false’ marginwidth=‘0px’ marginbgcolor=‘white’ uniquekeys=‘false’
initialbuildrestricted=‘false’ noemptycategories=‘true’>
20041123T105620,89+01
20050629T145141,97+02
20050616T141304,67+02
20050629T145152,77+02
20041123T115354,09+01
CN=Heike Müller/OU=NBG1/O=KQVCN=KQV Template Development/OU=NBG1/O=KQV
CN=KQV Template Development/OU=NBG1/O=KQV<code
event=‘selection’> ((@Contains(Form ; “Antrag”) & genehmigt = “1”) |@Contains(Form ; “Storno”))& @Text(geloescht) != “1” & @Text(@Year(von))=“2005”
<font size=‘9pt’ color=‘navy’ style=‘bold’
name=‘MS Sans Serif’ pitch=‘variable’ truetype=‘false’ familyid=‘20’/><border
width=‘0px 0px 1px’/>
<column sort=‘ascending’ itemname=‘$4’ width=‘7.8750’ resizable=‘true’ separatemultiplevalues=‘true’
sortnoaccent=‘false’ sortnocase=‘true’ flatinr5=‘false’ showaslinks=‘false’
categorized=‘true’ hidden=‘true’ twisties=‘true’><columnheader
<datetimeformat show=‘datetime’
date=‘yearmonthday’ time=‘hourminutesecond’ zone=‘never’/><numberformat format=‘general’
digits=‘0’ punctuated=‘false’ parens=‘false’ percent=‘false’/><formula
@Text(@Year(von))
<column sort=‘ascending’ itemname=‘AntrMail’ width=‘16.3750’ resizable=‘true’
separatemultiplevalues=‘true’ sortnoaccent=‘false’ sortnocase=‘true’ showaslinks=‘false’
hidden=‘true’><datetimeformat
show=‘datetime’ date=‘yearmonthday’ time=‘hourminutesecond’ zone=‘never’/><numberformat
format=‘general’ digits=‘0’ punctuated=‘false’ parens=‘false’ percent=‘false’/><code
event=‘value’>AntrMail
<column sort=‘ascending’ itemname=‘$5’ width=‘7.2500’ resizable=‘true’ separatemultiplevalues=‘false’
sortnoaccent=‘false’ sortnocase=‘true’ showaslinks=‘false’ hidden=‘true’><font
size=‘8pt’/><datetimeformat
show=‘datetime’ date=‘yearmonthday’ time=‘hourminutesecond’ zone=‘never’/><numberformat
format=‘general’ digits=‘0’ punctuated=‘false’ parens=‘false’ percent=‘false’/><code
event=‘value’>@Date(von)
<column itemname=‘$3’ width=‘110.6250’ resizable=‘true’ separatemultiplevalues=‘false’
sortnoaccent=‘false’ sortnocase=‘true’ showaslinks=‘false’><columnheader
<datetimeformat show=‘datetime’
date=‘yearmonthday’ time=‘hourminutesecond’ zone=‘never’/><numberformat format=‘general’
digits=‘0’ punctuated=‘false’ parens=‘false’ percent=‘false’/><formula
Status := @If(geplant = “1” ; “geplant”;
genehmigt = "1" ; "genehmigt";
genehmigt = "0" ; "abgelehnt";
geplant = "" & genehmigt = "" ; "offen" ;
"");
DispIcon := @If(Status = “offen” ; “pk_smilie_gelb_19x20.gif” ;
Status = "genehmigt" ; "pk_smilie_gruen_19x20.gif" ;
Status = "abgelehnt" ; "pk_smilie_rot_19x20.gif" ;
Status = "geplant" ; "px_transparent.gif";
@Contains(Form ; "Storno") ; "px_transparent.gif";
"");
tmpGrund := @If(
Grund=“1”;“0100 Urlaub”;
Grund=“2”;“0915 Gleitzeit/Freizeitausgleich”;
Grund="21";"0901 Ausgleich Samstag";
Grund="22";"0902 Ausgleich Sonntag";
Grund="23";"0916 Sonderurlaub AT";
Grund=“3”;“0210 Krankheit ohne Attest”;
Grund=“31”;“0205 Krankheit untertägig”;
Grund=“4”;“0200 Krankheit mit Attest”;
Grund=“5”;“0360 Sonderurlaub Geburt”;
Grund="51";"0370 Sonderurlaub Hochzeit";
Grund="52";"0380 Sonderurlaub Tod";
Grund="53";"0385 Sonderurlaub schw. Krankheit";
Grund=“6”;“0365 Sonderurlaub Umzug”;
Grund=“7”;“0280 Betriebsunfall / Wegeunfall”;
Grund=“8”;“0620 unbezahlter Urlaub”;
Grund=“81”;“0433 Prüfung”;
Grund=“9”;“0655 Fehlzeit wegen Erkrankung des Kindes”;
Grund=“10”;“0220 Kur (Kurantrag vorlegen)”;
Grund=“11”;“0635 unentschuldigtes Fehlen”;
Grund=“12”;“0410 Dienstgang”;
Grund="121";"0400 Dienstreise";
Grund=“13”;“0420 Seminar”;
Grund="131";"0422 Seminar Sonntag";
Grund="132";"0423 Seminar Reisezeit Sonntag";
Grund="133";"0424 Seminar Reisezeit";
Grund=“9999”;“9999 Sonstiges”;
Grund=“15”;“0480 Telearbeit”;
“”);
REM {Wenn der Status ‘geplant’ ist, wird außerhalb des Kästchens ein Ausrufezeichen eingeblendet};
Ausrufezeichen := @If(geplant = “1” & (@Adjust(@Today ; 0 ; 0 ; 14 ; 0 ; 0 ; 0) >= von);
"<td width=\"199\" align=\"left\"><table><tr><td width=\"7\"></td><td width=\"22\"><img src=\"http://cms.qv.de/intranet/images/piktos/pk_excla_rt_22x22.gif\" width=\"22\" height=\"22\" alt=\"\" border=\"0\"></td> </tr></table></td>" ;
"");
DispGrund := @Middle( tmpGrund ; 5 ; 50);
CMSUrl := “http://cms.qv.de/intranet”;
DocURL:= @If(
geplant = "1" ; "0/" + @Text(@DocumentUniqueID) + "?opendocument";
geplant = "" & genehmigt = "" ; "0/" + @Text(@DocumentUniqueID) + "?opendocument";
"0/" + @Text(@DocumentUniqueID) + "?opendocument");
AntragHTML :=
“[<tr id="ROW"> <td width="596" background="” + CMSUrl + “/images/content/ct_bg_3sp_body_ws_596x1.gif"> <table border="0" cellspacing="0" cellpadding="0"> <tr> <td height="7"></td> </tr> <tr> <td width="7"></td> <td width="22"><img src="” + CMSUrl + “/images/piktos/” + DispIcon + “" width="19" height="20" alt="" border="0"></td> <td width="7"></td> <td width="136" valign="top" ><a href="mailto:” + Antragsteller + “/NBG1/KQV" class="cn0" title="Mail an Antragsteller verfassen">” + AntrMail + “</a></td> <td width="36"></td> <td width="80" valign="top"><a href = "” + DocURL + “" class="cn0" title="Antrag öffnen">” + @Text(@Date(von)) + “</a></td> <td width="36"></td> <td width="80" valign="top" class="content_copytext">” + @Text(@Date(bis)) + “</td> <td width="36"></td> <td width="120" valign="top" class="content_copytext">” + DispGrund + “</td> <td width="7"></td> </tr> </table> </td>” + Ausrufezeichen + “</tr>]”;
StornoHTML :=
“[<tr id="ROW"> <td width="596" background="” + CMSUrl + "/images/content/ct_bg_3sp_body_ws_596x1.gif"> <table border="0" cellspacing="0" cellpadding="0"> <tr> <td height="7"></td> </tr> <tr> <td width="7"></td> <td width="22" height="20" ></td> <td width="47"></td> <td width="408" valign="middle" class="content_copytext">Storno für den Zeitraum vom " + @Text(Stornovon) + " bis zum " + @Text(Stornobis) + “</td> <td width="36"></td> <td width="40" valign="top" ><a href="” + DocUrl + “" class="cn0">Details</a></td> <td width="7"></td> </tr> </table> </td></tr>]”;
@If(
@Contains(Form ; "Antrag") ; AntragHTML;
@Contains(Form ; "Storno") ; StornoHTML;
"")</formula></code></column>
AQC/0IwybkBcE0LCRQCxayXB
/T/C