SAS宏中PROC SQL如何正确引用动态拼接的列名

你代码里的核心错误是混淆了宏执行阶段和SAS代码运行阶段的逻辑：

• CAT()是PROC SQL里的运行时函数，只会在SQL代码编译完成后执行，返回普通字符串值，无法被SAS识别为列名引用。SAS在编译SQL阶段就会校验所有字段名，运行时生成的字符串不会被回溯解析为字段。
• 你单独写的i=25分支存在列名笔误，'Error Code 'n没有拼接序号25，本身就是不存在的无效字段。
• 额外的i=25判断完全多余，宏循环可以统一处理1-25所有序号的字段，不需要单独分支。

方案1：修正后的宏实现（和你原有逻辑思路一致） #

直接在宏层拼接列名的名称字面量（SAS中带空格/特殊字符的合法列名用'列名'n格式引用），不需要调用任何数据步/SQL函数拼接字符串，同时自动过滤错误码为空的无效行：

/* 先初始化空目标表 */
proc sql noprint;
create table work.SingleRows(
    LoanNumber char(100) format=$100.,
    ErrorCode char(50) format=$50.,
    ErrorDesc char(1000) format=$1000.
);

%macro MacroTranspose;
    proc sql noprint;
        %do i=1 %to 25;
            insert into work.SingleRows(LoanNumber, ErrorCode, ErrorDesc)
            select 
                ID, /* 如果源表贷款编号列实际名是Loan Number，替换为 'Loan Number'n 即可 */
                'Error Code &i.'n, 
                'Description &i.'n 
            from RawImport
            where not missing('Error Code &i.'n); /* 跳过无错误的空行 */
        %end;
    quit;
%mend;

%MacroTranspose;

宏变量&i会在宏执行阶段直接替换为对应数字，最终传入PROC SQL的是标准的'Error Code 1'n这类合法列引用，不会被识别为字符串。

方案2：数据步数组实现（代码更简洁，无需宏） #

不需要写宏循环，用数组批量引用25组字段，遍历输出即可，执行效率更高：

data work.SingleRows;
    set RawImport;
    /* 定义两组数组分别对应25个错误码、25个错误描述列 */
    array err_cd[*] 'Error Code 1'n-'Error Code 25'n;
    array err_dsc[*] 'Description 1'n-'Description 25'n;
    
    do idx=1 to dim(err_cd);
        if not missing(err_cd[idx]) then do;
            LoanNumber = ID;
            ErrorCode = err_cd[idx];
            ErrorDesc = err_dsc[idx];
            output; /* 输出单条错误记录 */
        end;
    end;

    keep LoanNumber ErrorCode ErrorDesc;
run;

• 上述两种方案输出的结果完全匹配你给出的期望样例，不会插入空错误记录。
• 如果后续错误组数量上限调整，只需要把代码里的25改成对应最大值即可，不需要修改其他逻辑。

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