Index: DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/v004/ZijkantLogo.cls.xml =================================================================== diff -u -r51619 -r51622 --- DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/v004/ZijkantLogo.cls.xml (.../ZijkantLogo.cls.xml) (revision 51619) +++ DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/v004/ZijkantLogo.cls.xml (.../ZijkantLogo.cls.xml) (revision 51622) @@ -36,9 +36,11 @@ If ..ZijkantLogoRepository.BestaatViaLogoID(IngegevenKenmerken.ZijkantLogoID) { #dim ZijkantLogo As DOM.PM.Maatwerk.TAX.Data.ZijkantLogo = ..ZijkantLogoRepository.GeefViaLogoID(IngegevenKenmerken.ZijkantLogoID) + #dim KostPrijs As %Decimal = 0 - Set:$$$Not(ZijkantLogo.IsGratis) KostPrijs = ZijkantLogo.KostPrijs * 2 - #dim KostItem As DOM.PM.Maatwerk.Calc.Kost.KostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.KostItem).%New(..Naam,KostPrijs,ZijkantLogo.Naam) + Set:$$$Not(ZijkantLogo.IsGratis) KostPrijs = ZijkantLogo.KostPrijs * 1 + + Set KostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.ExtraKostItem).%New(..Naam,KostPrijs,ZijkantLogo.Naam, 2) Do SamengesteldKostItem.VoegToe(KostItem) } }