SAS Studio：如何利用嵌套WHERE条件实现字符串搜索

在大型SAS项目中，需要在多个未知数量的表中查找通用列，但表数、列数及列名均不确定，无法硬编码数值或名称。核心需求是从&OPTIONS宏变量列表中提取关键词，匹配长列名（例如用"Email"匹配Your_Email_Address）。目前只能逐个编写NAME CONTAINS语句实现搜索，这种方式效率极低，尝试过where NAME LIKE/contains(IN(&OPTIONS.))等变体写法均失败，求正确组合WHERE函数实现需求的方法。

用户提供的原始代码片段：

options mlogic mprint symbolgen;
%*LOOP;
%macro JOINWRAP;

%let OPTIONS = USERNAME
EMAIL
AGE
ETC...
;
%let dataset1 = A7;
%let dataset2 = Subset;
%let OPTIONS_count = %sysfunc(countw(&OPTIONS.));

%*read columns into macro variables;
%do j = 1 %to 2;
proc sql ;
    select NAME into :CLMNS&j SEPARATED BY ", " /*reading columns from each proc contents 
    into a seperate macro variable, so clmns1 = columns from A7*/
    from work.COLS&j /*cols1 = A7 PROC CONTENTS previously defined */
    where NAME CONTAINS "%scan(&OPTIONS.,1)" or NAME contains "%scan(&OPTIONS.,2)"
    ;
    quit;
%put &&CLMNS&j;
%end;
...
run;
/* %end; */
%mend JOINWRAP;
%JOINWRAP;

1. 动态生成WHERE条件语句 #

通过宏循环遍历&OPTIONS中的所有关键词，自动拼接NAME CONTAINS的OR逻辑，避免手动逐个编写，适配任意数量的关键词。

2. 优化后代码实现 #

options mlogic mprint symbolgen;
%macro JOINWRAP;
    %let OPTIONS = USERNAME EMAIL AGE ETC...;
    %let dataset1 = A7;
    %let dataset2 = Subset;
    %let OPTIONS_count = %sysfunc(countw(&OPTIONS.));

    %* 动态拼接WHERE条件字符串;
    %let where_condition = ;
    %do i = 1 %to &OPTIONS_count.;
        %let keyword = %scan(&OPTIONS., &i.);
        %if &i. = 1 %then %do;
            %let where_condition = NAME CONTAINS "&keyword.";
        %end;
        %else %do;
            %let where_condition = &where_condition. OR NAME CONTAINS "&keyword.";
        %end;
    %end;

    %* 遍历目标表，提取匹配列;
    %do j = 1 %to 2;
        proc sql noprint;
            select NAME into :CLMNS&j. SEPARATED BY ", "
            from work.COLS&j.
            where &where_condition.;
        quit;
        %put 表&j.匹配到的列: &&CLMNS&j.;
    %end;
%mend JOINWRAP;
%JOINWRAP;

3. 可选方案：正则表达式匹配（SAS 9.4+支持） #

如果你的SAS版本支持正则表达式，可以用PRXMATCH函数简化条件，将所有关键词合并为一个正则模式，实现更灵活的匹配：

options mlogic mprint symbolgen;
%macro JOINWRAP;
    %let OPTIONS = USERNAME EMAIL AGE ETC...;
    %let dataset1 = A7;
    %let dataset2 = Subset;
    %* 将关键词转为正则模式，|表示匹配任意一个关键词，/i表示忽略大小写;
    %let regex_pattern = %sysfunc(prxchange(s/ /|/g, -1, &OPTIONS.));
    %let regex_pattern = /&regex_pattern./i;

    %do j = 1 %to 2;
        proc sql noprint;
            select NAME into :CLMNS&j. SEPARATED BY ", "
            from work.COLS&j.
            where prxmatch(&regex_pattern., NAME);
        quit;
        %put 表&j.匹配到的列: &&CLMNS&j.;
    %end;
%mend JOINWRAP;
%JOINWRAP;

关键注意点 #

• 动态拼接WHERE条件时，要处理第一个关键词无需前置OR的情况，避免语法错误。
• 正则方案中的/i修饰符可实现大小写不敏感匹配，适配不同格式的列名。
• 开启mlogic mprint symbolgen选项可调试宏变量生成过程，方便排查问题。

内容的提问来源于stack exchange，提问作者sassane