Class CreateSubProgramByCopyFunction