1 %RegisteredObject 0 BatchID:%Integer APPS.Halux.common.Batch Toeleveringen van het type DOM.LEV.Toelevering Toeleveringen:%ListOfObjects="",Lijn:APPS.Halux.common.enu.ProductieLijn="" APPS.Halux.common.Batch 0) { Do ##class(TECH.ExceptionHandler).Throw(##class(APPS.Halux.common.impl.MaakBatchException).%New(MaakBatchErrorLijst)) } Quit Batch ]]> TECH.Iterator BatchID:%Integer %Status Geeft de batch waar een toelevering in zit. Indien niet in een batch dan geeft het leeg terug Toelevering:DOM.LEV.Toelevering APPS.Halux.common.Batch AantalDagen:%Integer=30 ? AND IsActief = 0") Do ResultSet.Execute(AantalDagen) While (ResultSet.Next()) { Do ##class(APPS.Halux.common.Batch).%DeleteId(ResultSet.Data("ID")) } ]]>