V6: Macro to save as new

I cannot find any methods for save an ActiveObject as new? Does anyone know how to do this or if there is a resource that has what GetService functions are available? We are having issues with old users have reserved files and are looking for a mass way to save them as new. Ideally, making a script if possible with CATIA... but it might be too good to be true.