Index: vhDeploy/Deploy20110706x1055.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20110706x1055.cls.xml	(revision 0)
+++ vhDeploy/Deploy20110706x1055.cls.xml	(revision 1611)
@@ -0,0 +1,44 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.Deploy20110706x1055">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Parameter name="Omschrijving">
+<Default>Overzicht uitgestelde mails</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Kill ^MN("D","MAILVENSTR")
+	Set ^MN("D","MAILVENSTR")="MailVenster`1`"
+	Set ^MN("D","MAILVENSTR","F",1)="Ontvangen`O`K`O`$G(MailTyp)'=""O""`"
+	Set ^MN("D","MAILVENSTR","F",2)="Verzonden`V`K`V`$G(MailTyp)'=""V""`"
+	Set ^MN("D","MAILVENSTR","F",3)="Uitgesteld boekhouding`U`K`U`$G(MailTyp)'=""U"",$$IsGroep^vhUSER(,""3"")``U`"
+	Set ^MN("D","MAILVENSTR","F",4)="&S``B`````"
+	Set ^MN("D","MAILVENSTR","F",5)="Subarchief`A`F`SUBARCH^vhMAIL``"
+	Set ^MN("D","MAILVENSTR","F",6)="&S``B`````"
+	Set ^MN("D","MAILVENSTR","F",7)="Volledig archief``K`A;`$O(^($O(^vhMAIL(""IF"",CUserId,""""))))'=""""`"
+	
+	Kill ^RES("MAIL","LD","DLY")
+	Set ^RES("MAIL","LD","DLY")="Mail`56231,60263```6;1;24`92`P``BU`G`1"
+	Set ^RES("MAIL","LD","DLY","CF")="@`$S($P(sRec,D)=""S"":$S($D(Print):""&S"",1:""&F&S&CªB""_$P(sRec,D,2)_""ªb""),1:""L"")"
+	Set ^RES("MAIL","LD","DLY","CS")="@`$S($P(sRec,D)=""S"":0,1:1)"
+	Set ^RES("MAIL","LD","DLY","F")="@`""^HULP(""_%J_"")"""
+	Set ^RES("MAIL","LD","DLY","HO",1)="T`I`T| Van    | Betreft          | Onderwerp                    | Uitgesteld    |Via"
+	Set ^RES("MAIL","LD","DLY","L","L")="MAIL`DLY"
+
+	Kill ^RES("MAIL","LK","DLY")
+	Set ^RES("MAIL","LK","DLY")="Mail`56231,60263"
+	Set ^RES("MAIL","LK","DLY",1)="Type`Type`1`C`L`1``|``$P(^vhMAIL(""D"",X),D,1)`"
+	Set ^RES("MAIL","LK","DLY",2)="Zender`Zender`1`C`L`8``|``$S($P(^vhMAIL(""D"",X),D,6)[""@"":$P(^vhMAIL(""D"",X),D,6),1:$P(^vhUSER(""D"",$P(^vhMAIL(""D"",X),D,6)),D,2))`"
+	Set ^RES("MAIL","LK","DLY",3)="Betreft`Betreft`1`C`L`18``|``$$FBETREFT^vhMAIL4("""","""",X,1)`"
+	Set ^RES("MAIL","LK","DLY",4)="Onderw`Onderw`1`C`L`30``|``$$ONDERW^vhMAIL4(X)`"
+	Set ^RES("MAIL","LK","DLY",5)="Uitgesteld tot`Uitgesteld tot`1`C`L`15``|``$$FMTDT^vhDTyp($P($G(^vhMAIL(""D"",X,""N"",$P(sFL(1),D,2))),D,5))`"
+	Set ^RES("MAIL","LK","DLY",6)="Uitgesteld door`Uitgesteld door`2`C`L`3````$$USERNAME^vhUSER(X,-1)`"
+]]></Implementation>
+</Method>
+</Class>
+</Export>