Index: APPS/TBXWeb/impl/HFLBOrderHandler.cls.xml
===================================================================
diff -u -r44 -r613
--- APPS/TBXWeb/impl/HFLBOrderHandler.cls.xml	(.../HFLBOrderHandler.cls.xml)	(revision 44)
+++ APPS/TBXWeb/impl/HFLBOrderHandler.cls.xml	(.../HFLBOrderHandler.cls.xml)	(revision 613)
@@ -72,6 +72,11 @@
 	Set HttpRequest.ContentEncoding = "UTF-8"
 	Do HttpRequest.EntityBody.CopyFrom(Stream)
 	
+	Set lbExtras=""
+	Set lbExtras=lbExtras_$LB("HttpPostServer"_HttpRequest.Server) 
+	Set:($L(..WSOrd.Opmerking1)) lbExtras=lbExtras_$LB("MailComment="_..WSOrd.Opmerking1)
+	Do ##class(cspBasis.GAProdTBox).AddToLog("SUBMIT_ORDER",..GeefOrderDomein(),..WSOrd.KLNummer,"shop="_..Shop,..WSOrd.mID,..Requester,..Taal,,lbExtras)
+
 	If $$$Not(flagTest) Set stPost = HttpRequest.Post("/",0)
 	Else  Set stPost=$$SendMiniMail^vhLib("""HFLB_POSTER"" <AdminTBX@vanhoecke.be>",$lb("ICT_SupportTBX@vanhoecke.be"),"HFLB POST for WSid : "_..WSOrd.%Id(),Stream,1)