Index: WS/Prod/OptiBox/OptiServer.cls.xml
===================================================================
diff -u -r30551 -r30742
--- WS/Prod/OptiBox/OptiServer.cls.xml	(.../OptiServer.cls.xml)	(revision 30551)
+++ WS/Prod/OptiBox/OptiServer.cls.xml	(.../OptiServer.cls.xml)	(revision 30742)
@@ -724,7 +724,6 @@
 	{
 
 		Set WPClassName=##class(BL.PPS.TBX.OptiBox).GetWPClassName(Werkpost)
-			d WLIP^vhDBG(97,"GetWPQueueViaBatchID "_WPClassName)
 		Set:(WPClassName="") pxStatus=$$$pxStatusErrorEx("Onbekende werkpost.",Werkpost)
 		If $$$pxStatusIsOK(pxStatus)
 		{
@@ -735,7 +734,6 @@
 	Else  ; Nieuwe verwerking
 	{
 		#dim WerkpostImpl As APPS.Halux.PPS.Verpakking.KartonWerkpost = ..GeefWerkpostImpl(Werkpost)
-			d WLIP^vhDBG(97,"GetWPQueueViaBatchID impl:"_WerkpostImpl)
 		If (WerkpostImpl = "") {
 			Set pxStatus = $$$pxStatusErrorEx("Onbekende werkpost " _ Werkpost, Werkpost)
 		} Else {