基于日期范围循环调用SAS宏生成数据集的技术问询

好问题！要实现从begin到end的日期范围批量调用你的%pull宏，核心是先生成这段时间内每个月第一天的日期序列，再逐个传入宏中执行。这里给你两种实用的实现方式，都是SAS里处理这类批量任务的常用方法：

方法一：数据步 + call execute（推荐） #

这种方法利用SAS数据步生成日期序列，再通过call execute动态调用宏，调试起来更直观，不需要手动计算循环次数：

%let begin=20170101; 
%let end =20170501;

/* 生成日期序列并调用宏 */
data _null_;
  /* 将字符/数字型日期转成SAS内部日期值（方便处理日期间隔） */
  start_date = input("&begin.", yymmdd8.);
  end_date = input("&end.", yymmdd8.);
  
  /* 循环生成每个月第一天的日期 */
  do current_date = start_date to end_date by intck('month', start_date, intnx('month', start_date, 1));
    /* 将SAS日期转成你需要的数字格式（如20170101） */
    date_num = put(current_date, yymmddn8.);
    /* 延迟调用宏，避免编译阶段提前解析 */
    call execute(cats('%nrstr(%pull(', date_num, '))'));
  end;
run;

关键细节说明： #

• input("&begin.", yymmdd8.)：把你定义的日期转成SAS内部的数值型日期（代表从1960年1月1日开始的天数），这样才能用intnx/intck这类日期函数处理间隔。
• %nrstr：用来延迟宏的执行时机，防止SAS在编译数据步时就提前解析宏，导致语法错误。

方法二：纯宏循环实现 #

如果你习惯用宏语法完成循环，可以先计算日期范围内的月份数，再用%do循环逐个生成目标日期：

%let begin=20170101; 
%let end =20170501;

/* 预计算日期范围的关键参数 */
%let start_dt = %sysfunc(inputn(&begin., yymmdd8.));
%let end_dt = %sysfunc(inputn(&end., yymmdd8.));
%let month_cnt = %sysfunc(intck(month, &start_dt., &end_dt.)) + 1;

/* 定义批量调用的宏 */
%macro pull_range;
  %do i=0 %to &month_cnt.-1;
    /* 生成第i个月的第一天日期，转成数字格式 */
    %let current_date = %sysfunc(intnx(month, &start_dt., &i., b), yymmddn8.);
    /* 调用你的%pull宏 */
    %pull(&current_date.);
  %end;
%mend;
%pull_range;

关键细节说明： #

• %sysfunc：在宏语言中调用SAS函数，实现日期转换和间隔计算。
• intnx(month, &start_dt., &i., b)：b参数指定取月份的起始日（即当月第一天），完美匹配你需要的日期格式。
• month_cnt +1：因为intck计算的是两个日期之间的间隔数（比如20170101到20170501间隔4个月），加上起始月一共5个日期，所以要加1保证循环覆盖所有目标日期。

两种方法都能满足你的需求，你可以根据自己的调试习惯选择。如果后续需要扩展到非每月第一天的日期，只需要调整intnx的参数即可。

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