Index: FLOWOFF.mac.rou =================================================================== diff -u -r1733 -r2015 --- FLOWOFF.mac.rou (.../FLOWOFF.mac.rou) (revision 1733) +++ FLOWOFF.mac.rou (.../FLOWOFF.mac.rou) (revision 2015) @@ -540,17 +540,19 @@ Do ##class(CHUI.Flow.ConfiguratorHelper).StartConfiguratorMet(Parameters) Set BesteldeProducten = ##class(CHUI.Flow.ConfiguratorHelper).GeefBesteldeProducten(##class(APPS.VKP.Maatwerk.enu.DocumentType).Offerte(), OFFNr) - If (WijzigProduct) { Do MDELETE } + New GeselecteerdeLijn Set BesteldeProductenIterator = ##class(TECH.ListIterator).%New(BesteldeProducten.Lijst) While (BesteldeProductenIterator.HasNext()) { Set BesteldProduct = BesteldeProductenIterator.Next() Do PINSERT("","",BesteldProduct.GeefPRNr(),BesteldProduct.GeefAantal()) + Set OFLNr=Detail(@DL(1)@(6)) + Set $Piece(^KOFKL(KLNr,"F",OFFNr,OFLNr),"\",5) = BesteldProduct.GeefProjectReferentie() } Do BesteldeProducten.%DeleteId(BesteldeProducten.%Id())