Index: vhTest/Fake/Res/VertalingRepository.cls.xml
===================================================================
diff -u
--- vhTest/Fake/Res/VertalingRepository.cls.xml	(revision 0)
+++ vhTest/Fake/Res/VertalingRepository.cls.xml	(revision 61840)
@@ -0,0 +1,109 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.Res.VertalingRepository">
+<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.VertalingRepository</Super>
+
+<Method name="BestaatVertaling">
+<FormalSpec>Groep:%String,Sleutel:%String,Type:%String,Taal:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="BestaatViaID">
+<FormalSpec>ID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="Bewaar">
+<FormalSpec>Data:TECH.Persistent</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="Dupliceer">
+<FormalSpec>Data:TECH.Persistent,Deep:%Boolean=0</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefAlleVertalingenVoorPerfion">
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefVertaling">
+<FormalSpec>Groep:%String,Sleutel:%String,Type:%String,Taal:%String</FormalSpec>
+<ReturnType>Res.Vertaling</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="GeefViaID">
+<FormalSpec>ID:%String</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="Maak">
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="UpdateVertalingIndienBestaat">
+<FormalSpec>Groep:%String,Sleutel:%String,Type:%String,Taal:%String,Vertaling:%String</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderVertaling">
+<FormalSpec>Groep:%String,Sleutel:%String,Type:%String,Taal:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderVertalingViaSleutel">
+<FormalSpec>Sleutel:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderViaID">
+<FormalSpec>ID:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderViaObject">
+<FormalSpec>Data:TECH.Persistent</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
+<Method name="WijzigOfMaakVertaling">
+<FormalSpec>Groep:%String,Sleutel:%String,Type:%String,Taal:%String,Vertaling:%String</FormalSpec>
+<ReturnType>TECH.Persistent</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="ZoekAlle">
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VoegToeVertalingen/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VoegToeVertalingen/Test.cls.xml	(revision 0)
+++ vhUnitTest/Res/Perfion/Synchroniser/Vertalingen/VoegToeVertalingen/Test.cls.xml	(revision 61840)
@@ -0,0 +1,110 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.Res.Perfion.Synchroniser.Vertalingen.VoegToeVertalingen.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test met Geen 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()
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(0)
+		
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(0)
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(0)
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal").ExactAantalKeer(0).DanReturn("TestTaal")
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(,,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VoegToeVertalingen(PerfionVertalingenIterator)
+		
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met 1 PerfionVertalingObject 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()
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(1,0)
+		
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(1)
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(0)
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal").ExactAantalKeer(0).DanReturn("TestTaal")
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(,,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VoegToeVertalingen(PerfionVertalingenIterator)
+		
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met 1 PerfionVertalingObject 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()
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(1,1)
+		
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(1)
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(1)
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(1).DanReturn("TestTaal")
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(,,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VoegToeVertalingen(PerfionVertalingenIterator)
+		
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test met 1 PerfionVertalingObject en 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()
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(1,2)
+		
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(1)
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(2)
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(1).DanReturn("TestTaal")
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal2").ExactAantalKeer(1).DanReturn("TestTaal")
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(,,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VoegToeVertalingen(PerfionVertalingenIterator)
+		
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="aTest met 2 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()
+		#dim PerfionVertalingenIterator As TECH.Iterator = ##class(vhTest.Utils.Res.Perfion.Synchroniser.Vertaling).GeefLijstPerfionVertalingen(2,1)
+		
+		Do MockPerfionRepository.VerwachtMethodCall("VerwijderViaSleutel", "TestSleutel").ExactAantalKeer(2)
+		Do MockVertalingRepository.VerwachtMethodCall("WijzigOfMaakVertaling", "TestGroep","TestSleutel","TestType","TestTaal","TestVertaling").ExactAantalKeer(2)
+		Do MockTaalConverter.VerwachtMethodCall("Convert","TestTaal1").ExactAantalKeer(2).DanReturn("TestTaal")
+		
+		
+		Set Vertalingen = ##class(Res.Perfion.Synchroniser.Vertalingen).%New(,,MockVertalingRepository,MockTaalConverter,MockPerfionRepository)
+		Do Vertalingen.VoegToeVertalingen(PerfionVertalingenIterator)
+		
+		Do MockPerfionRepository.Verifieer()
+		Do MockVertalingRepository.Verifieer()
+		Do MockTaalConverter.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: Res/Perfion/Synchroniser/Vertalingen.cls.xml
===================================================================
diff -u -r61829 -r61840
--- Res/Perfion/Synchroniser/Vertalingen.cls.xml	(.../Vertalingen.cls.xml)	(revision 61829)
+++ Res/Perfion/Synchroniser/Vertalingen.cls.xml	(.../Vertalingen.cls.xml)	(revision 61840)
@@ -23,12 +23,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="PerfionVertalingen">
-<Type>Res.Perfion.Synchroniser.VertalingDTO</Type>
-<Collection>list</Collection>
-<Private>1</Private>
-</Property>
-
 <Property name="TaalConverter">
 <Type>Res.Perfion.Synchroniser.TaalConverter</Type>
 <Private>1</Private>
@@ -62,9 +56,9 @@
 	Do Perfion.%DeleteExtent()
 	Set ..VertalingenStream = ..VertalingenService.GeefVertalingen()
 	Do ..VertalingenParser.ReadStream(..VertalingenStream)
-	Set ..PerfionVertalingen = ..VertalingenParser.GeefVertalingenLijst()
+	#dim PerfionVertalingen As list Of Res.Perfion.Synchroniser.VertalingDTO = ..VertalingenParser.GeefVertalingenLijst()
 	Do ..VulPerfionTabel()
-	Do ..VoegToeVertalingen()
+	Do ..VoegToeVertalingen(PerfionVertalingen)
 	Do ..SynchroniseerVertalingen()
 ]]></Implementation>
 </Method>
@@ -86,6 +80,7 @@
 </Method>
 
 <Method name="VoegToeVertalingen">
+<FormalSpec>PerfionVertalingen:TECH.ListOfObjects</FormalSpec>
 <Implementation><![CDATA[
 	#dim VertalingObject As Res.Perfion.Synchroniser.VertalingDTO
 	#dim Vertaling As %String
@@ -94,7 +89,7 @@
 	#dim Sleutel As %String
 	#dim Type As %String
 	
-	#dim VertalingenLijstIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(..PerfionVertalingen)
+	#dim VertalingenLijstIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(PerfionVertalingen)
 	While (VertalingenLijstIterator.HasNext())
 	{
 		Set VertalingObject = VertalingenLijstIterator.Next()
Index: vhTest/Utils/Res/Perfion/Synchroniser/Vertaling.cls.xml
===================================================================
diff -u
--- vhTest/Utils/Res/Perfion/Synchroniser/Vertaling.cls.xml	(revision 0)
+++ vhTest/Utils/Res/Perfion/Synchroniser/Vertaling.cls.xml	(revision 61840)
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Utils.Res.Perfion.Synchroniser.Vertaling">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="GeefLijstPerfionVertalingen">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>AantalPerfionVertalingenObjecten:TECH.Integer=1,AantalVertalingen:TECH.Integer=1</FormalSpec>
+<Implementation><![CDATA[
+	#dim PerfionVertalingenLijst As list Of Res.Perfion.Synchroniser.VertalingDTO = ##class(%ListOfObjects).%New()
+	
+	for i=1:1:AantalPerfionVertalingenObjecten
+	{
+		Set PerfionVertaling = ##class(Res.Perfion.Synchroniser.VertalingDTO).%New()
+		Set PerfionVertaling.VertalingsType = "TestType"
+		Set PerfionVertaling.VertalingsGroep = "TestGroep"
+		Set PerfionVertaling.Sleutel = "TestSleutel"
+		for i=1:1:AantalVertalingen
+		{
+			Do PerfionVertaling.Vertalingen.SetAt("TestVertaling","TestTaal"_i)
+		}
+		Do PerfionVertalingenLijst.Insert(PerfionVertaling)
+	}
+	
+	
+	Quit PerfionVertalingenLijst
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>