%macro missing(data);
data &data;
set &data;
array TEMP _numeric_;
do over TEMP;
if missing(TEMP) then TEMP=0;
end;
run;
data &data;
set &data;
array TEMP _character_;
do over TEMP;
if missing(TEMP) then TEMP=0;
end;
run;
%mend;