Index: APPS/Halux/common/ProductieService.cls.xml =================================================================== diff -u -r1350 -r1988 --- APPS/Halux/common/ProductieService.cls.xml (.../ProductieService.cls.xml) (revision 1350) +++ APPS/Halux/common/ProductieService.cls.xml (.../ProductieService.cls.xml) (revision 1988) @@ -34,7 +34,7 @@ { Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Pallet() } - ElseIf ((Verpakking = ##class(DOM.PM.enu.TBXVerpakking).ProboxMetOnderdelen()) || (Verpakking = ##class(DOM.PM.enu.TBXVerpakking).ProboxZonderOnderdelen()) || (Verpakking = ##class(DOM.PM.enu.TBXVerpakking).CommissieZonderOnderdelen())) + ElseIf ((Verpakking = ##class(DOM.PM.enu.TBXVerpakking).ProboxMetOnderdelen()) || (Verpakking = ##class(DOM.PM.enu.TBXVerpakking).ProboxZonderOnderdelen())) { Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Probox() } Index: DOM/PM/TBXProduct/impl/TBXSifonladeTypeBlumImpl.cls.xml =================================================================== diff -u -r1898 -r1988 --- DOM/PM/TBXProduct/impl/TBXSifonladeTypeBlumImpl.cls.xml (.../TBXSifonladeTypeBlumImpl.cls.xml) (revision 1898) +++ DOM/PM/TBXProduct/impl/TBXSifonladeTypeBlumImpl.cls.xml (.../TBXSifonladeTypeBlumImpl.cls.xml) (revision 1988) @@ -106,11 +106,11 @@ Set TussenrugMateriaal = "" If ($Extract(SPZK,1,1) = "M") { - Set TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugMateriaal).Staal() + Set TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugMateriaal).Hout() } Else { - Set TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugMateriaal).Hout() + Set TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugMateriaal).Staal() } Quit TussenrugMateriaal ]]> Index: APPS/PM/Maatwerk/TBX/Frees/Generator.cls.xml =================================================================== diff -u -r1867 -r1988 --- APPS/PM/Maatwerk/TBX/Frees/Generator.cls.xml (.../Generator.cls.xml) (revision 1867) +++ APPS/PM/Maatwerk/TBX/Frees/Generator.cls.xml (.../Generator.cls.xml) (revision 1988) @@ -96,7 +96,7 @@ If (Uitsparingen.GetAt(1).IsRechteUitsparing()) { Set Variabelen("CorrSp") = 0.8 - If (TandemBox.GeefRugMateriaal() = ##class(DOM.PM.enu.TBXRugMateriaal).Hout()) + If (Uitsparingen.GetAt(1).GeefTussenrugMateriaal() = ##class(DOM.PM.enu.TBXRugMateriaal).Hout()) { Set Variabelen("CorrSp") = Variabelen("CorrSp") + 3 // extra uitsparing nodig bij houten ruggen }