使用SAS宏执行SQL更新表时遇count(*)相关错误求助

问题场景 #

我有一张表libx.tablex，包含livraria（库名）、tabela（表名）属性，以及sql_tot_linhas、sql_sum_num等存储统计类SQL语句的字段，期望通过宏%busca_parametros执行这些SQL，获取目标表的统计数据并回写更新libx.tablex。原宏代码如下：

%macro busca_parametros;

    proc sql noprint;
        select 
            livraria,
            tabela,
            tot_colunas,
            sql_tot_linhas,
            sql_sum_num,
            sql_min_data,
            sql_max_data
        into
            :livraria1-,
            :tabela1-,
            :tot_colunas1-,
            :sql_tot_linhas1-,
            :sql_sum_num1-,
            :sql_min_data1-,
            :sql_max_data1-
        from libx.tablex;
    quit;

    %do i = 1 %to &sqlobs; 
        proc sql noprint;
            update libx.tablex
        set 
            tot_linhas=&&sql_tot_linhas&i.,
            sum_num=&&sql_sum_num&i.,   
            min_data=&&sql_min_data&i.,
            max_data=&&sql_max_data&i.
        where livraria=&&livraria&i. 
            and tabela=&&tabela&i. 
        quit;
    %end;

%mend;

%busca_parametros 

当前所有包含count(*)的SQL字符串对应的宏变量均报错，宏无法正常运行。

报错原因 #

1. 未执行存储的SQL语句：原宏直接将sql_tot_linhas等字段中的SQL代码当作值赋值给tot_linhas，而非执行SQL获取统计结果，SAS无法解析这种赋值逻辑，尤其是count(*)这类语句会直接引发语法错误。
2. 字符型变量缺少引号：livraria和tabela是字符型字段，where条件中直接使用livraria=&&livraria&i.会导致字符串值未被引号包裹，触发语法错误。

修正后的宏代码 #

%macro busca_parametros;

    proc sql noprint;
        select 
            livraria,
            tabela,
            sql_tot_linhas,
            sql_sum_num,
            sql_min_data,
            sql_max_data
        into
            :livraria1-,
            :tabela1-,
            :sql_tot_linhas1-,
            :sql_sum_num1-,
            :sql_min_data1-,
            :sql_max_data1-
        from libx.tablex;
    quit;

    %do i = 1 %to &sqlobs; 
        /* 执行存储的SQL语句，将结果存入临时宏变量 */
        %let tot_linhas_val = ;
        %if &&sql_tot_linhas&i. ne %then %do;
            proc sql noprint;
                select &&sql_tot_linhas&i. into :tot_linhas_val from &&livraria&i..&&tabela&i.;
            quit;
        %end;

        %let sum_num_val = ;
        %if &&sql_sum_num&i. ne %then %do;
            proc sql noprint;
                select &&sql_sum_num&i. into :sum_num_val from &&livraria&i..&&tabela&i.;
            quit;
        %end;

        %let min_data_val = ;
        %if &&sql_min_data&i. ne %then %do;
            proc sql noprint;
                select &&sql_min_data&i. into :min_data_val from &&livraria&i..&&tabela&i.;
            quit;
        %end;

        %let max_data_val = ;
        %if &&sql_max_data&i. ne %then %do;
            proc sql noprint;
                select &&sql_max_data&i. into :max_data_val from &&livraria&i..&&tabela&i.;
            quit;
        %end;

        /* 更新原表，字符型字段添加引号 */
        proc sql noprint;
            update libx.tablex
            set 
                tot_linhas = coalesce(&tot_linhas_val, .),
                sum_num = coalesce(&sum_num_val, .),
                min_data = &min_data_val,
                max_data = &max_data_val
            where livraria = "&&livraria&i." 
              and tabela = "&&tabela&i.";
        quit;
    %end;

%mend;

%busca_parametros 

关键改动说明 #

• 执行存储的SQL：针对每个存储的SQL语句，新增独立的proc sql执行逻辑，将统计结果存入临时宏变量（如tot_linhas_val），再用临时变量的值更新原表字段。
• 字符型条件处理：在where条件中给livraria和tabela的宏变量值添加双引号，确保字符型匹配语法正确。
• 空值处理：使用coalesce函数处理SQL执行结果为空的情况，避免数值型字段赋值错误。

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