Save all & close

Is there any one who have a macro that Save all the open files and then close all of it?SolidworksApi macros