Index: Res/PI/Taal/EnuSynchroniseerder.cls.xml
===================================================================
diff -u
--- Res/PI/Taal/EnuSynchroniseerder.cls.xml	(revision 0)
+++ Res/PI/Taal/EnuSynchroniseerder.cls.xml	(revision 31089)
@@ -0,0 +1,62 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="Res.PI.Taal.EnuSynchroniseerder">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="LaatsteVolgnummer">
+<Type>%Integer</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="Synchroniseer">
+<Implementation><![CDATA[
+	Do ..VerwijderAlleTalen()
+	Set ..LaatsteVolgnummer = 0
+		
+	#dim TaalIterator As TECH.Iterator = ##class(DOM.enu.Taal).ValueListIterator()
+	While TaalIterator.HasNext() {
+		#dim TaalCode As DOM.enu.Taal = TaalIterator.Next()
+		Set ..LaatsteVolgnummer = ..LaatsteVolgnummer + 1
+		
+		#dim VastVolgnummerOfAutomatisch As %Integer = $Case(TaalCode, "N":1, "F":2, "E":3, "D":4, :"")
+		#dim TaalItem As Res.PI.Taal = ..CreeerTaalItem(TaalCode,"",VastVolgnummerOfAutomatisch)
+		Do ..BewaarTaalItem(TaalItem)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="CreeerTaalItem">
+<FormalSpec>Taal:DOM.enu.Taal,Omschrijving:%String="",Volgnummer:%Integer=""</FormalSpec>
+<ReturnType>Res.PI.Taal</ReturnType>
+<Implementation><![CDATA[
+	If Omschrijving = "" {
+		Set Omschrijving = ##class(DOM.enu.Taal).LogicalToDisplay(Taal)
+	}
+	If Volgnummer = "" {
+		Set Volgnummer = ..LaatsteVolgnummer
+	}
+	
+	Set TaalItem = ##class(Res.PI.Taal).%New()
+	Set TaalItem.ItemID = Taal
+	Set TaalItem.Omschrijving = Omschrijving
+	Set TaalItem.VolgNr = Volgnummer
+	Quit TaalItem
+]]></Implementation>
+</Method>
+
+<Method name="BewaarTaalItem">
+<FormalSpec>TaalItem:Res.PI.Taal</FormalSpec>
+<Implementation><![CDATA[
+	#dim sc As %Status = TaalItem.%Save()
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(sc,"Het TaalItem "_TaalItem.ItemID_" kon niet bewaard worden.")
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderAlleTalen">
+<Implementation><![CDATA[	Do ##class(Res.PI.Taal).%KillExtent()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>