Index: DOTNET/PM/Maatwerk/Converter/DotnetNaarDom/MatKenmerken.cls.xml =================================================================== diff -u -r65104 -r65108 --- DOTNET/PM/Maatwerk/Converter/DotnetNaarDom/MatKenmerken.cls.xml (.../MatKenmerken.cls.xml) (revision 65104) +++ DOTNET/PM/Maatwerk/Converter/DotnetNaarDom/MatKenmerken.cls.xml (.../MatKenmerken.cls.xml) (revision 65108) @@ -11,18 +11,46 @@ Set DomKenmerken.Breedte = MatKenmerken.Breedte Set DomKenmerken.Diepte = MatKenmerken.Diepte - Set DomKenmerken.GUIKenmerken = MatKenmerken.GUIKenmerken + + Set GUIKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.MATGUIKenmerken).%New() + + Set GUIKenmerken.CorpusBreedte = MatKenmerken.GUIKenmerken.CorpusBreedte + Set GUIKenmerken.WandDikte = MatKenmerken.GUIKenmerken.WandDikte + Set GUIKenmerken.HeeftLbxBinnenladeGlazenFront = MatKenmerken.GUIKenmerken.HeeftLbxBinnenladeGlazenFront + Set GUIKenmerken.HeeftOpvullijstLinks = MatKenmerken.GUIKenmerken.HeeftOpvullijstLinks + Set GUIKenmerken.HeeftOpvullijstRechts = MatKenmerken.GUIKenmerken.HeeftOpvullijstRechts + Set GUIKenmerken.HeeftTbxMinTolerantieIB = MatKenmerken.GUIKenmerken.HeeftTbxMinTolerantieIB + Set GUIKenmerken.IsBinnenbreedte = MatKenmerken.GUIKenmerken.IsBinnenbreedte + Set GUIKenmerken.LadeDiepte = MatKenmerken.GUIKenmerken.LadeDiepte + Set GUIKenmerken.ViaNettoBreedte = MatKenmerken.GUIKenmerken.ViaNettoBreedte + Set GUIKenmerken.ViaNettoDiepte = MatKenmerken.GUIKenmerken.ViaNettoDiepte + + Set DomKenmerken.GUIKenmerken = GUIKenmerken Set DomKenmerken.Materiaal = MatKenmerken.Materiaal Set DomKenmerken.Kleur = MatKenmerken.Kleur - Set DomKenmerken.UitsparingData = MatKenmerken.UitsparingData + + Set UitsparingData = ##class(DOM.PM.Maatwerk.Calc.Common.impl.LadeUitsparingDataVoorMatten).%New() + + Set UitsparingData.AantalUitsparingen = MatKenmerken.UitsparingData.AantalUitsparingen + Set UitsparingData.RugDeelBreedteM = MatKenmerken.UitsparingData.RugDeelBreedteM + Set UitsparingData.RugDeelBreedteX = MatKenmerken.UitsparingData.RugDeelBreedteX + Set UitsparingData.RugDeelBreedteY = MatKenmerken.UitsparingData.RugDeelBreedteY + Set UitsparingData.UitsparingBreedteZ1 = MatKenmerken.UitsparingData.UitsparingBreedteZ1 + Set UitsparingData.UitsparingBreedteZ2 = MatKenmerken.UitsparingData.UitsparingBreedteZ2 + Set UitsparingData.UitsparingCodeZ1 = MatKenmerken.UitsparingData.UitsparingCodeZ1 + Set UitsparingData.UitsparingCodeZ2 = MatKenmerken.UitsparingData.UitsparingCodeZ2 + Set UitsparingData.UitsparingDiepte = MatKenmerken.UitsparingData.UitsparingDiepte + + Set DomKenmerken.UitsparingData = UitsparingData Set DomKenmerken.LadeToepassing = MatKenmerken.LadeToepassing Set DomKenmerken.LadeType = MatKenmerken.LadeType Set DomKenmerken.ProductieWijze = MatKenmerken.ProductieWijze Set DomKenmerken.Onderdelen = MatKenmerken.Onderdelen Set DomKenmerken.NietMeeleveren = MatKenmerken.NietMeeleveren - Set DomKenmerken.ExplicietGekozenKenmerken = MatKenmerken.ExplicietGekozenKenmerken - Set DomKenmerken.GekoppeldeIngegevenKenmerken = MatKenmerken.GekoppeldeIngegevenKenmerken + Set DomKenmerken.ExplicietGekozenKenmerken = "" //MatKenmerken.ExplicietGekozenKenmerken + Set DomKenmerken.GekoppeldeIngegevenKenmerken = "" //MatKenmerken.GekoppeldeIngegevenKenmerken Set DomKenmerken.VersieNr = MatKenmerken.VersieNr + Set DomKenmerken.Type = MatKenmerken.Type Quit DomKenmerken ]]>