Index: vhTest/Fake/Res/VertalingRepository.cls.xml
===================================================================
diff -u -r62861 -r62933
--- vhTest/Fake/Res/VertalingRepository.cls.xml	(.../VertalingRepository.cls.xml)	(revision 62861)
+++ vhTest/Fake/Res/VertalingRepository.cls.xml	(.../VertalingRepository.cls.xml)	(revision 62933)
@@ -21,6 +21,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAlleVertalingenViaGroep">
+<FormalSpec>Groep:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="Bewaar">
 <FormalSpec>Data:TECH.Persistent</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
Index: WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml
===================================================================
diff -u -r61824 -r62933
--- WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml	(.../GetData.cls.xml)	(revision 61824)
+++ WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml	(.../GetData.cls.xml)	(revision 62933)
@@ -1,41 +1,52 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WSimpl.PM.Perfion.Vertaling.DataService.GetData">
-<Super>TECH.RegisteredObject</Super>
+<Super>TECH.Mockable</Super>
 
 <Property name="PerfionDataService">
 <Type>WS.PM.Perfion.Vertaling.DataService.GetData</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="Logger">
+<Type>vhLib.Logger</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>PerfionDataService:WS.PM.Perfion.Vertaling.DataService.GetData=""</FormalSpec>
+<FormalSpec>PerfionDataService:WS.PM.Perfion.Vertaling.DataService.GetData="",Logger:vhLib.Logger=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..PerfionDataService = $$$Inject(PerfionDataService,##class(WS.PM.Perfion.Vertaling.DataService.GetData).%New())
+	Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVertalingenMetGroep">
+<FormalSpec>Groep:%String</FormalSpec>
+<ReturnType>%GlobalCharacterStream</ReturnType>
+<Implementation><![CDATA[
+	Do ..Logger.Info("Vertalingen opvragen aan Perfion met groep: "_Groep)
+	Set VertalingenLijst = ##class(%ListOfDataTypes).%New()
+	#dim XmlQuery As %String = ..GeefXmlQueryVoorVertalingen(Groep)
+	#dim VertalingenResult As %GlobalCharacterStream = ..PerfionDataService.ExecuteQuery(XmlQuery)
+
+	Do ##class(TECH.StreamUtils).Replace(VertalingenResult," encoding=""utf-8"""," encoding=""ISO-8859-1""")
+	Quit VertalingenResult
+]]></Implementation>
+</Method>
+
 <Method name="GeefVertalingen">
 <ReturnType>%GlobalCharacterStream</ReturnType>
 <Implementation><![CDATA[
 	Set VertalingenLijst = ##class(%ListOfDataTypes).%New()
 	#dim XmlQuery As %String = ..GeefXmlQueryVoorVertalingen()
 	#dim VertalingenResult As %GlobalCharacterStream = ..PerfionDataService.ExecuteQuery(XmlQuery)
-	
-	/*
-	Try {
-		Set ..Shop = Shop 
-	} Catch {
-		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-		#dim Message As %String = "Unable to confirm order. (EDINr: "_EDInr_")"_$$$CRLF
-		;Do ##class(TECH.ExceptionHandler).Rethrow(NewException)
-	}
-	*/
+
 	Do ##class(TECH.StreamUtils).Replace(VertalingenResult," encoding=""utf-8"""," encoding=""ISO-8859-1""")
 	Quit VertalingenResult
 ]]></Implementation>
@@ -54,10 +65,15 @@
 </Method>
 
 <Method name="GeefXmlQueryVoorVertalingen">
+<FormalSpec>Groep:%String=""</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Quit "<Query> <Select languages='IND'> <Feature id='Vertalingsgroep' /> <Feature id='Vertalingstypes' /> <Feature id='KeyVertalingssleutel' /> <Feature id='VertalingDA' /> <Feature id='VertalingDE' /> <Feature id='VertalingEN' /> <Feature id='VertalingES' /> <Feature id='VertalingFR' /> <Feature id='VertalingIT' /> <Feature id='VertalingNL' /> <Feature id='VertalingNO' /> </Select> <From id ='Vertalingssleutel'/> <Where>      <Clause id='Vertalingsgroep' operator='in'> <Value>TT</Value> <Value>ALG</Value>  </Clause></Where></Query>"
+	If (##class(TECH.StringUtils).IsEmpty(Groep)) {
+		Quit "<Query> <Select languages='IND'> <Feature id='Vertalingsgroep' /> <Feature id='Vertalingstypes' /> <Feature id='KeyVertalingssleutel' /> <Feature id='VertalingDA' /> <Feature id='VertalingDE' /> <Feature id='VertalingEN' /> <Feature id='VertalingES' /> <Feature id='VertalingFR' /> <Feature id='VertalingIT' /> <Feature id='VertalingNL' /> <Feature id='VertalingNO' /> </Select> <From id ='Vertalingssleutel'/> <Where>      <Clause id='Vertalingsgroep' operator='in'> <Value>TT</Value> <Value>ALG</Value>  </Clause></Where></Query>"
+	} Else {
+		Quit "<Query> <Select languages='IND'> <Feature id='Vertalingsgroep' /> <Feature id='Vertalingstypes' /> <Feature id='KeyVertalingssleutel' /> <Feature id='VertalingDA' /> <Feature id='VertalingDE' /> <Feature id='VertalingEN' /> <Feature id='VertalingES' /> <Feature id='VertalingFR' /> <Feature id='VertalingIT' /> <Feature id='VertalingNL' /> <Feature id='VertalingNO' /> </Select> <From id ='Vertalingssleutel'/> <Where>      <Clause id='Vertalingsgroep' operator='in'>"_"<Value>"_Groep_"</Value>"_"  </Clause></Where></Query>"
+	}
 	;Quit "<Query> <Select languages='IND'> <Feature id='Vertalingsgroep' /> <Feature id='Vertalingstypes' /> <Feature id='KeyVertalingssleutel' /> <Feature id='VertalingDA' /> <Feature id='VertalingDE' /> <Feature id='VertalingEN' /> <Feature id='VertalingES' /> <Feature id='VertalingFR' /> <Feature id='VertalingIT' /> <Feature id='VertalingNL' /> <Feature id='VertalingNO' /> </Select> <From id ='Vertalingssleutel'/></Query>"
 ]]></Implementation>
 </Method>
Index: vhTest/Fake/Res/Perfion/Synchroniser/VertalingenParser.cls.xml
===================================================================
diff -u
--- vhTest/Fake/Res/Perfion/Synchroniser/VertalingenParser.cls.xml	(revision 0)
+++ vhTest/Fake/Res/Perfion/Synchroniser/VertalingenParser.cls.xml	(revision 62933)
@@ -0,0 +1,65 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.Res.Perfion.Synchroniser.VertalingenParser">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>Res.Perfion.Synchroniser.VertalingenParser</Super>
+
+<Method name="GeefVertalingenLijst">
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="ReadStream">
+<FormalSpec>Stream:%GlobalCharacterStream</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="ResetDto">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="characters">
+<FormalSpec>chars:%Library.String,length:%Library.Integer</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="endDocument">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="endElement">
+<FormalSpec>uri:%String,localname:%String,qname:%String,attrs:%List</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="error">
+<FormalSpec>error:%Library.String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="fatalError">
+<FormalSpec>fatalerror:%Library.String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="startElement">
+<FormalSpec>uri:%String,localname:%String,qname:%String,attrs:%List</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/Res/Perfion/Synchroniser/VertalingenParser.cls.xml
===================================================================
diff -u
--- vhTest/Mock/Res/Perfion/Synchroniser/VertalingenParser.cls.xml	(revision 0)
+++ vhTest/Mock/Res/Perfion/Synchroniser/VertalingenParser.cls.xml	(revision 62933)
@@ -0,0 +1,73 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>Res.Perfion.Synchroniser.VertalingenParser,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="%OnNew">
+<FormalSpec>initvalue:%CacheString</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefVertalingenLijst">
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVertalingenLijst")
+]]></Implementation>
+</Method>
+
+<Method name="ReadStream">
+<FormalSpec>Stream:%GlobalCharacterStream</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("ReadStream",Stream)
+]]></Implementation>
+</Method>
+
+<Method name="ResetDto">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ResetDto")
+]]></Implementation>
+</Method>
+
+<Method name="characters">
+<FormalSpec>chars:%Library.String,length:%Library.Integer</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("characters",chars,length)
+]]></Implementation>
+</Method>
+
+<Method name="endDocument">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("endDocument")
+]]></Implementation>
+</Method>
+
+<Method name="endElement">
+<FormalSpec>uri:%String,localname:%String,qname:%String,attrs:%List</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("endElement",uri,localname,qname,attrs)
+]]></Implementation>
+</Method>
+
+<Method name="error">
+<FormalSpec>error:%Library.String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("error",error)
+]]></Implementation>
+</Method>
+
+<Method name="fatalError">
+<FormalSpec>fatalerror:%Library.String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("fatalError",fatalerror)
+]]></Implementation>
+</Method>
+
+<Method name="startElement">
+<FormalSpec>uri:%String,localname:%String,qname:%String,attrs:%List</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("startElement",uri,localname,qname,attrs)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: Res/Perfion/Synchroniser/PerfionRepository.cls.xml
===================================================================
diff -u -r61838 -r62933
--- Res/Perfion/Synchroniser/PerfionRepository.cls.xml	(.../PerfionRepository.cls.xml)	(revision 61838)
+++ Res/Perfion/Synchroniser/PerfionRepository.cls.xml	(.../PerfionRepository.cls.xml)	(revision 62933)
@@ -24,10 +24,20 @@
 <FormalSpec>Sleutel:%String</FormalSpec>
 <ReturnType>TECH.Persistent</ReturnType>
 <Implementation><![CDATA[
-	Do ..VerwijderViaID(Sleutel)
-	Do ..VerwijderViaID(##class(TECH.StringUtils).ToLower(Sleutel))
+	If (..BestaatViaID(Sleutel)) {
+		Do ..VerwijderViaID(Sleutel)
+	} ElseIf (..BestaatViaID(##class(TECH.StringUtils).ToLower(Sleutel))) {
+		Do ..VerwijderViaID(##class(TECH.StringUtils).ToLower(Sleutel))
+	}
 ]]></Implementation>
 </Method>
+
+<Method name="BestaatViaSleutel">
+<FormalSpec>Sleutel:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..BestaatViaID(Sleutel)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Mock/Res/VertalingRepository.cls.xml
===================================================================
diff -u -r61838 -r62933
--- vhTest/Mock/Res/VertalingRepository.cls.xml	(.../VertalingRepository.cls.xml)	(revision 61838)
+++ vhTest/Mock/Res/VertalingRepository.cls.xml	(.../VertalingRepository.cls.xml)	(revision 62933)
@@ -42,9 +42,10 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefAlleVertalingenVoorPerfion">
+<Method name="GeefAlleVertalingenViaGroep">
+<FormalSpec>Groep:%String</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefAlleVertalingenVoorPerfion")
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefAlleVertalingenViaGroep",Groep)
 ]]></Implementation>
 </Method>
 
Index: Res/VertalingRepository.cls.xml
===================================================================
diff -u -r62862 -r62933
--- Res/VertalingRepository.cls.xml	(.../VertalingRepository.cls.xml)	(revision 62862)
+++ Res/VertalingRepository.cls.xml	(.../VertalingRepository.cls.xml)	(revision 62933)
@@ -22,9 +22,10 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefAlleVertalingenVoorPerfion">
+<Method name="GeefAlleVertalingenViaGroep">
+<FormalSpec>Groep:%String</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
-<Implementation><![CDATA[	 Quit ..ZoekViaFilter("Groep = ? OR Groep = ?", $ListBuild("ALG", "TT"))
+<Implementation><![CDATA[	 Quit ..ZoekViaFilter("Groep = ?", $ListBuild(Groep))
 ]]></Implementation>
 </Method>
 
Index: Res/Perfion/Synchroniser/VertalingenParser.cls.xml
===================================================================
diff -u -r61846 -r62933
--- Res/Perfion/Synchroniser/VertalingenParser.cls.xml	(.../VertalingenParser.cls.xml)	(revision 61846)
+++ Res/Perfion/Synchroniser/VertalingenParser.cls.xml	(.../VertalingenParser.cls.xml)	(revision 62933)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="Res.Perfion.Synchroniser.VertalingenParser">
-<Super>%XML.SAX.ContentHandler,TECH.RegisteredObject</Super>
+<Super>%XML.SAX.ContentHandler,TECH.Mockable</Super>
 
 <Property name="PerfionVertalingen">
 <Type>Res.Perfion.Synchroniser.VertalingDTO</Type>
Index: vhTest/Mock/WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml	(revision 0)
+++ vhTest/Mock/WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml	(revision 62933)
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.PM.Perfion.Vertaling.DataService.GetData,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="%OnNew">
+<FormalSpec>PerfionDataService:WS.PM.Perfion.Vertaling.DataService.GetData="",Logger:vhLib.Logger=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefBeschikbareTalen">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefBeschikbareTalen")
+]]></Implementation>
+</Method>
+
+<Method name="GeefVertalingen">
+<ReturnType>%GlobalCharacterStream</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVertalingen")
+]]></Implementation>
+</Method>
+
+<Method name="GeefVertalingenMetGroep">
+<FormalSpec>Groep:%String</FormalSpec>
+<ReturnType>%GlobalCharacterStream</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVertalingenMetGroep",Groep)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml	(revision 0)
+++ vhTest/Fake/WSimpl/PM/Perfion/Vertaling/DataService/GetData.cls.xml	(revision 62933)
@@ -0,0 +1,37 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSimpl.PM.Perfion.Vertaling.DataService.GetData">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.PM.Perfion.Vertaling.DataService.GetData</Super>
+
+<Method name="GeefBeschikbareTalen">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefVertalingGroep">
+<FormalSpec>Groep:%String</FormalSpec>
+<ReturnType>%GlobalCharacterStream</ReturnType>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="GeefVertalingenMetGroep">
+<FormalSpec>Groep:%String</FormalSpec>
+<ReturnType>%GlobalCharacterStream</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefVertalingen">
+<ReturnType>%GlobalCharacterStream</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: Res/Perfion/Synchroniser/Vertalingen.cls.xml
===================================================================
diff -u -r62862 -r62933
--- Res/Perfion/Synchroniser/Vertalingen.cls.xml	(.../Vertalingen.cls.xml)	(revision 62862)
+++ Res/Perfion/Synchroniser/Vertalingen.cls.xml	(.../Vertalingen.cls.xml)	(revision 62933)
@@ -55,38 +55,65 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkVertalingsGroep">
+<FormalSpec>Groep:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ..Logger.Info("Starten met verwerken vertalingen met groep: "_Groep)
+	
+	Try {
+		Do ##class(Res.Perfion.Synchroniser.Perfion).%DeleteExtent()
+		Set ..VertalingenStream = ..VertalingenService.GeefVertalingenMetGroep(Groep)
+		Do ..VertalingenParser.ReadStream(..VertalingenStream)
+		#dim PerfionVertalingen As list Of Res.Perfion.Synchroniser.VertalingDTO = ..VertalingenParser.GeefVertalingenLijst()
+		Do ..VulPerfionTabel(Groep)
+		Do ..VoegToeVertalingen(PerfionVertalingen)
+		Do ..SynchroniseerVertalingen()
+	} Catch {
+		#dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do ..Logger.LogEnMailExceptie(Exceptie, "Er is een fout opgetreden bij het synchroniseren van vertalingen")
+		Do ##class(TECH.ExceptionHandler).Rethrow(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkVertalingen">
 <Implementation><![CDATA[
+	Do ..Logger.Info("Starten met verwerken vertalingen")
+	
 	Do ##class(Res.Perfion.Synchroniser.Perfion).%DeleteExtent()
 	Set ..VertalingenStream = ..VertalingenService.GeefVertalingen()
 	Do ..VertalingenParser.ReadStream(..VertalingenStream)
 	#dim PerfionVertalingen As list Of Res.Perfion.Synchroniser.VertalingDTO = ..VertalingenParser.GeefVertalingenLijst()
+	Do ##class(Tools.Wlip).%New(252).ListOfObjectsToText(PerfionVertalingen)
 	Do ..VulPerfionTabel()
 	Do ..VoegToeVertalingen(PerfionVertalingen)
 	Do ..SynchroniseerVertalingen()
 ]]></Implementation>
 </Method>
 
 <Method name="VulPerfionTabel">
+<FormalSpec>Groep:%String</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
-	#dim VertalingenIterator As TECH.Iterator = ..VertalingRepository.GeefAlleVertalingenVoorPerfion()
-	
+	Do ..Logger.Info("Vullen van de perfion tabel")
+
+	#dim VertalingenIterator As TECH.Iterator = ..VertalingRepository.GeefAlleVertalingenViaGroep(Groep)
 	While (VertalingenIterator.HasNext()) 
 	{
 		#dim Vertaling As Res.Vertaling = VertalingenIterator.Next()
-		Try {
+		If ($$$Not(..PerfionRepository.BestaatViaSleutel(Vertaling.Intern))) {
 			Do ..PerfionRepository.MaakSleutelVoorPerfion(Vertaling.Intern)	
-		} Catch {
-			#dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-			Do ..Logger.LogExceptie(Exceptie)
 		}
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="VoegToeVertalingen">
 <FormalSpec>PerfionVertalingen:TECH.ListOfObjects</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
+	Do ..Logger.Info("Vertalingen toevoegen aan Perfion tabel")
+	
 	#dim VertalingObject As Res.Perfion.Synchroniser.VertalingDTO
 	#dim Vertaling As %String
 	#dim Taal As %String 
@@ -101,11 +128,8 @@
 		Set Groep = VertalingObject.VertalingsGroep
 		Set Type = VertalingObject.VertalingsType
 		Set Sleutel = VertalingObject.Sleutel
-		Try {
+		If (..PerfionRepository.BestaatViaID(Sleutel)) {
 			Do ..PerfionRepository.VerwijderViaSleutel(Sleutel)	
-		} Catch {
-			#dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-			Do ..Logger.LogExceptie(Exceptie)
 		}
 		
 		#dim VertalingenIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(VertalingObject.Vertalingen)
@@ -120,18 +144,17 @@
 </Method>
 
 <Method name="SynchroniseerVertalingen">
+<Private>1</Private>
 <Implementation><![CDATA[
+	Do ..Logger.Info("Synchroniseren van de perfion tabel met de vertalingen tabel")
+	
  	;Do ..VertalingRepository.WijzigOfMaakVertaling("test","test","test","test","test")
  	#dim PerfionIterator As TECH.Iterator = ..PerfionRepository.ZoekAlle()
  	
  	While (PerfionIterator.HasNext()) 
  	{
 		#dim Perfion As Res.Perfion.Synchroniser.Perfion = PerfionIterator.Next()
-		Try {
-			Do ..VertalingRepository.VerwijderVertalingViaSleutel(Perfion.Sleutel)	
-		} Catch {
-			#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-		}
+		Do ..VertalingRepository.VerwijderVertalingViaSleutel(Perfion.Sleutel)	
 	}
 ]]></Implementation>
 </Method>
Index: vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VerwerkVertalingsGroep/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VerwerkVertalingsGroep/Test.cls.xml	(revision 0)
+++ vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VerwerkVertalingsGroep/Test.cls.xml	(revision 62933)
@@ -0,0 +1,266 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.Res.Perfion.Synchroniser.Vertalingen.VerwerkVertalingsGroep.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test met Geen PerfionVertalingObjecten">
+<Implementation><![CDATA[
+		Set MockVertalingRepository = ##class(vhTest.Mock.Res.VertalingRepository).%New()
+		Set MockPerfionRepository = ##class(vhTest.Mock.Res.Perfion.Synchroniser.PerfionRepository).%New()
+		Set MockTaalConverter =  ##class(vhTest.Mock.Res.Perfion.Synchroniser.TaalConverter).%New()
+		Set MockVertalingParser = ##class(vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser).%New()
+		Set MockVertalingService = ##class(vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData).%New()
+		
+		Set VertalingenStream = ##class(%GlobalCharacterStream).%New()
+		#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(0)
+		#dim VertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Vertaling).MaakVertalingIterator(0)
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Perfion).MaakPerfionIterator(0)
+		
+		Do MockVertalingParser.VerwachtMethodCall("GeefVertalingenLijst").DanReturn(PerfionVertalingenLijst)
+		Do MockVertalingParser.VerwachtMethodCall("ReadStream", $$$ElkeWaarde).DanDoeNiks()
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal").ExactAantalKeer(0).DanReturn("TestTaal")
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(0)
+		Do MockVertalingRepository.VerwachtMethodCall("GeefAlleVertalingenViaGroep","Groep").DanReturn(VertalingenIterator)
+		Do MockVertalingRepository.VerwachtMethodCall("VerwijderVertalingViaSleutel","TestSleutel").ExactAantalKeer(0)
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(0)
+		Do MockPerfionRepository.VerwachtMethodCall("MaakSleutelVoorPerfion",$$$ElkeWaarde).ExactAantalKeer(0)	
+		Do MockPerfionRepository.VerwachtMethodCall("ZoekAlle").DanReturn(PerfionVertalingenIterator)
+		Do MockVertalingService.VerwachtMethodCall("GeefVertalingenMetGroep","Groep").DanReturn(VertalingenStream)
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(MockVertalingParser,MockVertalingService,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VerwerkVertalingsGroep("Groep")
+		
+		Do MockVertalingService.Verifieer()
+		Do MockVertalingParser.Verifieer()
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met 1 PerfionVertalingObject">
+<Implementation><![CDATA[
+		Set MockVertalingRepository = ##class(vhTest.Mock.Res.VertalingRepository).%New()
+		Set MockPerfionRepository = ##class(vhTest.Mock.Res.Perfion.Synchroniser.PerfionRepository).%New()
+		Set MockTaalConverter =  ##class(vhTest.Mock.Res.Perfion.Synchroniser.TaalConverter).%New()
+		Set MockVertalingParser = ##class(vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser).%New()
+		Set MockVertalingService = ##class(vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData).%New()
+		
+		Set VertalingenStream = ##class(%GlobalCharacterStream).%New()
+		#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(1)
+		#dim VertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Vertaling).MaakVertalingIterator(1)
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Perfion).MaakPerfionIterator(1)
+		
+		Do MockVertalingParser.VerwachtMethodCall("GeefVertalingenLijst").DanReturn(PerfionVertalingenLijst)
+		Do MockVertalingParser.VerwachtMethodCall("ReadStream", $$$ElkeWaarde).DanDoeNiks()
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(1).DanReturn("TestTaal")
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(1)
+		Do MockVertalingRepository.VerwachtMethodCall("GeefAlleVertalingenViaGroep","Groep").DanReturn(VertalingenIterator)
+		Do MockVertalingRepository.VerwachtMethodCall("VerwijderVertalingViaSleutel","TestSleutel").ExactAantalKeer(1)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaSleutel", "TestSleutel").DanReturn($$$False)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaID", "TestSleutel").DanReturn($$$True)
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(1)
+		Do MockPerfionRepository.VerwachtMethodCall("MaakSleutelVoorPerfion",$$$ElkeWaarde).ExactAantalKeer(1)	
+		Do MockPerfionRepository.VerwachtMethodCall("ZoekAlle").DanReturn(PerfionVertalingenIterator)
+		Do MockVertalingService.VerwachtMethodCall("GeefVertalingenMetGroep","Groep").DanReturn(VertalingenStream)
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(MockVertalingParser,MockVertalingService,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VerwerkVertalingsGroep("Groep")
+		
+		Do MockVertalingService.Verifieer()
+		Do MockVertalingParser.Verifieer()
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met 1 PerfionVertalingObject maar zonder vertaling">
+<Implementation><![CDATA[
+		Set MockVertalingRepository = ##class(vhTest.Mock.Res.VertalingRepository).%New()
+		Set MockPerfionRepository = ##class(vhTest.Mock.Res.Perfion.Synchroniser.PerfionRepository).%New()
+		Set MockTaalConverter =  ##class(vhTest.Mock.Res.Perfion.Synchroniser.TaalConverter).%New()
+		Set MockVertalingParser = ##class(vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser).%New()
+		Set MockVertalingService = ##class(vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData).%New()
+		
+		Set VertalingenStream = ##class(%GlobalCharacterStream).%New()
+		#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(1,0)
+		#dim VertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Vertaling).MaakVertalingIterator(1)
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Perfion).MaakPerfionIterator(1)
+		
+		Do MockVertalingParser.VerwachtMethodCall("GeefVertalingenLijst").DanReturn(PerfionVertalingenLijst)
+		Do MockVertalingParser.VerwachtMethodCall("ReadStream", $$$ElkeWaarde).DanDoeNiks()
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(0).DanReturn("TestTaal")
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(0)
+		Do MockVertalingRepository.VerwachtMethodCall("GeefAlleVertalingenViaGroep","Groep").DanReturn(VertalingenIterator)
+		Do MockVertalingRepository.VerwachtMethodCall("VerwijderVertalingViaSleutel","TestSleutel").ExactAantalKeer(1)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaSleutel", "TestSleutel").DanReturn($$$False)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaID", "TestSleutel").DanReturn($$$True)
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(1)
+		Do MockPerfionRepository.VerwachtMethodCall("MaakSleutelVoorPerfion",$$$ElkeWaarde).ExactAantalKeer(1)	
+		Do MockPerfionRepository.VerwachtMethodCall("ZoekAlle").DanReturn(PerfionVertalingenIterator)
+		Do MockVertalingService.VerwachtMethodCall("GeefVertalingenMetGroep","Groep").DanReturn(VertalingenStream)
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(MockVertalingParser,MockVertalingService,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VerwerkVertalingsGroep("Groep")
+		
+		Do MockVertalingService.Verifieer()
+		Do MockVertalingParser.Verifieer()
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met 1 PerfionVertalingObject met meerdere vertalingen">
+<Implementation><![CDATA[
+		Set MockVertalingRepository = ##class(vhTest.Mock.Res.VertalingRepository).%New()
+		Set MockPerfionRepository = ##class(vhTest.Mock.Res.Perfion.Synchroniser.PerfionRepository).%New()
+		Set MockTaalConverter =  ##class(vhTest.Mock.Res.Perfion.Synchroniser.TaalConverter).%New()
+		Set MockVertalingParser = ##class(vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser).%New()
+		Set MockVertalingService = ##class(vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData).%New()
+		
+		Set VertalingenStream = ##class(%GlobalCharacterStream).%New()
+		#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(1,2)
+		#dim VertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Vertaling).MaakVertalingIterator(1)
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Perfion).MaakPerfionIterator(1)
+		
+		Do MockVertalingParser.VerwachtMethodCall("GeefVertalingenLijst").DanReturn(PerfionVertalingenLijst)
+		Do MockVertalingParser.VerwachtMethodCall("ReadStream", $$$ElkeWaarde).DanDoeNiks()
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(1).DanReturn("TestTaal")
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal2").ExactAantalKeer(1).DanReturn("TestTaal")
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(2)
+		Do MockVertalingRepository.VerwachtMethodCall("GeefAlleVertalingenViaGroep","Groep").DanReturn(VertalingenIterator)
+		Do MockVertalingRepository.VerwachtMethodCall("VerwijderVertalingViaSleutel","TestSleutel").ExactAantalKeer(1)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaSleutel", "TestSleutel").DanReturn($$$False)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaID", "TestSleutel").DanReturn($$$True)
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(1)
+		Do MockPerfionRepository.VerwachtMethodCall("MaakSleutelVoorPerfion",$$$ElkeWaarde).ExactAantalKeer(1)	
+		Do MockPerfionRepository.VerwachtMethodCall("ZoekAlle").DanReturn(PerfionVertalingenIterator)
+		Do MockVertalingService.VerwachtMethodCall("GeefVertalingenMetGroep","Groep").DanReturn(VertalingenStream)
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(MockVertalingParser,MockVertalingService,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VerwerkVertalingsGroep("Groep")
+		
+		Do MockVertalingService.Verifieer()
+		Do MockVertalingParser.Verifieer()
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met meerdere PerfionVertalingObjecten">
+<Implementation><![CDATA[
+		Set MockVertalingRepository = ##class(vhTest.Mock.Res.VertalingRepository).%New()
+		Set MockPerfionRepository = ##class(vhTest.Mock.Res.Perfion.Synchroniser.PerfionRepository).%New()
+		Set MockTaalConverter =  ##class(vhTest.Mock.Res.Perfion.Synchroniser.TaalConverter).%New()
+		Set MockVertalingParser = ##class(vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser).%New()
+		Set MockVertalingService = ##class(vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData).%New()
+		
+		Set VertalingenStream = ##class(%GlobalCharacterStream).%New()
+		#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(2)
+		#dim VertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Vertaling).MaakVertalingIterator(2)
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Perfion).MaakPerfionIterator(2)
+		
+		Do MockVertalingParser.VerwachtMethodCall("GeefVertalingenLijst").DanReturn(PerfionVertalingenLijst)
+		Do MockVertalingParser.VerwachtMethodCall("ReadStream", $$$ElkeWaarde).DanDoeNiks()
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(2).DanReturn("TestTaal")
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(2)
+		Do MockVertalingRepository.VerwachtMethodCall("GeefAlleVertalingenViaGroep","Groep").DanReturn(VertalingenIterator)
+		Do MockVertalingRepository.VerwachtMethodCall("VerwijderVertalingViaSleutel","TestSleutel").ExactAantalKeer(2)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaSleutel", "TestSleutel").DanReturn($$$False)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaID", "TestSleutel").DanReturn($$$True)
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(2)
+		Do MockPerfionRepository.VerwachtMethodCall("MaakSleutelVoorPerfion",$$$ElkeWaarde).ExactAantalKeer(2)	
+		Do MockPerfionRepository.VerwachtMethodCall("ZoekAlle").DanReturn(PerfionVertalingenIterator)
+		Do MockVertalingService.VerwachtMethodCall("GeefVertalingenMetGroep","Groep").DanReturn(VertalingenStream)
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(MockVertalingParser,MockVertalingService,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VerwerkVertalingsGroep("Groep")
+		
+		Do MockVertalingService.Verifieer()
+		Do MockVertalingParser.Verifieer()
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met meerdere PerfionVertalingObjecten en 1 vertaling">
+<Implementation><![CDATA[
+		Set MockVertalingRepository = ##class(vhTest.Mock.Res.VertalingRepository).%New()
+		Set MockPerfionRepository = ##class(vhTest.Mock.Res.Perfion.Synchroniser.PerfionRepository).%New()
+		Set MockTaalConverter =  ##class(vhTest.Mock.Res.Perfion.Synchroniser.TaalConverter).%New()
+		Set MockVertalingParser = ##class(vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser).%New()
+		Set MockVertalingService = ##class(vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData).%New()
+		
+		Set VertalingenStream = ##class(%GlobalCharacterStream).%New()
+		#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(2,1)
+		#dim VertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Vertaling).MaakVertalingIterator(2)
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Perfion).MaakPerfionIterator(2)
+		
+		Do MockVertalingParser.VerwachtMethodCall("GeefVertalingenLijst").DanReturn(PerfionVertalingenLijst)
+		Do MockVertalingParser.VerwachtMethodCall("ReadStream", $$$ElkeWaarde).DanDoeNiks()
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(2).DanReturn("TestTaal")
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(2)
+		Do MockVertalingRepository.VerwachtMethodCall("GeefAlleVertalingenViaGroep","Groep").DanReturn(VertalingenIterator)
+		Do MockVertalingRepository.VerwachtMethodCall("VerwijderVertalingViaSleutel","TestSleutel").ExactAantalKeer(2)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaSleutel", "TestSleutel").DanReturn($$$False)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaID", "TestSleutel").DanReturn($$$True)
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(2)
+		Do MockPerfionRepository.VerwachtMethodCall("MaakSleutelVoorPerfion",$$$ElkeWaarde).ExactAantalKeer(2)	
+		Do MockPerfionRepository.VerwachtMethodCall("ZoekAlle").DanReturn(PerfionVertalingenIterator)
+		Do MockVertalingService.VerwachtMethodCall("GeefVertalingenMetGroep","Groep").DanReturn(VertalingenStream)
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(MockVertalingParser,MockVertalingService,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VerwerkVertalingsGroep("Groep")
+		
+		Do MockVertalingService.Verifieer()
+		Do MockVertalingParser.Verifieer()
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met meerdere PerfionVertalingObjecten en 0 vertalingen">
+<Implementation><![CDATA[
+		Set MockVertalingRepository = ##class(vhTest.Mock.Res.VertalingRepository).%New()
+		Set MockPerfionRepository = ##class(vhTest.Mock.Res.Perfion.Synchroniser.PerfionRepository).%New()
+		Set MockTaalConverter =  ##class(vhTest.Mock.Res.Perfion.Synchroniser.TaalConverter).%New()
+		Set MockVertalingParser = ##class(vhTest.Mock.Res.Perfion.Synchroniser.VertalingenParser).%New()
+		Set MockVertalingService = ##class(vhTest.Mock.WSimpl.PM.Perfion.Vertaling.DataService.GetData).%New()
+		
+		Set VertalingenStream = ##class(%GlobalCharacterStream).%New()
+		#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(2,0)
+		#dim VertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Vertaling).MaakVertalingIterator(2)
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Perfion).MaakPerfionIterator(2)
+		
+		Do MockVertalingParser.VerwachtMethodCall("GeefVertalingenLijst").DanReturn(PerfionVertalingenLijst)
+		Do MockVertalingParser.VerwachtMethodCall("ReadStream", $$$ElkeWaarde).DanDoeNiks()
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(0).DanReturn("TestTaal")
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(0)
+		Do MockVertalingRepository.VerwachtMethodCall("GeefAlleVertalingenViaGroep","Groep").DanReturn(VertalingenIterator)
+		Do MockVertalingRepository.VerwachtMethodCall("VerwijderVertalingViaSleutel","TestSleutel").ExactAantalKeer(2)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaSleutel", "TestSleutel").DanReturn($$$False)
+		Do MockPerfionRepository.VerwachtMethodCall("BestaatViaID", "TestSleutel").DanReturn($$$True)
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(2)
+		Do MockPerfionRepository.VerwachtMethodCall("MaakSleutelVoorPerfion",$$$ElkeWaarde).ExactAantalKeer(2)	
+		Do MockPerfionRepository.VerwachtMethodCall("ZoekAlle").DanReturn(PerfionVertalingenIterator)
+		Do MockVertalingService.VerwachtMethodCall("GeefVertalingenMetGroep","Groep").DanReturn(VertalingenStream)
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(MockVertalingParser,MockVertalingService,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VerwerkVertalingsGroep("Groep")
+		
+		Do MockVertalingService.Verifieer()
+		Do MockVertalingParser.Verifieer()
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/Res/Perfion/Synchroniser/PerfionRepository.cls.xml
===================================================================
diff -u -r61838 -r62933
--- vhTest/Fake/Res/Perfion/Synchroniser/PerfionRepository.cls.xml	(.../PerfionRepository.cls.xml)	(revision 61838)
+++ vhTest/Fake/Res/Perfion/Synchroniser/PerfionRepository.cls.xml	(.../PerfionRepository.cls.xml)	(revision 62933)
@@ -14,10 +14,16 @@
 ]]></Implementation>
 </Method>
 
+<Method name="BestaatViaSleutel">
+<FormalSpec>Sleutel:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="Bewaar">
 <FormalSpec>Data:TECH.Persistent</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="Dupliceer">
@@ -49,14 +55,12 @@
 
 <Method name="VerwijderViaID">
 <FormalSpec>ID:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwijderViaObject">
 <FormalSpec>Data:TECH.Persistent</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwijderViaSleutel">
Index: vhTest/Mock/Res/Perfion/Synchroniser/PerfionRepository.cls.xml
===================================================================
diff -u -r61838 -r62933
--- vhTest/Mock/Res/Perfion/Synchroniser/PerfionRepository.cls.xml	(.../PerfionRepository.cls.xml)	(revision 61838)
+++ vhTest/Mock/Res/Perfion/Synchroniser/PerfionRepository.cls.xml	(.../PerfionRepository.cls.xml)	(revision 62933)
@@ -22,6 +22,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="BestaatViaSleutel">
+<FormalSpec>Sleutel:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("BestaatViaSleutel",Sleutel)
+]]></Implementation>
+</Method>
+
 <Method name="Bewaar">
 <FormalSpec>Data:TECH.Persistent</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("Bewaar",Data)
FishEye: Tag 62933 refers to a dead (removed) revision in file `vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VoegToeVertalingen/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 62933 refers to a dead (removed) revision in file `vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/SynchroniseerVertalingen/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 62933 refers to a dead (removed) revision in file `vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VulPerfionTabel/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?