I need to run over 30 univariate logistic regression models. I want to make these codes using macro but whatever I do, it didn't produce the summary. Can someone please help me?
Non-macro code:
ods output OddsRatios = odds1;
ods output ParameterEstimates = param1;
proc logistic data=base;
class sexc / param=ref ref=first;
model revasc6m (event='1') = sexc;
run;
ods output OddsRatios = odds2;
ods output ParameterEstimates = param2;
proc logistic data=base;
class ethnicityc / param=ref ref=first;
model revasc6m (event='1') = ethnicityc;
run;
ods output OddsRatios = odds3;
ods output ParameterEstimates = param3;
proc logistic data=base;
model revasc6m (event='1') = age;
run;
ods output OddsRatios = odds4;
ods output ParameterEstimates = param4;
proc logistic data=base;
model revasc6m (event='1') = bmi;
run;
data combined_OR;
set odds1 odds2 odds3 odds4;
run;
data combined_PA;
set param1 param2 param3 param4;
run;
Macro code I tried (the output file _null_ has 0 case) :
%macro univariate_logistic(data=, event=, vars=, class_vars=);
/* Create a temporary table to store results */
data _null_;
length var_name $20;
run;
/* Check if there are any class variables */
%let has_class_vars = %length(&class_vars);
%if &has_class_vars > 0 %then %do;
/* Run logistic regression for categorical variables */
%do i = 1 %to %sysfunc(countw(&class_vars));
%let var = %scan(&class_vars, &i);
proc logistic data=&data;
class &var / param=ref ref=last;
model &event (event='1') = &var;
run;
%end;
%end;
/* Run logistic regression for continuous variables */
%do i = 1 %to %sysfunc(countw(&vars));
%let var = %scan(&vars, &i);
proc logistic data=&data;
model &event (event='1') = &var;
run;
%end;
/* Append results to temporary table */
data _null_;
set _null_;
var_name = &var;
output;
run;
%end;
/* Output final results table */
proc print data=_null_;
run;
%mend;
%univariate_logistic(data=base, event=revasc6m, vars=age bmi ,
class_vars= sexc ethnicityc );
