Index: APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger.cls.xml
===================================================================
diff -u -r36777 -r36809
--- APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger.cls.xml	(.../Ontvanger.cls.xml)	(revision 36777)
+++ APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger.cls.xml	(.../Ontvanger.cls.xml)	(revision 36809)
@@ -23,13 +23,13 @@
 <Private>1</Private>
 </Property>
 
-<Property name="Bewaarder">
-<Type>APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Bewaarder</Type>
+<Property name="Service">
+<Type>APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Service</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>FileAPI:TECH.File.FileAPI="",FileUtils:TECH.File.FileUtils,XmlCorrelater:TECH.XMLCorrelater,Converteerder:APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Converteerder,Bewaarder:APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Bewaarder</FormalSpec>
+<FormalSpec>FileAPI:TECH.File.FileAPI="",FileUtils:TECH.File.FileUtils,XmlCorrelater:TECH.XMLCorrelater,Converteerder:APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Converteerder,Service:APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Service</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -39,7 +39,7 @@
 	Set ..FileUtils = $$$Inject(FileUtils,##class(TECH.File.impl.FileUtils).%New())
 	set ..XmlCorrelater = $$$Inject(XmlCorrelater,##class(TECH.XMLCorrelater).%New())
 	set ..Converteerder = $$$Inject(Converteerder, ##class(APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Converteerder).%New())
-	set ..Bewaarder = $$$Inject(Bewaarder,##class(APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Bewaarder).%New())
+	set ..Service = $$$Inject(Service,##class(APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Service).%New())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -66,7 +66,7 @@
 	try
 	{
 		Set COASO = ..Converteerder.Converteer(..LeesXMLBestand(BestandVolledigeNaam))
-		Do ..Bewaarder.Bewaar(COASO)
+		Do ..Service.Bewaar(COASO)
 		Do ..KopieerNaarArchiefMap(BestandVolledigeNaam)
 	} 
 	catch