基于季度条件在SAS宏中嵌套调用宏的代码有效性问询

我有一个可正常运行的Comparison宏，用于对比特定科目（如营收）当期T与上期T-1的数据。现需实现逻辑：若当前月份为3、6、9、12月（季度末），则依次对比T与T-1、T-1与T-2、T-2与T-3；非季度末则仅对比T与T-1。我编写了如下TEST宏，但因SAS权限被误封无法测试，现询问在Comparison宏正常的前提下，该TEST宏是否存在问题：

%MACRO TEST(YEARMONTH); /*20XXYY*/
%LET MONTH = %SUBSTR(&YEARMONTH,5,2);
%LET CP = &YEARMONTH.;
%LET CP_1 = &YEARMONTH. - 1;
%LET CP_2 = &YEARMONTH. - 2;
%IF &MONTH. = 3 %THEN %DO; %LET CP_3 = &YEARMONTH. - 91; %END
%ELSE %DO; %LET CP_3 = &YEARMONTH. - 3; %END;
%IF &MONTH. IN (3, 6, 9, 12) %THEN %DO;
    %Comparison(CP,CP_1);
    %Comparison(CP_1,CP_2);
    %Comparison(CP_2,CP_3);
%END;
%ELSE %DO;
    %Comparison(CP,CP_1);
%END;
%MEND TEST;

存在的问题分析 #

• 宏参数传递错误：调用%Comparison时直接写CP、CP_1等，传递的是字符串字面量而非宏变量的值。如果Comparison宏需要接收具体的年月数值，必须改为%Comparison(&CP., &CP_1.)这种引用宏变量值的写法，否则宏会把"CP"当作参数值处理，完全不符合预期。
• 月份判断的类型不匹配：%SUBSTR(&YEARMONTH,5,2)取出的是字符型月份（比如输入202403时，&MONTH为"03"），但后续判断用的是数字3。虽然SAS会自动做类型转换，但这种写法容易引发意外错误，建议统一类型：要么改成%IF &MONTH. = "03"，要么用%EVAL(&MONTH.) = 3将字符转成数字后再比较。
• 年月计算的硬编码缺陷：
  • 当处理1月时（比如202401），&YEARMONTH. -1会得到202400，这并非合法的年月格式，不过非季度末场景下不会触发后续多步对比，影响范围有限，但仍需注意输入边界。
  • 计算CP_3时用硬编码的-91（对应3月场景）非常不严谨：这个数值是基于天数推算的，但平闰年的天数差异会导致结果出错，且本质上我们需要的是前推3个月的年月而非天数，应该用SAS日期函数来处理，比如先把YEARMONTH转成SAS日期，再用INTNX函数计算前3个月的日期，最后转回YYYYMM格式。示例如下：

    %LET CP_3 = %SYSFUNC(PUTN(%SYSFUNC(INTNX(MONTH, %SYSFUNC(INPUTN(&YEARMONTH., YYMMN6.)), -3)), YYMMN6.));
    

• 季度末判断的类型问题：同样，&MONTH. IN (3, 6, 9, 12)中字符型的月份和数字列表比较，存在类型不匹配的隐患，建议改为%EVAL(&MONTH.) IN (3,6,9,12)。

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