Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u -r69371 -r70978
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml	(.../ClassnameFromJsonNaarDomConverter.cls.xml)	(revision 69371)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml	(.../ClassnameFromJsonNaarDomConverter.cls.xml)	(revision 70978)
@@ -7,6 +7,10 @@
 <Type>%String</Type>
 </Property>
 
+<Property name="TAORPackageVoorHalffabBepaler">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.DotNet.ClassnameFromJsonNaarDomConverter.TAOR.PackageVoorHalffabBepaler</Type>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>initvalue:%CacheString</FormalSpec>
 <Private>1</Private>
@@ -15,6 +19,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..PackageVoorDomLaag = "DOM.PM.Maatwerk.Calc"
+	Set ..TAORPackageVoorHalffabBepaler = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.ClassnameFromJsonNaarDomConverter.TAOR.PackageVoorHalffabBepaler).%New()
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -60,6 +65,10 @@
 	} ElseIf(##class(TECH.StringUtils).StartsWith(KlasseNaamVanDotNetHalffab, "RVG_Halffab")) {
 		Set CacheClassname = ##class(TECH.StringUtils).Replace(KlasseNaamVanDotNetHalffab, "RVG_", "")
 		Set PackageVoorHalffab  = "DOM.PM.Maatwerk.Calc.HF.impl.RVG.Halffab"
+	} ElseIf(##class(TECH.StringUtils).StartsWith(KlasseNaamVanDotNetHalffab, "TAOR_Halffab")) {
+		Set CacheClassname = ##class(TECH.StringUtils).Replace(KlasseNaamVanDotNetHalffab, "TAOR_", "")
+		Set:(CacheClassname = "HalffabGeleider") CacheClassname = "HalffabGlijder"
+		Set PackageVoorHalffab  = ..TAORPackageVoorHalffabBepaler.BepaalPackageVoorHalffab(CacheClassname)
 	} Else {
 		Do ##class(TECH.Exceptions.UnimplementedException).Throw("Geen implementatie voor '"_KlasseNaamVanDotNetHalffab_"'")
 	}