Index: APPS/TBXWeb/OrderChecker.cls.xml
===================================================================
diff -u -r1333 -r1381
--- APPS/TBXWeb/OrderChecker.cls.xml (.../OrderChecker.cls.xml) (revision 1333)
+++ APPS/TBXWeb/OrderChecker.cls.xml (.../OrderChecker.cls.xml) (revision 1381)
@@ -54,21 +54,24 @@
Set Source="TBoxWeb"
Set BodyIsStream=1
- Set BodyIsHTML=0
+ Set BodyIsHTML=1
Set Subject="Verzonden TBX-orders niet verwerkt"_$S($L(Source):" ("_Source_")", 1:"")
Set From=$$$SystemMail("TBX OrderChecker")
Set lbTo=$$PiecesToList^vhLib(##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.TBXWeb.OrderChecker_MailTo"),";")
Set BodyStream = ##class(%Library.GlobalCharacterStream).%New()
Do BodyStream.WriteLine("Volgende orders werden nog niet verwerkt via Tandembox website: ")
- Do BodyStream.WriteLine()
+ Do BodyStream.WriteLine("
")
If $D(TabelArray) {
Set TabelStream=$$ArrayToHTMLTable^vhLib(.TabelArray)
Set sc=BodyStream.CopyFrom(TabelStream)
- Set BodyIsHTML=1
}
+ Do BodyStream.WriteLine("
")
+ Do BodyStream.WriteLine($$$Replace($$GetJobInfo^vhLib.System(),$$$CRLF,"
"))
+ Do BodyStream.WriteLine("
")
+
Set sc=$$SendMiniMail^vhLib(From,lbTo,Subject,BodyStream,BodyIsStream,BodyIsHTML)
Quit sc
]]>
Index: vhDeploy/Deploy20110608x0944.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20110608x0944.cls.xml (revision 0)
+++ vhDeploy/Deploy20110608x0944.cls.xml (revision 1381)
@@ -0,0 +1,29 @@
+
+
+
+
+Added by WimV
+1
+svn.Deploy
+0
+
+
+1
+
+
+
+
Index: APPS/OV/OrderAanvraagChecker.cls.xml
===================================================================
diff -u -r1333 -r1381
--- APPS/OV/OrderAanvraagChecker.cls.xml (.../OrderAanvraagChecker.cls.xml) (revision 1333)
+++ APPS/OV/OrderAanvraagChecker.cls.xml (.../OrderAanvraagChecker.cls.xml) (revision 1381)
@@ -54,21 +54,24 @@
Set Source=""
Set BodyIsStream=1
- Set BodyIsHTML=0
+ Set BodyIsHTML=1
Set Subject="Verzonden Orderaanvragen niet verwerkt"_$S($L(Source):" ("_Source_")", 1:"")
Set From=$$$SystemMail("EDI OrderAanvraagChecker")
Set lbTo=$$PiecesToList^vhLib(##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.OV.OrderAanvraagChecker_MailTo"),";")
Set BodyStream = ##class(%Library.GlobalCharacterStream).%New()
Do BodyStream.WriteLine("Volgende Aanvragen werden nog niet verwerkt in ADMIN: ")
- Do BodyStream.WriteLine()
+ Do BodyStream.WriteLine("
")
If $D(TabelArray) {
Set TabelStream=$$ArrayToHTMLTable^vhLib(.TabelArray)
Set sc=BodyStream.CopyFrom(TabelStream)
- Set BodyIsHTML=1
}
+ Do BodyStream.WriteLine("
")
+ Do BodyStream.WriteLine($$$Replace($$GetJobInfo^vhLib.System(),$$$CRLF,"
"))
+ Do BodyStream.WriteLine("
")
+
Set sc=$$SendMiniMail^vhLib(From,lbTo,Subject,BodyStream,BodyIsStream,BodyIsHTML)
Quit sc
]]>
Index: WV GAProduct WWW.prj.xml
===================================================================
diff -u -r1342 -r1381
--- WV GAProduct WWW.prj.xml (.../WV GAProduct WWW.prj.xml) (revision 1342)
+++ WV GAProduct WWW.prj.xml (.../WV GAProduct WWW.prj.xml) (revision 1381)
@@ -1,6 +1,6 @@
-
+
@@ -170,6 +170,7 @@
+