data a;
input x1 x2 x3$;
cards;
1 . s
. 2 g
9 5 .
;
run;

data b;
set a;
array char _CHARACTER_;
array numr _NUMERIC_;
do over char;
if char eq "" then char="0";
end;
do over numr;
if numr eq . then numr=0;
end;
run;

楼上的OK！

学习了，谢谢

data a;
input a b c$;
cards;
1 2 s
3 4 b
5 . g
7 8 .
. . y
. 6 .
;
run;
data b;
set a;
if a=. then a=0;
if b=. then b=0;
if c="" then c="0";
run;

有没有简单的办法？