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) + } ]]> + + + +