求助 帮忙解释下呗 谢谢

shiyiming

%macro wzq;
%let wzq=;
%let id=%sysfunc(open(mart_tj.su7201_1));
%put id=&id;
%let _data=%sysfunc(varnum(&id,data));
%let _where=%sysfunc(varnum(&id,where));
%let _in=%sysfunc(varnum(&id,in));

%do %while(%sysfunc(fetch(&id)) eq 0);
%let data=%sysfunc(getvarc(&id, &_data));
%let where=%sysfunc(getvarc(&id, &_where));
%let in=%sysfunc(getvarc(&id, &_in));

%if "&where" ne '' %then %do;
%let mwhere=%str(where=(&where));%end;
%else %let mwhere=;
%if &in ne %then %do;
%let qwhere=%str(in=&in);%end;
%else %let qwhere=;

%do;
   &data(&mwhere &qwhere)
%end;
%end;
%Str(;)
%let rc=%sysfunc(close(&id));
%put &rc;
%mend;

shiyiming

用数据集mart_tj.su7201_1里的变量值创建如下语句
[code:2oj2yynj]dataname(where(where=condition) (in=inflag))
dataname(where(where=condition) (in=inflag))
dataname(where(where=condition) (in=inflag))
...
;[/code:2oj2yynj]