我想把下面程序用后面的宏命令解决，只生成了f1数据库，f2 f3运行未成功，请大家帮助！我要生成20个数据库，谢谢
data f1;
set w.c20;
if c20='配方奶（粉）' ;
if c20c=2 then f1=1;
keep id a1 f1;
proc sort;
by id a1;
run;
data f2;
set w.c20;
if c20='普通奶粉或新鲜动物奶' ;
if c20c=2 then f2=1;
keep id a1 f2;
proc sort;
by id a1;
run;
data f3;
set w.c20;
if c20='很稀的酸奶' ;
if c20c=2 then f3=1;
keep id a1 f3;
proc sort;
by id a1;
run;

宏命令如下

%macro food(foodtype,fg);
data f&fg;
set w.c20;
if c20="&foodtype";
if c20c=2 then f&fg=1;
keep id a1 f&fg;
proc sort;
by id a1;
run;
%mend food;

%food(配方奶（粉）,1)
%food(普通奶粉或新鲜动物奶,2）
%food(很稀的酸奶,3）