%macro my_cn2(data =, y =, x =, c_x =, l_r=, z =);
ods trace on / listing;
proc contents data = &data.;
ods output Variables = contents_;
run;
ods trace off;
data contents_;
set contents_;
where upcase(Variable) = "%upcase(&y.)";
call symputx("type", type);
run;
%if "&type." = "Num"...
