Index: vhUnitTest/ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon/Test.cls.xml
===================================================================
diff -u -r51043 -r51044
--- vhUnitTest/ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon/Test.cls.xml	(.../Test.cls.xml)	(revision 51043)
+++ vhUnitTest/ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon/Test.cls.xml	(.../Test.cls.xml)	(revision 51044)
@@ -53,6 +53,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Indien alle aparte TiponBlumotion-rollen aanwezig in niet meeleveren rollen wordt externe rol TiponBlumotionOnderdelen toegevoegd">
+<Implementation><![CDATA[
+	#dim EdiKenmerken As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).StandaardLade()
+	Do EdiKenmerken.NietMeeleveren.Insert("NMTOBSET")
+	Do EdiKenmerken.NietMeeleveren.Insert("NMTOBSTG")
+	Do EdiKenmerken.NietMeeleveren.Insert("NMTOBTOEB")
+	
+	#dim EconKenmerken As ECON.PM.Maatwerk.dto.TbxKenmerken = ..Converter.Converteer(EdiKenmerken)
+	
+	Do $$$AssertEquals(EconKenmerken.NietMeeleveren.TiponBlumotionOnderdelen, "true")
+	Do $$$AssertEquals(EconKenmerken.NietMeeleveren.TiponBlumotionSet, "true")
+	Do $$$AssertEquals(EconKenmerken.NietMeeleveren.TiponBlumotionSynchronisatieStang, "true")
+	Do $$$AssertEquals(EconKenmerken.NietMeeleveren.TiponBlumotionSynchronisatieToebehoren, "true")
+]]></Implementation>
+</Method>
+
 <Method name="AssertNietMeeleveren">
 <FormalSpec>EdiCode:%String,VerwachteEconNietMeeleverenProperty:%String</FormalSpec>
 <Private>1</Private>
Index: ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml
===================================================================
diff -u -r51015 -r51044
--- ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 51015)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 51044)
@@ -43,12 +43,12 @@
 	Set EconKenmerken.Toepassing = EdiKenmerken.Klasse
 	Set EconKenmerken.Variant = "TBX"
 	Set EconKenmerken.ProductieWijze = ##class(ECON.PM.Maatwerk.enu.ProductieWijze).Volledig()
+	Set EconKenmerken.NietMeeleveren = ..GeefNietMeeleveren(EdiKenmerken)
 	
 	Do ..ConverteerFrontOndersteuning(EdiKenmerken, .EconKenmerken)
 	Do ..ConverteerInbouwHoogte(EdiKenmerken, .EconKenmerken)
 	Do ..ConverteerInterneBreedte(EdiKenmerken, .EconKenmerken)
 	Do ..ConverteerLadeDesign(EdiKenmerken, .EconKenmerken)
-	Do ..ConverteerNietMeeleveren(EdiKenmerken, .EconKenmerken)
 	Do ..ConverteerZijwand(EdiKenmerken, .EconKenmerken)
 	Do ..ConverteerUitsparingen(EdiKenmerken, .EconKenmerken)
 	
@@ -179,22 +179,30 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ConverteerNietMeeleveren">
-<FormalSpec><![CDATA[EdiKenmerken:APPS.EDI.common.dto.v001.LadeTBX,&EconKenmerken:ECON.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
+<Method name="GeefNietMeeleveren">
+<FormalSpec>EdiKenmerken:APPS.EDI.common.dto.v001.LadeTBX</FormalSpec>
 <Private>1</Private>
+<ReturnType>ECON.PM.Maatwerk.dto.TbxKenmerken.NietMeeleveren</ReturnType>
 <Implementation><![CDATA[
-	Set EconKenmerken.NietMeeleveren.FrontBevestiging = $$$If(EdiKenmerken.NietMeeleveren.Find("NMFB"),"true","false")
-	Set EconKenmerken.NietMeeleveren.Geleider = $$$If(EdiKenmerken.NietMeeleveren.Find("NMCP"),"true","false")
-	Set EconKenmerken.NietMeeleveren.Afdekkap = $$$If(EdiKenmerken.NietMeeleveren.Find("NMAK"),"true","false")
-	Set EconKenmerken.NietMeeleveren.Reling = $$$If(EdiKenmerken.NietMeeleveren.Find("NMRL"),"true","false")
-	Set EconKenmerken.NietMeeleveren.Bodemsteun = $$$If(EdiKenmerken.NietMeeleveren.Find("NMBDS"),"true","false")
-	Set EconKenmerken.NietMeeleveren.Opvullijst = $$$If(EdiKenmerken.NietMeeleveren.Find("NMOVL"),"true","false")
-	Set EconKenmerken.NietMeeleveren.InschuifElement = $$$If(EdiKenmerken.NietMeeleveren.Find("NMBS"),"true","false")
-	Set EconKenmerken.NietMeeleveren.Antislipmat = $$$If(EdiKenmerken.NietMeeleveren.Find("NMASM"),"true","false")
+	#dim NietMeeleveren As ECON.PM.Maatwerk.dto.TbxKenmerken.NietMeeleveren = ##class(ECON.PM.Maatwerk.dto.TbxKenmerken.NietMeeleveren).%New()
 	
-	Set EconKenmerken.NietMeeleveren.TiponBlumotionSet = $$$If(EdiKenmerken.NietMeeleveren.Find("NMTOBSET"),"true","false")
-	Set EconKenmerken.NietMeeleveren.TiponBlumotionSynchronisatieToebehoren = $$$If(EdiKenmerken.NietMeeleveren.Find("NMTOBTOEB"),"true","false")
-	Set EconKenmerken.NietMeeleveren.TiponBlumotionSynchronisatieStang = $$$If(EdiKenmerken.NietMeeleveren.Find("NMTOBSTG"),"true","false")
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMAK")) NietMeeleveren.Afdekkap = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMASM")) NietMeeleveren.Antislipmat = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMBDS")) NietMeeleveren.Bodemsteun = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMFB")) NietMeeleveren.FrontBevestiging = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMCP")) NietMeeleveren.Geleider = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMBS")) NietMeeleveren.InschuifElement = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMOVL")) NietMeeleveren.Opvullijst = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMRL")) NietMeeleveren.Reling = "true"		
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMTOBSET")) NietMeeleveren.TiponBlumotionSet = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMTOBTOEB")) NietMeeleveren.TiponBlumotionSynchronisatieToebehoren = "true"
+	Set:(EdiKenmerken.NietMeeleveren.Find("NMTOBSTG")) NietMeeleveren.TiponBlumotionSynchronisatieStang = "true"
+	
+	If (EdiKenmerken.NietMeeleveren.Find("NMTOBSET") && EdiKenmerken.NietMeeleveren.Find("NMTOBTOEB") && EdiKenmerken.NietMeeleveren.Find("NMTOBSTG")) {
+		Set NietMeeleveren.TiponBlumotionOnderdelen = "true"
+	}
+	
+	Quit NietMeeleveren
 ]]></Implementation>
 </Method>