使用SAS中的proc sql简单迭代数组

Question

我只想循环遍历列表并使用列表中的'i'元素运行一个过程,并使用结果创建一个名为'i'的表.我已经尝试了我能找到的每个资源的语法,但无法使其工作.这是一些代码/伪代码,说明了我的需要.提前谢谢了!

array itemlist[*] (100,101,102);

proc sql;
    do i=1 to dim(itemlist);
    create table somelibname.[itemlist(i)] as
        select * from somelibname.sometable
        where item=itemlist(i);
    end;
quit;

Answer 1

您需要使用宏来为您"编写"SAS代码.

这应该做你想要的.它采用以空格分隔的值列表,并根据代码指定的内容循环它们.如果您对此有疑问,请发表评论.

%macro doit(list);
proc sql noprint;
%let n=%sysfunc(countw(&list));
    %do i=1 %to &n;
        %let val = %scan(&list,&i);
        create table somlib._&val as
            select * from somlib.somtable
            where item=&val;
    %end;
quit;
%mend;

%doit(100 101 102);

注意,数据集不能以数字开头,所以我从'_'开始