Index: KPRIJS.mac.rou =================================================================== diff -u -r46545 -r46546 --- KPRIJS.mac.rou (.../KPRIJS.mac.rou) (revision 46545) +++ KPRIJS.mac.rou (.../KPRIJS.mac.rou) (revision 46546) @@ -14,7 +14,6 @@ quit $$KlantPrijsNaarKlantPrijsObject($$KLANTPR(.KLNr,.PRNr,.NoSa,.SimPPL)) KlantPrijsNaarKlantPrijsObject(Record) - //Do ##class(Tools.Wlip).%New(42).String("KLNr: " _ $piece(Record,"\",16)) new PrijsInfo set PrijsInfo = ##class(APPS.VKP.dto.PrijsInfo).%New() set PrijsInfo.Prijs = +$piece(Record,"\",1) set PrijsInfo.Munt = $piece(Record,"\",2)