Exact CI for Risk Difference

proc freq;
  table TRT*Y / nocol nopercent riskdiff (cl=(wald exact)) ;
  weight n;
  exact riskdiff;
  run;

/* Newcombe CI */

proc freq;

  table strata*trt*y / riskdiff(cl=newcombe common) alpha=0.05;

run;