Index: vhUnitTest/ECONimpl/PM/Maatwerk/EdiConverter/ConverteerEdiNaarEcon/TestTBX.cls.xml =================================================================== diff -u -r38899 -r39230 --- vhUnitTest/ECONimpl/PM/Maatwerk/EdiConverter/ConverteerEdiNaarEcon/TestTBX.cls.xml (.../TestTBX.cls.xml) (revision 38899) +++ vhUnitTest/ECONimpl/PM/Maatwerk/EdiConverter/ConverteerEdiNaarEcon/TestTBX.cls.xml (.../TestTBX.cls.xml) (revision 39230) @@ -29,6 +29,15 @@ Do $$$AssertObject(ProductConverter.ConverteerEdiNaarEcon(TeConverterenProduct),##class(vhTest.Utils.ECON.PM.Maatwerk.dto.TbxKenmerken).LadeMetVeelExtras()) ]]> + + + + Index: ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml =================================================================== diff -u -r39220 -r39230 --- ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml (.../EdiNaarEcon.cls.xml) (revision 39220) +++ ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml (.../EdiNaarEcon.cls.xml) (revision 39230) @@ -38,10 +38,30 @@ Set Eigenschappen.HeeftAfwijkendeRughoogte = $$$False Set Eigenschappen.Toepassing = Product.Klasse + Do ..ConverteerNietMeeleveren(Product, .Eigenschappen) + Quit Eigenschappen ]]> + + +%String + + + TECH.ObjectUtils.ObjectConvertData 1 @@ -77,6 +97,7 @@ Continue:PropertyName="Variant" Continue:PropertyName="ZijwandVerhogingInschuifelementKleur" Continue:PropertyName="ZijwandVerhogingRelingKleur" + Continue:PropertyName="NietMeeleveren" Do ..ConverterData.Add(PropertyName,PropertyName) } Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml =================================================================== diff -u -r39207 -r39230 --- vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml (.../TbxKenmerken.cls.xml) (revision 39207) +++ vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml (.../TbxKenmerken.cls.xml) (revision 39230) @@ -120,17 +120,17 @@