这个我就不会了
得请高手们指教了

呵呵，非常感谢你的帮助

假设逻辑库a下有n个数据集；
%macro ds_union(libnm);
proc sql；
    create table dict_dsnm as select distinct
         memname as dsnm
    from dictionary.members
    where memtype='DATA' and libname="&libnm.";
    select count(distinct dsnm) into :ds_n from dict_dsnm;
    quit;
%do i=1 %to &ds_n.;
    data dsnm;
        set dict_dsnm;
        if _N_=&i.;
        call symput('dsnm',dsnm);
        run;
    data ds;
        set &dsnm;
        length type $50;
        type='&dsnm.';
        run;
    %if &i.=1 %then %do;
    data ds_union;
        set &dsnm.;
        length type $50;
        type="&dsnm.";
        run;
    %end;
    %else %do;
    proc sql;
        create table ds_union as
        select "&dsnm." as type, * from ds_union
        union       
        select "&dsnm." as type, * from &dsnm;
        quit;
    %end;
%end;
%mend ds_union;

%ds_union(a);

达人，好像搞不定呀

这个写了下，没在sas里测试下，可能有些语法错误，我给你测下看

好的，非常感谢你，帮我测测看

见上面的程序，可以了！

膜拜高人，终于解决了，分都给你了

请教一下：
"proc sql;
        create table dict_dsnm(where=(libnm=upcase("&libnm."))) as select distinct
                memname as dsnm, libname as libnm
        from dictionary.members        where memtype='DATA';
        select count(distinct dsnm) into :ds_n from dict_dsnm;
        quit;“中，“memname as dsnm, libname as libnm
        from dictionary.members        where memtype='DATA';“的用法都是固定的么？
还有就是我看你的宏变量末尾都加了个点，这是必须的么？

        if _N_=&i.;
        call symput('dsnm',dsnm);
这个是什么意思呀，菜鸟看不懂，还望你指教呀

点就是分割符，不是每个地方都需要，但个人习惯了都加上。

_N_是自动变量，值为记录序号；
call symput 输出dsnm值给宏变量dsnm

高手呀，向你学习，谢谢你

一个更简单的方法

哇塞，就这么点么？能解释下么，真的看不懂，呵呵

忘了说，9.2才行，set语句的option，创建一个内部变量记录观测来自的哪一个数据集