Index: EWORDS.mac.rou =================================================================== diff -u -r50442 -r50594 --- EWORDS.mac.rou (.../EWORDS.mac.rou) (revision 50442) +++ EWORDS.mac.rou (.../EWORDS.mac.rou) (revision 50594) @@ -519,7 +519,7 @@ Set Aantal = $Piece(LijnRec, "\", 1) // ^HULP data, aangemaakt v��r aanroepen van SAVE(), bijhouden in PickingOpdrachtInfoLijst - Do PickingOpdrachtInfoLijst.Insert(##class(BL.Legacy.EWORDS.PickingOpdrachtInfo).%New(Aantal, LeverDatum, ORDNr, OLU)) // DEZE MOET IN EEN LOOP OVER ALLE ORDNr's STAAN. + Do PickingOpdrachtInfoLijst.Insert(##class(BL.Legacy.EWORDS.PickingOpdrachtInfo).%New(Aantal, LeverDatum, ORDNr, OLU)) } } @@ -582,8 +582,7 @@ While (PickingOpdrachtInfoIterator.HasNext()) { Set PickingOpdrachtInfo = PickingOpdrachtInfoIterator.Next() - Kill ^HULP(%J, KLNr, "M", "A", PickingOpdrachtInfo.GeefOrderNummer(), PickingOpdrachtInfo.GeefOrderLijnNummer()) // Waarom geen kill op ordernummer-niveau, of zelfs op (...M,A)-niveau? - // TBD: PickingOpdrachtInfoLijst.Remove(PickingOpdrachtInfo) ??? + Kill ^HULP(%J, KLNr, "M", "A", PickingOpdrachtInfo.GeefOrderNummer(), PickingOpdrachtInfo.GeefOrderLijnNummer()) } }