如何在数据步骤中获取数据集标签？

Question

我想获取set语句中的数据集标签，但我没有找到漂亮的方法。

我已经试过了：

data test;
    set sashelp.class;
    rc = open("sashelp.class");
    label = attrc(rc,"label");
    rc = close(rc);
run;

它可以工作，但还有一个缺点，就是我必须在open()函数中编写数据集的名称。
我正在寻找一种更好的方法来代替手动编写，因为我有数十个类似的步骤。

我也尝试&syslast过，但是没有用。可能还有其他办法吗？

Answer 1

也许是INDSNAME

18   data _null_;
19      set sashelp.class(obs=2 drop=_all_) sashelp.shoes(obs=2 drop=_all_)indsname=indsname;
20      retain label;
21      if indsname ne lag(indsname) then do;
22         rc = open(indsname); label=attrc(rc,"label"); rc=close(rc);
23         end;
24      put _all_;
25
26      run;

indsname=SASHELP.CLASS label=Student Data rc=0 _ERROR_=0 _N_=1
indsname=SASHELP.CLASS label=Student Data rc=. _ERROR_=0 _N_=2
indsname=SASHELP.SHOES label=Fictitious Shoe Company Data rc=0 _ERROR_=0 _N_=3
indsname=SASHELP.SHOES label=Fictitious Shoe Company Data rc=. _ERROR_=0 _N_=4