Index: FLOWTOE3.mac.rou =================================================================== diff -u -r63369 -r67419 --- FLOWTOE3.mac.rou (.../FLOWTOE3.mac.rou) (revision 63369) +++ FLOWTOE3.mac.rou (.../FLOWTOE3.mac.rou) (revision 67419) @@ -255,6 +255,7 @@ New ABNr Set ABNr=$P(^KTO(LEVNr,TLNr,1),"\",10) Kill ^KTO1(TLNr),^KTO2(LEVNr,TLNr),^KTO(LEVNr,TLNr),^BLBeri("Z",TLNr) + Do ##class(BL.Legacy.Toelevering).VerwijderAlleIndexen(TLNr) Do ##class(DOM.AKP.ToeleveringPrintbak).VerwijderToelevering(TLNr) Do:(LEVNr=5005) ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.BLOrdRspService).%New().VerwijderToelevering(TLNr) Do KILLAB(LEVNr,TLNr,ABNr)