Index: APPS/PM/Maatwerk/impl/DefaultsViaKenmerkWijzigingenToepasser.cls.xml
===================================================================
diff -u -r29059 -r32998
--- APPS/PM/Maatwerk/impl/DefaultsViaKenmerkWijzigingenToepasser.cls.xml (.../DefaultsViaKenmerkWijzigingenToepasser.cls.xml) (revision 29059)
+++ APPS/PM/Maatwerk/impl/DefaultsViaKenmerkWijzigingenToepasser.cls.xml (.../DefaultsViaKenmerkWijzigingenToepasser.cls.xml) (revision 32998)
@@ -32,8 +32,12 @@
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang())
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet())
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Opvullijst())
- Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionEenheid())
- Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionMeenemer())
+ If $$$Not(##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI().IsActiefLBXTOB("Intern")) {
+ Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionEenheid())
+ Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionMeenemer())
+ } else {
+ Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionSetEenhedenEnMeenemers())
+ }
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionSynchronisatieAdapter())
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionSynchronisatieStang())
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).AfdekkapBinnen())
@@ -44,8 +48,6 @@
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).FrontBevestiging())
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Zijstabilisering())
Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).InschuifElementVoor())
- Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieStang())
- Do LBXKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponSynchronisatieSet())
}
}
]]>
Index: APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml
===================================================================
diff -u -r32368 -r32998
--- APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml (.../KenmerkDomeinPostProcessor.cls.xml) (revision 32368)
+++ APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml (.../KenmerkDomeinPostProcessor.cls.xml) (revision 32998)
@@ -146,8 +146,12 @@
Do NietMeeleveren.Insert(..LBXEnum.Rol.FrontBevestiging)
Do NietMeeleveren.Insert(..LBXEnum.Rol.Opvullijst)
Do NietMeeleveren.Insert(..LBXEnum.Rol.Zijstabilisering)
- Do NietMeeleveren.Insert(..LBXEnum.Rol.TiponBlumotionEenheid)
- Do NietMeeleveren.Insert(..LBXEnum.Rol.TiponBlumotionMeenemer)
+ If $$$Not(##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI().IsActiefLBXTOB("Intern")) {
+ Do NietMeeleveren.Insert(..LBXEnum.Rol.TiponBlumotionEenheid)
+ Do NietMeeleveren.Insert(..LBXEnum.Rol.TiponBlumotionMeenemer)
+ } else {
+ Do NietMeeleveren.Insert(..LBXEnum.Rol.TiponBlumotionSetEenhedenEnMeenemers)
+ }
Do NietMeeleveren.Insert(..LBXEnum.Rol.TiponBlumotionSynchronisatieAdapter)
Do NietMeeleveren.Insert(..LBXEnum.Rol.TiponBlumotionSynchronisatieStang)
Index: DOM/PM/Maatwerk/Calc/HF/enu/LBXRol/Verwerker.cls.xml
===================================================================
diff -u -r29471 -r32998
--- DOM/PM/Maatwerk/Calc/HF/enu/LBXRol/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 29471)
+++ DOM/PM/Maatwerk/Calc/HF/enu/LBXRol/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 32998)
@@ -70,6 +70,8 @@
Do ..VerwerkTiponBlumotionEenheid()
} ElseIf LBXRol = "TiponBlumotionMeenemer" {
Do ..VerwerkTiponBlumotionMeenemer()
+ } ElseIf LBXRol = "TiponBlumotionSetEenhedenEnMeenemers" {
+ Do ..VerwerkTiponBlumotionSetEenhedenEnMeenemers()
} ElseIf LBXRol = "TiponBlumotionSynchronisatieAdapter" {
Do ..VerwerkTiponBlumotionSynchronisatieAdapter()
} ElseIf LBXRol = "TiponBlumotionSynchronisatieStang" {
@@ -89,7 +91,7 @@
} ElseIf LBXRol = "Zijstabilisering" {
Do ..VerwerkZijstabilisering()
} Else {
- Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(LBXRol,"DOM.PM.Maatwerk.Calc.HF.enu.LBXRol")
+ Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(LBXRol,"DOM.PM.Maatwerk.Calc.HF.enu.LBXRol",$classname())
Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
}
]]>
@@ -269,6 +271,12 @@
+
+1
+1
+
+
+
1
1
Index: vhTestFiles/IntegratieTests/ProductBeheer.Maatwerk.Configurator.Legrabox.GeefDomein/Test/Intern/VanHoecke/VanHoeckeKlantZonderProbox/VanHoeckeGebruiker/File_001.xml
===================================================================
diff -u -r32753 -r32998
--- vhTestFiles/IntegratieTests/ProductBeheer.Maatwerk.Configurator.Legrabox.GeefDomein/Test/Intern/VanHoecke/VanHoeckeKlantZonderProbox/VanHoeckeGebruiker/File_001.xml (.../File_001.xml) (revision 32753)
+++ vhTestFiles/IntegratieTests/ProductBeheer.Maatwerk.Configurator.Legrabox.GeefDomein/Test/Intern/VanHoecke/VanHoeckeKlantZonderProbox/VanHoeckeGebruiker/File_001.xml (.../File_001.xml) (revision 32998)
@@ -121,8 +121,7 @@
FrontBevestiging
Opvullijst
Zijstabilisering
- TiponBlumotionEenheid
- TiponBlumotionMeenemer
+ TiponBlumotionSetEenhedenEnMeenemers
TiponBlumotionSynchronisatieAdapter
TiponBlumotionSynchronisatieStang
Index: vhTestFiles/IntegratieTests/ProductBeheer.Maatwerk.Configurator.Legrabox.GeefDomein/Test/Intern/VanHoecke/VanHoeckeKlantMetProbox/VanHoeckeGebruiker/File_001.xml
===================================================================
diff -u -r32753 -r32998
--- vhTestFiles/IntegratieTests/ProductBeheer.Maatwerk.Configurator.Legrabox.GeefDomein/Test/Intern/VanHoecke/VanHoeckeKlantMetProbox/VanHoeckeGebruiker/File_001.xml (.../File_001.xml) (revision 32753)
+++ vhTestFiles/IntegratieTests/ProductBeheer.Maatwerk.Configurator.Legrabox.GeefDomein/Test/Intern/VanHoecke/VanHoeckeKlantMetProbox/VanHoeckeGebruiker/File_001.xml (.../File_001.xml) (revision 32998)
@@ -121,8 +121,7 @@
FrontBevestiging
Opvullijst
Zijstabilisering
- TiponBlumotionEenheid
- TiponBlumotionMeenemer
+ TiponBlumotionSetEenhedenEnMeenemers
TiponBlumotionSynchronisatieAdapter
TiponBlumotionSynchronisatieStang
Index: DOM/PM/Maatwerk/Calc/HF/enu/LBXRol/AutoComplete.cls.xml
===================================================================
diff -u -r29471 -r32998
--- DOM/PM/Maatwerk/Calc/HF/enu/LBXRol/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 29471)
+++ DOM/PM/Maatwerk/Calc/HF/enu/LBXRol/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 32998)
@@ -212,6 +212,13 @@
1
+
+DOM.PM.Maatwerk.Calc.HF.enu.LBXRol
+"TiponBlumotionSetEenhedenEnMeenemers"
+1
+1
+
+
DOM.PM.Maatwerk.Calc.HF.enu.LBXRol
"TiponBlumotionSynchronisatieAdapter"
Index: APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml
===================================================================
diff -u -r32368 -r32998
--- APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 32368)
+++ APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 32998)
@@ -44,8 +44,13 @@
Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponSynchronisatieSet _ ..LBXEnum.Rol.TiponSynchronisatieStang)
Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.Opvullijst)
Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.Zijstabilisering)
- Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponBlumotionEenheid)
- Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponBlumotionMeenemer)
+
+ If $$$Not(##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI().IsActiefLBXTOB("Intern")) {
+ Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponBlumotionEenheid)
+ Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponBlumotionMeenemer)
+ } else {
+ Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponBlumotionSetEenhedenEnMeenemers)
+ }
Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponBlumotionSynchronisatieAdapter)
Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.NietMeeleveren, ..LBXEnum.Rol.TiponBlumotionSynchronisatieStang)
Index: vhDeploy/Deploy20160302xLBXTOBInternActief.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20160302xLBXTOBInternActief.cls.xml (revision 0)
+++ vhDeploy/Deploy20160302xLBXTOBInternActief.cls.xml (revision 32998)
@@ -0,0 +1,21 @@
+
+
+
+vhDeploy.Deploy
+
+
+1
+
+
+
+
+%String
+Actief zetten projectsetting LBXTOB intern
+
+
+
+
+
Index: vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r32985 -r32998
--- vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml (.../TestDoos.cls.xml) (revision 32985)
+++ vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml (.../TestDoos.cls.xml) (revision 32998)
@@ -10,11 +10,12 @@
1
-
+
+aTestName:%String
@@ -224,14 +225,20 @@
Set LBXKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).TIPONBLUMOTION()
#Dim DoosBerekenaar as APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(LBXKenmerken)
- #dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
+ #dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
- Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 75)
+ if ##class(TECH.Config.ConfigMgr).Instance().GetString("DOM.common.ProjectSettingsAPI_IsActiefLBXTOBIntern") = $$$True {
+ Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 20)
+ } else {
+ Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 75)
+ }
]]>
+
+
+
+