Index: vhTest/Mock/APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml
===================================================================
diff -u -r52614 -r56101
--- vhTest/Mock/APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml (.../MaatwerkLijnBuilder.cls.xml) (revision 52614)
+++ vhTest/Mock/APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml (.../MaatwerkLijnBuilder.cls.xml) (revision 56101)
@@ -8,6 +8,13 @@
APPS.EC.Winkelkar.impl.MaatwerkLijnBuilder,Tools.Mock.MockClassBase
right
+
+VerpakkingService:APPS.PM.Maatwerk.impl.VerpakkingService="",AdminTekstUtils:APPS.common.AdminTekstUtils="",DoorHandelMeeleverenBepalerFactory:APPS.EC.Winkelkar.impl.DoorHandelMeeleverenBepalerFactory
+%Status
+
+
+
Lijn:DOM.EC.Winkelkar.MaatwerkLijn
1
+
+DOM.common.ProjectSettingsAPI
+1
+
+
VerpakkingService:APPS.PM.Maatwerk.impl.VerpakkingService
1
@@ -56,7 +61,7 @@
Set ..VerpakteAfmetingBerekenaarFactory = ##class(APPS.EC.Winkelkar.impl.VerpakteAfmetingBerekenaarFactory).%New()
Set ..VerpakkingService = $$$Inject(VerpakkingService, ##class(APPS.PM.Maatwerk.impl.VerpakkingService).%New())
Set ..IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
-
+ Set ..ProjectSettingsAPI = ##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI()
quit $$$OK
]]>
@@ -180,20 +185,22 @@
do ##class(vhLib.Logger).%New().Info("Data Correctie","Rughoogte '"_IngegevenKenmerkenDto.RugHoogte_"' gelijkgesteld aan LadeHoogte '"_IngegevenKenmerkenDto.LadeHoogte_"'")
set IngegevenKenmerkenDto.RugHoogte = IngegevenKenmerkenDto.LadeHoogte
}
- If ##class(TECH.Context.RuntimeContext).Instance().GeefPersonalityID() = ##class(DOM.common.enu.Personality).Daro(){
- If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox()) {
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).Glijder())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSetEenhedenEnMeenemers())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSynchronisatieStang())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieStang())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieTandwiel())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).FrontBevestiging())
+ If $$$Not(..ProjectSettingsAPI.IsDaroExcludeFromDeliveryEnabled()){
+ If ##class(TECH.Context.RuntimeContext).Instance().GeefPersonalityID() = ##class(DOM.common.enu.Personality).Daro(){
+ If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox()) {
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).Glijder())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSetEenhedenEnMeenemers())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSynchronisatieStang())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieStang())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieTandwiel())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).FrontBevestiging())
+ }
+ If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure() && ( IngegevenKenmerkenDto.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade() )) {
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).Geleider())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).FrontBevestiging())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).BevestigingBodemFront())
+ }
}
- If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure() && ( IngegevenKenmerkenDto.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade() )) {
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).Geleider())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).FrontBevestiging())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).BevestigingBodemFront())
- }
}
}
Index: vhTest/Mock/DOM/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml
===================================================================
diff -u -r53657 -r56101
--- vhTest/Mock/DOM/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml (.../MaatwerkLijnBuilder.cls.xml) (revision 53657)
+++ vhTest/Mock/DOM/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml (.../MaatwerkLijnBuilder.cls.xml) (revision 56101)
@@ -8,6 +8,13 @@
DOM.EC.Winkelkar.impl.MaatwerkLijnBuilder,Tools.Mock.MockClassBase
right
+
+VerpakkingService:APPS.PM.Maatwerk.impl.VerpakkingService
+%Status
+
+
+
Lijn:DOM.EC.Winkelkar.MaatwerkLijn
1
+
+DOM.common.ProjectSettingsAPI
+1
+
+
VerpakkingService:APPS.PM.Maatwerk.impl.VerpakkingService="",AdminTekstUtils:APPS.common.AdminTekstUtils="",DoorHandelMeeleverenBepalerFactory:APPS.EC.Winkelkar.impl.DoorHandelMeeleverenBepalerFactory
1
@@ -72,6 +77,7 @@
Set ..DomIngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
Set ..AppsDtoIngegevenKenmerkenTypeAPI = ##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
Set ..DoorHandelMeeleverenBepalerFactory = $$$Inject(DoorHandelMeeleverenBepalerFactory,##class(APPS.EC.Winkelkar.impl.DoorHandelMeeleverenBepalerFactory).%New())
+ Set ..ProjectSettingsAPI = ##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI()
Quit $$$OK
]]>
@@ -154,22 +160,23 @@
Set IngegevenKenmerkenDto.RugHoogte = IngegevenKenmerkenDto.LadeHoogte
}
}
- If ##class(TECH.Context.RuntimeContext).Instance().GeefPersonalityID() = ##class(DOM.common.enu.Personality).Daro(){
- If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox()) {
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).Glijder())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSetEenhedenEnMeenemers())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSynchronisatieStang())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieStang())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieTandwiel())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).FrontBevestiging())
+ If $$$Not(..ProjectSettingsAPI.IsDaroExcludeFromDeliveryEnabled()){
+ If ##class(TECH.Context.RuntimeContext).Instance().GeefPersonalityID() = ##class(DOM.common.enu.Personality).Daro(){
+ If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox()) {
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).Glijder())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSetEenhedenEnMeenemers())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSynchronisatieStang())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieStang())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieTandwiel())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).FrontBevestiging())
+ }
+ If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure() && ( IngegevenKenmerkenDto.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade() )) {
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).Geleider())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).FrontBevestiging())
+ Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).BevestigingBodemFront())
+ }
}
- If (IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure() && ( IngegevenKenmerkenDto.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade() )) {
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).Geleider())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).FrontBevestiging())
- Do IngegevenKenmerkenDto.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXNietMeeleveren).BevestigingBodemFront())
- }
- }
-
+ }
}
}
#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken