Index: PRDUPLI.mac.rou =================================================================== diff -u -r1122 -r1123 --- PRDUPLI.mac.rou (.../PRDUPLI.mac.rou) (revision 1122) +++ PRDUPLI.mac.rou (.../PRDUPLI.mac.rou) (revision 1123) @@ -174,7 +174,6 @@ Set ProductID = itProductID.Next() For i = 1 : 1 : $LL(lbClearKenmerken) { Set UnID = ##class(BL.Kenm.ProdMulti).GetFullID(ProductID.PRNr, ProductID.MultipleNr) - Do WLIP^vhDBG(127,"UnID : "_UnID_" -> "_$ListGet(lbClearKenmerken,i)) Do ##class(Prod.Kenmerk.DataDefinitie).DeleteKM("OL",UnID,$ListGet(lbClearKenmerken,i)) } }