Index: DOM/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml
===================================================================
diff -u -r54752 -r56101
--- DOM/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml (.../MaatwerkLijnBuilder.cls.xml) (revision 54752)
+++ DOM/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml (.../MaatwerkLijnBuilder.cls.xml) (revision 56101)
@@ -43,6 +43,11 @@
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())
- }
}
}