BerekenTijdenAbstract %Date 1 %String 1 d ##class(APPS.Halux.Planning.Pitching.impl.BerekenTijdenAfhankelijke).%New().Bereken() rsToelev:%ResultSet rsToelev:%ResultSet,rsLijn:%ResultSet ",ResourcePitched.EindTijdstip,! Do ResourcePitched.Save() Quit ResourcePitched ]]> ToeleveringNr:%String TECH.Iterator TECH.Iterator 0" _" group by batch, toeleveringnr" Do rs.Prepare(SQL) Set sc=rs.Execute() Set it=##class(TECH.ResultSetIterator).%New(rs) Quit it ]]> BatchID:%String BatchID:%String,Resource:%String BatchID:%String 0 group by Resource) Set ..BatchesStartTijdstip(BatchID)=StartTijdstip Set ..BatchesLeverenAanResource(BatchID)=LeverenAanResource ]]> Resource:%String