Index: DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsGemonteerdeLadeBepaler.cls.xml =================================================================== diff -u -r54715 -r61005 --- DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsGemonteerdeLadeBepaler.cls.xml (.../IsGemonteerdeLadeBepaler.cls.xml) (revision 54715) +++ DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsGemonteerdeLadeBepaler.cls.xml (.../IsGemonteerdeLadeBepaler.cls.xml) (revision 61005) @@ -53,7 +53,7 @@ // niet enkel afhankelijk maken van productiewijze want : // indien flatpackverpakkingen geen productiewijze zetten, dan toch steeds als niet gemonteerd weergeven. #Dim VerpakkingType As DOM.PM.enu.TAORVerpakkingType.AutoComplete = ##class(DOM.PM.enu.TAORVerpakkingType.AutoComplete).%New() - Set ..IsGemonteerdeLade = ##class(TECH.StringUtils).Equals(TAORKenmerken.VerpakkingType, VerpakkingType.V1, VerpakkingType.Probox) + Set ..IsGemonteerdeLade = ##class(TECH.StringUtils).Equals(TAORKenmerken.VerpakkingType, VerpakkingType.V1, VerpakkingType.Probox, VerpakkingType.Pallet) #Dim DomProductieWijze As DOM.PM.enu.TAORProductieWijze.AutoComplete = ##class(DOM.PM.enu.TAORProductieWijze.AutoComplete).%New() Set ..IsGemonteerdeLade = ..IsGemonteerdeLade && ##class(TECH.StringUtils).Equals(TAORKenmerken.ProductieWijze, DomProductieWijze.Volledig) Index: vhUnitTest/DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsGemonteerdeLadeBepaler/IsGemonteerdeLade/Test.cls.xml =================================================================== diff -u -r60991 -r61005 --- vhUnitTest/DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsGemonteerdeLadeBepaler/IsGemonteerdeLade/Test.cls.xml (.../Test.cls.xml) (revision 60991) +++ vhUnitTest/DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsGemonteerdeLadeBepaler/IsGemonteerdeLade/Test.cls.xml (.../Test.cls.xml) (revision 61005) @@ -13,9 +13,9 @@ #Dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLadeVerpaktIn(VerpakkingType) #Dim VerwachteWaarde As %Boolean = $$$DummyString - If ##class(TECH.StringUtils).Equals(VerpakkingType, TAORVerpakkingType.V1, TAORVerpakkingType.Probox) { + If ##class(TECH.StringUtils).Equals(VerpakkingType, TAORVerpakkingType.V1, TAORVerpakkingType.Probox, TAORVerpakkingType.Pallet) { Set VerwachteWaarde = $$$True - } ElseIf ##class(TECH.StringUtils).Equals(VerpakkingType, TAORVerpakkingType.BulkPerOnderdeelGegroepeerd, TAORVerpakkingType.FlatpackV1, TAORVerpakkingType.LosseComponentenInBulk, TAORVerpakkingType.Pallet) { + } ElseIf ##class(TECH.StringUtils).Equals(VerpakkingType, TAORVerpakkingType.BulkPerOnderdeelGegroepeerd, TAORVerpakkingType.FlatpackV1, TAORVerpakkingType.LosseComponentenInBulk) { Set VerwachteWaarde = $$$False }