Index: APPS/TRANSP/Transsmart/impl/CommunicatieService/AnnuleerLevering.cls.xml
===================================================================
diff -u -r59862 -r59871
--- APPS/TRANSP/Transsmart/impl/CommunicatieService/AnnuleerLevering.cls.xml	(.../AnnuleerLevering.cls.xml)	(revision 59862)
+++ APPS/TRANSP/Transsmart/impl/CommunicatieService/AnnuleerLevering.cls.xml	(.../AnnuleerLevering.cls.xml)	(revision 59871)
@@ -8,15 +8,13 @@
 	quit:$$$Not(..IsActief())	
 		
 	set itLijstVerzendData = ##class(TECH.ListIterator).%New(..VerzendDataLijst)
-	Do ##class(Tools.Wlip).%New(207).String("count ..VerzendDataLijst " _ ..VerzendDataLijst.Count())
 	while itLijstVerzendData.HasNext() {
 		#dim VerzendData As APPS.TRANSP.Transsmart.data.VerzendData = itLijstVerzendData.Next()
-		Do ##class(Tools.Wlip).%New(207).String(VerzendData)
 		#dim Request as WS.Transsmart.tns.doDeleteBooking = ..RequestBouwer.MaakdoDeleteRequest(VerzendData) // moet de reference gaan bepalen.
 		
 		do ..VerwerkRequest(Request)
 
-		Do ..Levering.VerwijderEnBewaarDistributeurDataID(VerzendData.ID)
+		Do ..Levering.VerwijderEnBewaarDistributeurDataID(VerzendData.GeefID())
 	}
 ]]></Implementation>
 </Method>