Create Reference Point for Multiple circles- Quick Way

HI

I am planning to create a Reference points for all the holes in my Model as shown Below using the following procedure.

Is there a better way to do it fast at once or any API macro suggested?

srini

SolidworksParts And Features