data;
    input type $ wd station $;
        elev=.;
        if type='ALUV' then link calcu;

        year=1985;
        return;/*返回到data步开头*/

        calcu:
        if station='SITE_1' then elev=6650-wd;
        if station='SITE_2' then elev=5500-wd;
        return;/*返回到link语句的下面*/

cards;
ALUV  523  SITE_1
UPPA  234  SITE_2
ALUY  666   SITE_2
;
proc print;
run;
上面的例子运行出来的结果是：
                        Obs    type     wd    station       elev       year

                          1     ALUV    523    SITE_1     6127    1985
                          2     UPPA    234    SITE_2        .        1985
                          3     ALUY    666    SITE_2        .        1985


为什么在第3个观测中，elev是空值呀，不是应该是5500-666=4834吗？
请各位大侠解救一下~~~