Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/KostItemFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/KostItemFromJsonNaarDomConverter.cls.xml	(revision 0)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/KostItemFromJsonNaarDomConverter.cls.xml	(revision 62912)
@@ -0,0 +1,80 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.PM.Maatwerk.MaatwerkService.DotNet.KostItemFromJsonNaarDomConverter">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="ClassnameFromJsonNaarDomConverter">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.DotNet.ClassnameFromJsonNaarDomConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>initvalue:%CacheString</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..ClassnameFromJsonNaarDomConverter = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.ClassnameFromJsonNaarDomConverter).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefKostItem">
+<FormalSpec>KostItemParsedFromJson:APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.Kost.KostItem</ReturnType>
+<Implementation><![CDATA[	Quit ..MaakKostItem(KostItemParsedFromJson)
+]]></Implementation>
+</Method>
+
+<UDLText name="T">
+<Content><![CDATA[
+/*
+Method X(KostItemParsedFromJson As APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson) As DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem [ Private ]
+{
+	Set SamengesteldKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%New()
+	
+	; converteren
+	
+	Quit SamengesteldKostItem
+}
+*/
+]]></Content>
+</UDLText>
+
+<Method name="MaakKostItem">
+<FormalSpec>KostItemParsedFromJson:APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Kost.KostItem</ReturnType>
+<Implementation><![CDATA[
+	#dim Classname As %String = ..ClassnameFromJsonNaarDomConverter.GeefCacheClassnameVoorKostItem(KostItemParsedFromJson)
+	
+	#dim KI As APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson = KostItemParsedFromJson
+	
+	If Classname = "DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem" {
+		Set KostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%New(KI.Naam, KI.Kost, KI.Details)
+		Set KostItemIterator = ##class(TECH.ListIterator).%New(KostItemParsedFromJson.KostItems)
+		While (KostItemIterator.HasNext()) {
+			#dim SubKostItemParsedFromJson As APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson = KostItemIterator.Next()
+			#dim SubKostItem As DOM.PM.Maatwerk.Calc.Kost.KostItem = ..GeefKostItem(SubKostItemParsedFromJson)
+			Do KostItem.VoegToe(SubKostItem)
+		}
+	}
+	ElseIf Classname = "DOM.PM.Maatwerk.Calc.Kost.ActiviteitKostItem" {
+		Set KostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.ActiviteitKostItem).%New(KI.Naam, KI.Kost, KI.Details, KI.Tijd, KI.KostenPlaatsID, KI.Aantal, KI.ActiviteitCode)
+		;Set KostItem.EventueelAanTeVullenProperties
+		;Do KostItem.EventueelUitTeVoerenMethods()
+	}
+	ElseIf Classname = "DOM.PM.Maatwerk.Calc.Kost. ...KostItem" {
+		/*  ... aan te vullen */ 
+	}
+	Else {
+		Do ##class(TECH.Exceptions.UnimplementedException).Throw("Geen implentatie voor kostitem klasse '"_Classname_"'")
+	}
+	Quit KostItem
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonNaarDomConverter.cls.xml	(revision 0)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonNaarDomConverter.cls.xml	(revision 62912)
@@ -0,0 +1,45 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonNaarDomConverter">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="HalffabrikatenConverter">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.DotNet.HalffabrikatenFromJsonNaarDomConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="KostItemConverter">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.DotNet.KostItemFromJsonNaarDomConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>initvalue:%CacheString</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..HalffabrikatenConverter = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.HalffabrikatenFromJsonNaarDomConverter).%New()
+	Set ..KostItemConverter = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.KostItemFromJsonNaarDomConverter).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabItemsBoom">
+<FormalSpec>MaatwerkDetailsFromJson:APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<Implementation><![CDATA[	Quit ..HalffabrikatenConverter.GeefHalffabItemsBoom(MaatwerkDetailsFromJson.Halffabrikaten)
+]]></Implementation>
+</Method>
+
+<Method name="GeefKostItems">
+<FormalSpec>MaatwerkDetailsFromJson:APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem</ReturnType>
+<Implementation><![CDATA[	Quit ..KostItemConverter.GeefKostItem(MaatwerkDetailsFromJson.Kosten)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/HalffabrikatenFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/HalffabrikatenFromJsonNaarDomConverter.cls.xml	(revision 0)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/HalffabrikatenFromJsonNaarDomConverter.cls.xml	(revision 62912)
@@ -0,0 +1,96 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.PM.Maatwerk.MaatwerkService.DotNet.HalffabrikatenFromJsonNaarDomConverter">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="ClassnameFromJsonNaarDomConverter">
+<Type>WSimpl.PM.Maatwerk.MaatwerkService.DotNet.ClassnameFromJsonNaarDomConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="HalffabItemsBoom">
+<Type>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>initvalue:%CacheString</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..ClassnameFromJsonNaarDomConverter = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.ClassnameFromJsonNaarDomConverter).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabItemsBoom">
+<FormalSpec>Halffabrikaten:APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</ReturnType>
+<Implementation><![CDATA[
+	Set ..HalffabItemsBoom = ##class(DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom).%New()
+	Set ..HalffabItemsBoom.Wortel = ..GeefHalffabItem(Halffabrikaten)
+
+	Quit ..HalffabItemsBoom
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabItem">
+<FormalSpec>HalffabItemParsedFromJson:APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabItem</ReturnType>
+<Implementation><![CDATA[	Quit ..MaakHalffabItem(HalffabItemParsedFromJson)
+]]></Implementation>
+</Method>
+
+<Method name="MaakHalffabItem">
+<FormalSpec>HalffabItemParsedFromJson:APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabItem</ReturnType>
+<Implementation><![CDATA[
+	#dim Classname As %String = ..ClassnameFromJsonNaarDomConverter.GeefCacheClassnameVoorHalffabItem(HalffabItemParsedFromJson)
+	
+	#dim HF As APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson = HalffabItemParsedFromJson
+	
+	If Classname = "DOM.PM.Maatwerk.Calc.HF.SamengesteldKostItem" {
+		Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem).%New("",HF.Rol)
+		Set HalffabItemIterator = ##class(TECH.ListIterator).%New(HalffabItemParsedFromJson.HalffabItems)
+		While (HalffabItemIterator.HasNext()) {
+			#dim SubHalffabItemParsedFromJson As APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson = HalffabItemIterator.Next()
+			#dim SubHalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = ..GeefHalffabItem(SubHalffabItemParsedFromJson)
+			Do HalffabItem.VoegToe(SubHalffabItem)
+		}
+	}
+	ElseIf Classname = "DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem" {
+		#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(HalffabItemParsedFromJson)
+		Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem).%New("", HF.Rol, Halffab)
+		;Set HalffabItem.EventueelAanTeVullenProperties
+		;Do HalffabItem.EventueelUitTeVoerenMethods()
+		
+		Do ..HalffabItemsBoom.AddHalffabItem(HalffabItem)   ; BELANGRIJK! 
+	}
+	ElseIf Classname = "DOM.PM.Maatwerk.Calc.HF. ...HalffabItem" {
+		/*  ... aan te vullen */ 
+		Do ..HalffabItemsBoom.AddHalffabItem(HalffabItem)   ; BELANGRIJK! 
+	}
+	Else {
+		Do ##class(TECH.Exceptions.UnimplementedException).Throw("Geen implentatie voor halffabitem klasse '"_Classname_"'")
+	}
+	Quit HalffabItem
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffab">
+<FormalSpec>HalffabItemParsedFromJson:APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.Halffab</ReturnType>
+<Implementation><![CDATA[
+	#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ""   ; Lookup maken (SQL) om Halffab op te halen : WHERE (ProductID =  HalffabItemParsedFromJson.ProductData.Id) 
+	Quit Halffab
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml	(revision 0)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml	(revision 62912)
@@ -0,0 +1,53 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.PM.Maatwerk.MaatwerkService.DotNet.ClassnameFromJsonNaarDomConverter">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="PackageVoorDomLaag">
+<Type>%String</Type>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>initvalue:%CacheString</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..PackageVoorDomLaag = "DOM.PM.Maatwerk.Calc"
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefCacheClassnameVoorHalffabItem">
+<FormalSpec>HalffabItemParsedFromJson:APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim CacheClassname As %String = ""
+	#dim KlasseNaamInfo As %String = HalffabItemParsedFromJson.KlasseNaamInfo
+	
+	Set CacheClassname = ""   ; bvb. "SamengesteldHalffabItem" 
+	
+	Set CacheClassname = ##class(TECH.StringUtils).Append(..PackageVoorDomLaag_".HF", CacheClassname, ".")
+	Quit CacheClassname
+]]></Implementation>
+</Method>
+
+<Method name="GeefCacheClassnameVoorKostItem">
+<FormalSpec>KostItemParsedFromJson:APPS.PM.Maatwerk.dto.DotNet.KostItemParsedFromJson</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim CacheClassname As %String = ""
+	#dim KlasseNaamInfo As %String = KostItemParsedFromJson.KlasseNaamInfo
+	
+	Set CacheClassname = ""   ; bvb. "SamengesteldKostItem" 
+	
+	Set CacheClassname = ##class(TECH.StringUtils).Append(..PackageVoorDomLaag_".Kost", CacheClassname, ".")
+	Quit CacheClassname
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>