基于日期与数据集构建SAS宏，实现假日/工作日条件分支执行

核心思路 #

先获取当前系统日期，从你的组织假日数据集中匹配该日期的假日标识，把结果赋值给宏变量&Holiday_Macro，之后就能用你预设的宏分支逻辑执行不同步骤。

具体实现步骤 #

1. 统一日期格式（关键）

确保假日数据集的日期字段格式，和当前系统日期格式一致。假设你的数据集名为work.holidays，日期字段为holiday_date（格式为DATE9.，比如01JAN2024），先把当前系统日期转换成相同格式：

/* 获取当前系统日期，转换为与数据集匹配的格式 */
%let today = %sysfunc(today(), DATE9.);

2. 从数据集提取假日标识并赋值给宏变量

用PROC SQL查询当前日期的is_holiday（假设你的假日标识变量名为is_holiday，1=假日，0=非假日），并将结果存入宏变量Holiday_Macro：

proc sql noprint;
    select is_holiday into :Holiday_Macro trimmed
    from work.holidays
    where holiday_date = "&today"d; /* 用"&today"d将字符日期转换为SAS日期值 */
quit;

/* 处理当前日期不在数据集的情况：默认设为非假日（0） */
%if &Holiday_Macro = %then %let Holiday_Macro = 0;

3. 执行分支逻辑

现在可以直接用你预设的宏判断逻辑，插入对应步骤即可：

%if &Holiday_Macro = 1 %then %do;
    /* 假日执行的程序步骤 */
    %put 今日为公司假日，执行假日流程;
    /* 比如：调用假日数据处理宏、发送假日通知等 */
%end;
%else %do;
    /* 工作日执行的程序步骤 */
    %put 今日为工作日，执行常规流程;
    /* 比如：每日业务数据更新、报表生成等 */
%end;

注意事项 #

• 确认数据集work.holidays的路径和变量名与实际一致，避免报错。
• 如果你的日期字段格式不是DATE9.，比如MMDDYY10.，要同步修改%sysfunc(today(), MMDDYY10.)和查询语句中的格式。
• trimmed选项用于去除宏变量值前后的空格，避免判断时因空格导致逻辑错误。

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