Index: APPS/common/impl/KindProductenMetAantallenBepaler.cls.xml =================================================================== diff -u -r33659 -r33847 --- APPS/common/impl/KindProductenMetAantallenBepaler.cls.xml (.../KindProductenMetAantallenBepaler.cls.xml) (revision 33659) +++ APPS/common/impl/KindProductenMetAantallenBepaler.cls.xml (.../KindProductenMetAantallenBepaler.cls.xml) (revision 33847) @@ -17,11 +17,12 @@ #dim Aantal = 0 If ##class(DOM.PM.enu.LinkType).HalffabrikaatHaluxZonderStock() '= BS.GeefProduct().GeefLinkType() { - If (KinderenMetAantal.IsDefined(BS.GeefPRNr())) + #dim KindBSProductID As %String = BS.GeefPRNr() + If KinderenMetAantal.IsDefined(KindBSProductID) { - Set Aantal = KinderenMetAantal.GetAt(BS.GeefPRNr()) + Set Aantal = KinderenMetAantal.GetAt(KindBSProductID) } - Do KinderenMetAantal.SetAt(Aantal + BS.GeefAantal(), BS.GeefPRNr()) + Do KinderenMetAantal.SetAt(Aantal + BS.GeefAantal(), KindBSProductID) } } }