Index: ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml =================================================================== diff -u -r39310 -r39317 --- ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml (.../EdiNaarEcon.cls.xml) (revision 39310) +++ ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml (.../EdiNaarEcon.cls.xml) (revision 39317) @@ -32,6 +32,7 @@ Set Eigenschappen = ##class(ECON.PM.Maatwerk.dto.TbxKenmerken).%New() Do ..Converter.Convert(Product,Eigenschappen,..LadeEigenschappenConverteerOptiesEdiNaarEconTBX) + Set:Product.CorpusWandDikte="" Eigenschappen.CorpusWandDikte = "0" Set Eigenschappen.DwarsverdelingAantal = Product.AantalDwarsverdelingen Set Eigenschappen.GreepEnMeenemer = $Case(Product.GreepEnMeenemer,"No":"Zonder","Handle":"Greep","HandleAndLatch":"Meenemer",:"Zonder") Set Eigenschappen.HeeftAfwijkendeRughoogte = $$$False Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml =================================================================== diff -u -r39310 -r39317 --- vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml (.../TbxKenmerken.cls.xml) (revision 39310) +++ vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml (.../TbxKenmerken.cls.xml) (revision 39317) @@ -11,6 +11,7 @@ Set TbxKenmerken.BodemKleur = ##class(ECON.PM.Maatwerk.enu.TBXBodemKleur).Wit() Set TbxKenmerken.CorpusBreedte = 600 + Set TbxKenmerken.CorpusWandDikte = 0 Set TbxKenmerken.Draagkracht = ##class(ECON.PM.Maatwerk.enu.TBXDraagkracht).Draagkracht30() Set TbxKenmerken.DwarsverdelingAantal = ##class(ECON.PM.Maatwerk.enu.TBXDwarsverdelingAantal).Zonder() Set TbxKenmerken.FrontBevestiging = ##class(ECON.PM.Maatwerk.enu.TBXFrontBevestiging).Inserta() Index: ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml =================================================================== diff -u -r39310 -r39317 --- ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml (.../EconNaarEdi.cls.xml) (revision 39310) +++ ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml (.../EconNaarEdi.cls.xml) (revision 39317) @@ -32,6 +32,7 @@ Set Eigenschappen = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New() Do ..Converter.Convert(Product,Eigenschappen,..LadeEigenschappenConverteerOptiesEconNaarEdiTBX) + Set:Product.CorpusWandDikte="0" Eigenschappen.CorpusWandDikte = "" Set Eigenschappen.HeeftDwarsverdeling = $$$If(+Product.DwarsverdelingAantal>0,$$$True,$$$False) Set Eigenschappen.HeeftMat = $$$If($$$HasLength(Product.MatMateriaal),$$$True,$$$False) Set Eigenschappen.Klasse = Product.Toepassing