Exact confidence intervals based on the hypergeometric distribuiton

I need to estimates some exact confidence intervals for one 
proportion based on the exact hypergeometric distribution of the number of 
units in the sample with the attribute. Does a code exist for performing such 
procedure? 

Thanks for your help.

Washington S. Silva