如何在SAS中实现两表日期重叠校验并生成0/1标记

开发者阿泽

2026-7-30

SAS实现检验日期匹配住院区间的FLAG字段生成

问题分析

之前用PROC SQL LEFT JOIN出现异常，大概率是因为TABLE A中同一ID存在多个住院区间，LEFT JOIN会将TABLE B的单条记录与A中所有匹配ID的区间进行关联，导致结果集出现重复记录，FLAG值计算混乱。以下是两种可靠的实现方法：

方法1：PROC SQL 用EXISTS子查询（推荐）

EXISTS只判断是否存在符合条件的区间，不会产生重复记录，直接给TABLE B的每条记录标记FLAG：

PROC SQL;
    CREATE TABLE TABLE_B_FLAG AS
    SELECT 
        B.*,
        CASE 
            WHEN EXISTS (
                SELECT 1 
                FROM TABLE_A A
                WHERE A.ID = B.ID
                  AND B.DATE_LAB BETWEEN A.HSP_STRT AND A.HSP_END
            ) THEN 1
            ELSE 0
        END AS FLAG
    FROM TABLE_B B;
QUIT;

方法2：DATA步合并+区间判断

先对两个数据集按ID排序，再通过合并后遍历区间进行判断：

/* 先排序两个数据集 */
PROC SORT DATA=TABLE_A;
    BY ID;
RUN;

PROC SORT DATA=TABLE_B;
    BY ID;
RUN;

/* 合并并生成FLAG */
DATA TABLE_B_FLAG;
    MERGE TABLE_B (IN=IN_B) TABLE_A (IN=IN_A);
    BY ID;
    RETAIN FLAG 0;
    IF IN_B THEN DO;
        /* 检查当前DATE_LAB是否落在任一区间内 */
        IF DATE_LAB BETWEEN HSP_STRT AND HSP_END THEN FLAG = 1;
        /* 保留TABLE_B的每条记录，遇到ID变化时重置FLAG */
        OUTPUT;
    END;
    /* 当ID变化时重置FLAG，避免影响下一个ID的判断 */
    IF LAST.ID THEN FLAG = 0;
RUN;