%macro changeAE(oldname=,newname=,Label=,type=)
data AE;
set &protocolno..Ae;
rename=(&oldname=&newname)
;
label &oldname="&Label";
run;

data AE;
set AE;
format &newname &type;
run;
%mend changAE;
%changeAE(oldname=Protocol,newname=trt,Label=name of treatment,type=$8);