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
-
-