Index: DOM/PM/enu/TBXFrontBevestiging/Verwerker.cls.xml =================================================================== diff -u -r38290 -r39740 --- DOM/PM/enu/TBXFrontBevestiging/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 38290) +++ DOM/PM/enu/TBXFrontBevestiging/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 39740) @@ -22,8 +22,6 @@ Do ..VerwerkInserta() } ElseIf TBXFrontBevestiging = "S" { Do ..VerwerkSchroef() - } ElseIf TBXFrontBevestiging = "Z" { - Do ..VerwerkZonder() } Else { Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXFrontBevestiging,"DOM.PM.enu.TBXFrontBevestiging",$classname()) Do ##class(TECH.ExceptionHandler).Throw(Exceptie) @@ -60,12 +58,6 @@ 1 - - -1 -1 - - Index: ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml =================================================================== diff -u -r39716 -r39740 --- ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml (.../EconNaarEdi.cls.xml) (revision 39716) +++ ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml (.../EconNaarEdi.cls.xml) (revision 39740) @@ -211,6 +211,7 @@ Continue:PropertyName="IsBinnenlade" Continue:PropertyName="MatKleur" Continue:PropertyName="MatMateriaal" + Continue:PropertyName="FrontBevestiging" Do ..ConverterData.Add(PropertyName,PropertyName) } @@ -220,6 +221,7 @@ Do ..ConverterData.Add("IsBinnenbreedte","IsBinnenbreedte","Set Output = $Select(Input=""true"": ""1"", 1:""0"")") Do ..ConverterData.Add("IsBinnenlade","IsBinnenlade","Set Output = $Select(Input=""true"": ""1"", 1:""0"")") Do ..ConverterData.Add("ZijwandVerhogingRelingKleur","ZijwandVerhogingKleur") + Do ..ConverterData.Add("FrontBevestiging","FrontBevestiging","Set Output = $Select(Input="""": ""Z"", 1:Input)") Quit ..ConverterData ]]> Index: DOM/PM/enu/TBXFrontBevestiging/AutoComplete.cls.xml =================================================================== diff -u -r38290 -r39740 --- DOM/PM/enu/TBXFrontBevestiging/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 38290) +++ DOM/PM/enu/TBXFrontBevestiging/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 39740) @@ -43,13 +43,6 @@ 1 1 - - -%String -"Z" -1 -1 - Index: ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml =================================================================== diff -u -r39735 -r39740 --- ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml (.../EdiNaarEcon.cls.xml) (revision 39735) +++ ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml (.../EdiNaarEcon.cls.xml) (revision 39740) @@ -275,6 +275,7 @@ Continue:PropertyName="MatAntislipKleur" Continue:PropertyName="MatVinylFiberglassKleur" Continue:PropertyName="MatWolviltKleur" + Continue:PropertyName="FrontBevestiging" Do ..ConverterData.Add(PropertyName,PropertyName) } @@ -283,6 +284,7 @@ Do ..ConverterData.Add("HeeftZijstabilisering","HeeftZijstabilisering","Set Output = $Select(Input=1: ""true"", 1:""false"")") Do ..ConverterData.Add("IsBinnenbreedte","IsBinnenbreedte","Set Output = $Select(Input=1: ""true"", 1:""false"")") Do ..ConverterData.Add("IsBinnenlade","IsBinnenlade","Set Output = $Select(Input=1: ""true"", 1:""false"")") + Do ..ConverterData.Add("FrontBevestiging","FrontBevestiging","Set Output = $Select(Input=""Z"": """", 1:Input)") Quit ..ConverterData ]]> Index: DOM/PM/enu/TBXFrontBevestiging.cls.xml =================================================================== diff -u -r38290 -r39740 --- DOM/PM/enu/TBXFrontBevestiging.cls.xml (.../TBXFrontBevestiging.cls.xml) (revision 38290) +++ DOM/PM/enu/TBXFrontBevestiging.cls.xml (.../TBXFrontBevestiging.cls.xml) (revision 39740) @@ -45,13 +45,6 @@ - - -1 -DOM.PM.enu.TBXFrontBevestiging - -