Index: DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml =================================================================== diff -u -r38574 -r38575 --- DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38574) +++ DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38575) @@ -80,7 +80,7 @@ _ ";" _ TBXKenmerken.UitsparingPositie1 _ ";" _ TBXKenmerken.UitsparingPositie2 _ ";" _ TBXKenmerken.Uittrekbaarheid - _ ";" _ TBXKenmerken.Verpakking + _ ";" _ TBXKenmerken.VerpakkingType _ ";" _ TBXKenmerken.VoorwandMetMeenemer _ ";" _ TBXKenmerken.VoorwandMetGreep _ ";" _ TBXKenmerken.VoorwandVerhogingType Index: vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml =================================================================== diff -u -r38574 -r38575 --- vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38574) +++ vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38575) @@ -47,7 +47,7 @@ Set TBXKenmerken.UitsparingPositie1 = 104 Set TBXKenmerken.UitsparingPositie2 = 105 Set TBXKenmerken.Uittrekbaarheid = ##class(DOM.PM.enu.TBXUittrekbaarheid).Volledig() - Set TBXKenmerken.Verpakking = ##class(DOM.PM.enu.TBXVerpakking).Pallet() + Set TBXKenmerken.VerpakkingType = ##class(DOM.PM.enu.TBXVerpakking).Pallet() Set TBXKenmerken.VoorwandMetMeenemer = 0 Set TBXKenmerken.VoorwandMetGreep = 1 Set TBXKenmerken.VoorwandVerhogingType = ##class(DOM.PM.enu.TBXVoorwandVerhogingType).Reling() Index: APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml =================================================================== diff -u -r38570 -r38575 --- APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38570) +++ APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38575) @@ -102,9 +102,9 @@ Do ..Controleer(TBXKenmerken.Uittrekbaarheid,Product.GeefUittrekbaarheid(),"Uittrekbaarheid", ErrorLijst) Do ..IsValid(TBXKenmerken.Uittrekbaarheid,"DOM.PM.enu.TBXUittrekbaarheid", ErrorLijst) - Set TBXKenmerken.Verpakking = Product.GeefVerpakking() - Do ..Controleer(TBXKenmerken.Verpakking,Product.GeefVerpakking(),"Verpakking", ErrorLijst) - Do ..IsValid(TBXKenmerken.Verpakking,"DOM.PM.enu.TBXVerpakking", ErrorLijst) + Set TBXKenmerken.VerpakkingType = Product.GeefVerpakking() + Do ..Controleer(TBXKenmerken.VerpakkingType,Product.GeefVerpakking(),"Verpakking", ErrorLijst) + Do ..IsValid(TBXKenmerken.VerpakkingType,"DOM.PM.enu.TBXVerpakking", ErrorLijst) Set TBXKenmerken.VoorwandMetGreep = Product.BevatGreep() Do ..Controleer(TBXKenmerken.VoorwandMetGreep,Product.BevatGreep(),"VoorwandMetGreep", ErrorLijst) Index: APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml =================================================================== diff -u -r38570 -r38575 --- APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38570) +++ APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38575) @@ -106,7 +106,7 @@ Set ..IngegevenKenmerken.UitsparingPositie2 = TBXKenmerken.UitsparingPositie2 Set ..IngegevenKenmerken.UitsparingZijkantKleur = TBXKenmerken.UitsparingZijkantKleur Set ..IngegevenKenmerken.Uittrekbaarheid = TBXKenmerken.Uittrekbaarheid - Set ..IngegevenKenmerken.Verpakking = TBXKenmerken.Verpakking + Set ..IngegevenKenmerken.VerpakkingType = TBXKenmerken.Verpakking Set ..IngegevenKenmerken.VoorwandMetMeenemer = TBXKenmerken.VoorwandMetMeenemer Set ..IngegevenKenmerken.VoorwandMetGreep = TBXKenmerken.VoorwandMetGreep Set ..IngegevenKenmerken.VoorwandVerhogingType = TBXKenmerken.VoorwandVerhogingType Index: DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml =================================================================== diff -u -r38574 -r38575 --- DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38574) +++ DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38575) @@ -149,7 +149,7 @@ DOM.PM.enu.TBXUittrekbaarheid - + DOM.PM.enu.TBXVerpakking @@ -270,7 +270,7 @@ Set ..HangmapBoringAantal = 0 Set ..DwarsverdelingAantal = ##class(DOM.PM.enu.TBXDwarsverdeling).Zonder() Set ..RugwandMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout() - Set ..Verpakking = ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen() ; Stuk + Set ..VerpakkingType = ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen() ; Stuk Set ..PlaatMateriaal="HS" ]]> @@ -712,7 +712,7 @@ Uittrekbaarheid -Verpakking +VerpakkingType VoorwandMetGreep