libname in 'C:\Documents and Settings\WHALEN\Desktop' access=readonly;
options nofmterr;

proc format; value rf 1='no drug'
                      2='low dose'
		              3='high dose'
		               ;
			 value sx 1='Male'
			          2='Female'
					  ;
run;

data neweff; set in.eff;
  if status='Completed';
run;

data neweffonerec; set neweff;
  if week=99;
run;

proc mixed data=neweffonerec;
  class csite rxgp;
  model pnchg = rxgp csite pain0;
  format rxgp rf. ;
  lsmeans rxgp / diff adjust=tukey cl;
run;

proc print;
where csite in ('1001','1002') or nsex=1;
var subjid nsex rxgp;
format nsex sx. rxgp rf. ;
run;