pattern2.POLYMORPHISM

%global age;
%let income=income;
%let yrs_educ=yrs_educ;

data work.mark;
income = 75000;
yrs_educ = 20;
age = 40;
run;

/*
Parse dynamic number of variables to macro
call different functions
*/

%macro plot(yvar= ,xvar= );
%if %length(&xvar) and %length(&yvar) %then
%do;
proc plot data=work.mark;
plot &yvar*&xvar;
run;
%end;
%else %if %length(&yvar) %then
%do;
proc means data=work.mark;
var &yvar;
run;

%end;
%mend plot;

%plot(yvar=&income,xvar=&age)
%plot(yvar=&income,xvar=&yrs_educ)