Index: APPS/PM/Maatwerk/dto/DotNet/HalffabItemParsedFromJson.cls.xml
===================================================================
diff -u -r66349 -r67467
--- APPS/PM/Maatwerk/dto/DotNet/HalffabItemParsedFromJson.cls.xml (.../HalffabItemParsedFromJson.cls.xml) (revision 66349)
+++ APPS/PM/Maatwerk/dto/DotNet/HalffabItemParsedFromJson.cls.xml (.../HalffabItemParsedFromJson.cls.xml) (revision 67467)
@@ -121,6 +121,10 @@
APPS.PM.Maatwerk.dto.DotNet.HalffabItemParsedFromJson
+
+%String
+
+
Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/HalffabrikatenFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u -r67334 -r67467
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/HalffabrikatenFromJsonNaarDomConverter.cls.xml (.../HalffabrikatenFromJsonNaarDomConverter.cls.xml) (revision 67334)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/HalffabrikatenFromJsonNaarDomConverter.cls.xml (.../HalffabrikatenFromJsonNaarDomConverter.cls.xml) (revision 67467)
@@ -160,6 +160,16 @@
#dim HalffabInbegrepen As DOM.PM.Maatwerk.Calc.HF.Halffab = ..GeefHalffab(HalffabItemParsedFromJson)
Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem).%New("", HF.Rol, HalffabInbegrepen)
+ If ($$$Not(HalffabItemParsedFromJson.RolNaamParent = "Links")) {
+ #dim ParentHalffabItem As DOM.PM.Maatwerk.Calc.HF.Halffab = ..HalffabItemsBoom.GeefHalffabItem(HalffabItemParsedFromJson.RolNaamParent)
+
+ If (HalffabInbegrepen.%Extends("DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem")) {
+ Set HalffabItem.HalffabItem = ParentHalffabItem
+ } Else {
+ Set HalffabItem.HalffabItem = ParentHalffabItem.HalffabItems.GetAt(1)
+ }
+ }
+
Set HalffabItem.Aantal = +(HalffabItemParsedFromJson.Aantal)
Set HalffabItem.Gewicht = +(HalffabItemParsedFromJson.Gewicht)
Do HalffabItem.ZetMagazijnZoneID(HalffabItemParsedFromJson.MagazijnZoneID)