如何编写SAS代码获取续期交易的最终到期日？（附判定规则）

阿华AIGC实验室

2026-5-26

如何用SAS计算续期交易的最终到期日

我来帮你搞定这个续期交易最终到期日的计算问题！先明确核心需求：我们要把同一主体（对应数据集里的Number字段）下，前一笔交易的到期日和后一笔交易的起息日差值在0-1天之间的交易归为一个续期链条，然后给链条里每笔交易都填上整个链条最后一笔的到期日，也就是Maturity Date_1。下面一步步来实现：

第一步：预处理日期变量（关键！）

首先得把数据集里的字符型日期（比如29-Sep-16）转换成SAS能识别的日期型变量，不然没法计算日期差值。假设你的原始数据集叫transactions，代码如下：

/* 转换字符型日期为SAS日期型，方便后续计算 */
data transactions_clean;
    set transactions;
    /* 使用date9.格式转换，匹配你数据里的日期样式 */
    Issue_Date_SAS = input(Issue_Date, date9.);
    Maturity_Date_SAS = input(Maturity_Date, date9.);
    /* 给SAS日期变量设置显示格式，方便查看 */
    format Issue_Date_SAS Maturity_Date_SAS date9.;
run;

第二步：给续期链条分配组ID

接下来要给同一续期链条的交易打上相同的组ID，这样后续就能按组取最终到期日。这里我们用retain语句保留上一笔交易的到期日和当前组ID，结合by Number来确保只在同一主体内判断续期：

/* 先确保数据集按主体和起息日排序，不然续期判断会出错 */
proc sort data=transactions_clean;
    by Number Issue_Date;
run;

/* 识别续期组，分配组ID */
data transactions_groups;
    set transactions_clean;
    by Number;
    /* 保留上一轮循环的组ID和上一笔到期日 */
    retain group_id 0 prev_maturity;
    /* 处理每个主体的第一笔交易 */
    if first.Number then do;
        group_id = 1;
        prev_maturity = Maturity_Date_SAS;
    end;
    else do;
        /* 计算当前交易起息日和上一笔到期日的差值 */
        date_diff = Issue_Date_SAS - prev_maturity;
        /* 符合续期规则（差值0-1天）则保留当前组ID，否则新建组 */
        if 0 <= date_diff <= 1 then do;
            group_id = group_id;
        end;
        else do;
            group_id + 1;
        end;
        /* 更新上一笔到期日为当前交易的到期日，用于下一次判断 */
        prev_maturity = Maturity_Date_SAS;
    end;
run;

第三步：计算并合并最终到期日

现在每个续期链条都有了唯一的组ID，我们只需要按Number和group_id分组，取每组里最大的到期日，就是这个链条的最终到期日，再合并回原数据集即可：

/* 用PROC SQL获取每个续期组的最终到期日 */
proc sql;
    create table final_maturity_info as
        select Number, group_id, 
               max(Maturity_Date_SAS) as Final_Maturity_SAS format=date9.
        from transactions_groups
        group by Number, group_id;
quit;

/* 合并回原数据集，生成Maturity Date_1字段 */
data transactions_final;
    merge transactions_groups final_maturity_info;
    by Number group_id;
    /* 将SAS日期型的最终到期日转换为和原始数据一致的字符格式（可选） */
    'Maturity Date_1'n = put(Final_Maturity_SAS, date9.);
    /* 保留你需要的原始字段和结果字段 */
    keep Number Amount Issue_Date Maturity_Date 'Maturity Date_1'n Remarks;
run;