一段程序

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

下面是我的一段程序:

%macro F(x);  /*定义一个计算函数F*/
    %local y;
    %let y=%sysevalf(100/(1+&x)**1 + 100/(1+&x)**2 + 100/(1+&x)**3 + 1100/(1+&x)**4);
    &y
%mend F;

%macro absD(x,y);  /*计算x,y差的绝对值*/
      %if &x > &y %then %do;
              %let D=%sysevalf(&x-&y);
              &D
      %end;
      %else %do;
              %let D=%sysevalf(&y-&x);
              &D
      %end;
%mend;

%put %absD(1000,%F(0.1));

可我发现结果奇怪了,他输出的结果是负的, 可我明明用%absD处理了,要求只输出正值的,好像if的判断力实效了,这是为什么呢?请高手指点.感激呀!

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Macro Local eval 高手指点 Then 绝对值 判断力 local 程序 1100

All parts of the macro language that evaluate expressions (for example, %IF and %DO statements) call %EVAL to evaluate the condition.
So 999.999999999998>1000
用

1. %if %sysevalf(&x>&y) %then %do;

复制代码

貌似就正确了......

soporaeternus 发表于 2011-8-4 15:19
All parts of the macro language that evaluate expressions (for example, %IF and %DO statements) call ...

Thanks, you are so nice...

学习了，sas的功能太强大了。