SAS：如何循环工作文件以附加多个数据库表

Question

我有一大堆数据库表，需要将其附加到 SAS 上的一个合并表中。

• 该表列表定期更改。
• 此列表中的某些表没有使用相同的列名。
• 如果列名称不同，列表将指示等效名称。

该表列表从 csv 文件导入到 SAS 中，类似于以下数据：

index	table_name	column_1_name
1	table_one_a	column1
2	table_one_b	columnOne
3	table_one_c	column_1
4	table_one_d	column_1_1
etc ........	等等.....	等等.. ...

我想附加此列表中的每个表，然后通过引用上面列表中的column_1_name 列来更改适用的名称。

以下代码改编自 此链接 说明了我希望 SAS 如何将上面列表中的表附加在一起。但是我不知道如何将上面的表列表及其列名转换为变量，以便它们可以在下面所示的宏中循环。

有没有一种方法可以将这个表列表转换为一个变量，然后我可以通过其索引号循环访问该变量？

非常感谢任何帮助。

 libname dbname ODBC DSN=databaseName;

 %let table = table_one_a; run;

 %let column_one = column1; run;

 %MACRO append_tables;

     %If index =1 %Then %Do;

     data first_table;
     set dbname.&table.;
     &column1. = column1; 
     keep column1 column2  etc;
     run;

     %End;

     %Else %Do;

     data later_table;
     set dbname.&table.;
     &column1. = column1; 
     keep column1 column2  etc;
     run;

     proc append 
     BASE = first_table
     DATA = later_table;
     run;

     %End;

 %MEND;

Answer 1

为什么不直接从列表中提取所有表名称，而不是使用循环呢？另外，为什么不使用单个 SET 语句而不是 APPEND 过程？

*-- Create table list sample --*;

data csv_list;
length column_name $20.;
table_name = "table_one_a"; column_name = "Col1"; output;
table_name = "table_one_b"; column_name = "Column1"; output;
table_name = "table_one_c"; column_name = "Colonne1";output;
run;

*-- Create synthetic data for each table in table list --*

data temp.table_one_a;  
Col1 = 1;
run;

data temp.table_one_b;
Column1 = 2;
run;

data temp.table_one_c;
Colonne1 = 3;
run;

libname temp "/home/kermit/stackoverflow";

*-- Create macro tables with all table names + renaming --*

proc sql;
  select cats(strip("temp."||table_name),"(rename=(",column_name,"=column1))") into :tables separated by " "
    from csv_list;
quit;

*-- Append using set statement --*

data want;
  set &tables.;
run;

*-- Tables macro is a concatenation of all table names in table list, separated by a space --*

%put &=tables;
TABLES=temp.table_one_a(rename=(Col1=column1)) temp.table_one_b(rename=(Column1=column1)) 
 temp.table_one_c(rename=(Colonne1=column1))


*-- Result is the vertical combination of all tables + renaming in the tables macro --*

data _null_;
set want;
put id;
run;

column1
   1   <-- table_one_a
   2   <-- table_one_b
   3   <-- table_one_c