Index: DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml
===================================================================
diff -u -r38561 -r38564
--- DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38561)
+++ DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38564)
@@ -61,7 +61,7 @@
_ ";" _ TBXKenmerken.FrontHouderKleur
_ ";" _ TBXKenmerken.FrontOndersteuningAantal
_ ";" _ TBXKenmerken.FrontOndersteuningType
- _ ";" _ TBXKenmerken.HangmapBoringen
+ _ ";" _ TBXKenmerken.HangmapBoringAantal
_ ";" _ TBXKenmerken.Klasse
_ ";" _ TBXKenmerken.HeeftOpvullijstLinks
_ ";" _ TBXKenmerken.HeeftOpvullijstRechts
Index: vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml
===================================================================
diff -u -r38561 -r38564
--- vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38561)
+++ vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38564)
@@ -28,7 +28,7 @@
Set TBXKenmerken.FrontHouderKleur = "SW"
Set TBXKenmerken.FrontOndersteuningAantal = 1
Set TBXKenmerken.FrontOndersteuningType = ##class(DOM.PM.enu.TBXFrontOndersteuningType).FrontSteun()
- Set TBXKenmerken.HangmapBoringen = 0
+ Set TBXKenmerken.HangmapBoringAantal = 0
Set TBXKenmerken.Klasse = ##class(DOM.PM.enu.TBXKlas).Spoelbak()
Set TBXKenmerken.HeeftOpvullijstLinks = 1
Set TBXKenmerken.HeeftOpvullijstRechts = 0
Index: APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml
===================================================================
diff -u -r38561 -r38564
--- APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38561)
+++ APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38564)
@@ -87,7 +87,7 @@
Set ..IngegevenKenmerken.FrontHouderKleur = TBXKenmerken.FrontHouderKleur
Set ..IngegevenKenmerken.FrontOndersteuningAantal = TBXKenmerken.FrontOndersteuningAantal
Set ..IngegevenKenmerken.FrontOndersteuningType = TBXKenmerken.FrontOndersteuningType
- Set ..IngegevenKenmerken.HangmapBoringen = TBXKenmerken.HangmapBoringen
+ Set ..IngegevenKenmerken.HangmapBoringAantal = TBXKenmerken.HangmapBoringen
Set ..IngegevenKenmerken.HeeftOpvullijstLinks = TBXKenmerken.HeeftOpvullijstLinks
Set ..IngegevenKenmerken.HeeftOpvullijstRechts = TBXKenmerken.HeeftOpvullijstRechts
Set ..IngegevenKenmerken.Klasse = TBXKenmerken.Klasse
Index: DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml
===================================================================
diff -u -r38561 -r38564
--- DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38561)
+++ DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38564)
@@ -64,7 +64,7 @@
DOM.PM.enu.TBXFrontOndersteuningType
-
+
%Integer
@@ -267,7 +267,7 @@
Set ..HeeftOpvullijstRechts = 0
Set ..Antislipmat = "0"
Set ..FrontOndersteuningType = ##class(DOM.PM.enu.TBXFrontOndersteuningType).FrontSteun()
- Set ..HangmapBoringen = 0
+ Set ..HangmapBoringAantal = 0
Set ..DwarsverdelingAantal = ##class(DOM.PM.enu.TBXDwarsverdeling).Zonder()
Set ..RugMateriaal = ##class(DOM.PM.enu.TBXRugMateriaal).Hout()
Set ..Verpakking = ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen() ; Stuk
@@ -646,7 +646,7 @@
FrontOndersteuningType
-HangmapBoringen
+HangmapBoringAantal
CorpusBinnenbreedte
Index: APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml
===================================================================
diff -u -r38563 -r38564
--- APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38563)
+++ APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38564)
@@ -63,8 +63,8 @@
Do ..Controleer(TBXKenmerken.FrontOndersteuningType,Product.GeefFrontOndersteuningType(),"FrontOndersteuningType", ErrorLijst)
Do ..IsValid(TBXKenmerken.FrontOndersteuningType,"DOM.PM.enu.TBXFrontOndersteuningType", ErrorLijst)
- Set TBXKenmerken.HangmapBoringen = Product.GeefAantalHangmappen()
- Do ..Controleer(TBXKenmerken.HangmapBoringen,Product.GeefAantalHangmappen(),"HangmapBoringen", ErrorLijst)
+ Set TBXKenmerken.HangmapBoringAantal = Product.GeefAantalHangmappen()
+ Do ..Controleer(TBXKenmerken.HangmapBoringAantal,Product.GeefAantalHangmappen(),"HangmapBoringen", ErrorLijst)
Set TBXKenmerken.HeeftOpvullijstLinks = Product.BevatOpvullijstLinks()
If (TBXKenmerken.HeeftOpvullijstLinks = "") { Do ErrorLijst.Insert("HeeftOpvullijstLinks niet ingevuld") }