Private Sub RemoveBatch()

    Dim oBatch As CBatchAPI
    Set oBatch = New CBatchAPI
   
    oBatch.Init REApplication.SessionContext
    oBatch.Load 89
   
    oBatch.Delete
   
    oBatch.Closedown
    Set oBatch = Nothing
   
End Sub