Sum Procedure