SAS宏中IF语句无法运行的原因排查求助

你的宏代码存在两个核心问题，直接导致运行报错：

1. 语法不完整：%do块没有对应的%end来闭合，宏定义无法正常编译，SAS会抛出语法错误。
2. 日期函数参数错误：%year()需要传入SAS日期值（即从1960年1月1日起算的天数），你传入的1999是纯数字，会被解析成1965年（1999天对应的实际年份），完全不符合你要比较1999年的预期。

修正方案 #

方案1：直接传入年份参数 #

如果你的输入本身就是年份数字，无需处理日期，代码可以简化为：

%macro getcategory(year=);
    %global category;
    %if &year < 2002 %then %do;
        %let category = A;
    %end;
    %else %do;
        %let category = B; /* 可根据需求补充其他分类规则 */
    %end;
%mend;

%getcategory(year=1999);
%put &category; /* 输出结果：A */

方案2：传入SAS日期值 #

如果必须传入日期（比如'01JAN1999'd格式），需确保参数是合法SAS日期，再用%year()提取年份：

%macro getcategory(date=);
    %global category;
    %if %year(&date) < 2002 %then %do;
        %let category = A;
    %end;
    %else %do;
        %let category = B;
    %end;
%mend;

%getcategory(date='01JAN1999'd);
%put &category; /* 输出结果：A */

不用全局变量：用call symputx返回值 #

如果不想依赖全局宏变量，可在宏内部通过数据步的call symputx生成变量：

%macro getcategory(date=, outvar=category);
    data _null_;
        if year("&date"d) < 2002 then do;
            call symputx("&outvar", "A");
        end;
        else do;
            call symputx("&outvar", "B");
        end;
    run;
%mend;

%getcategory(date='01JAN1999'd);
%put &category; /* 输出结果：A */

宏直接返回值（无需宏变量） #

如果希望宏直接返回字符值，不需要额外定义宏变量，可直接用逻辑判断返回：

%macro getcategory(year=);
    %if &year < 2002 %then A %else B;
%mend;

/* 直接调用宏获取返回值 */
%put %getcategory(year=1999); /* 输出结果：A */

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