Index: APPS/VisiDot/impl/EndAfhandelaar.cls.xml
===================================================================
diff -u -r2786 -r2839
--- APPS/VisiDot/impl/EndAfhandelaar.cls.xml	(.../EndAfhandelaar.cls.xml)	(revision 2786)
+++ APPS/VisiDot/impl/EndAfhandelaar.cls.xml	(.../EndAfhandelaar.cls.xml)	(revision 2839)
@@ -47,6 +47,7 @@
 Indien minstens één product niet gerecepteerd kon worden wordt de status $$$ERROR meegegeven.
 Van de niet gerecepteerde producten wordt een errormail verstuurd met duidelijke omschrijving in.
 </Description>
+<Private>1</Private>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set ReturnStatus = $$$OK
@@ -106,10 +107,10 @@
 </Method>
 
 <Method name="ToeleveringIngescand">
+<Private>1</Private>
 <Implementation><![CDATA[
 	Set ReceptieGroepID = "VisiDot"
 	If (..bfrVolgNr '= ""){	
-		Do WLIP^vhDBG(127,"UglyPickingReceptieVolgNr : "_..bfrVolgNr)
 		Set EventData = ##class(BL.MB.UGLYPicking.Events.ToeFinishedEventData).%New("",ReceptieGroepID,..bfrVolgNr)
 		Set Event = ##class(BL.MB.UGLYPicking.Events.ToeFinishedEvent).%New(EventData)
 		Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(Event)