关于宏中时间常数的比较

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

1. %macro test;
   
2. %if %sysfunc(intnx(month,'15SEP2015'd,3,s))>'15DEC2015'd %then %put aa;
   
3. %else %put bb;
   
4. %if %sysfunc(intnx(month,'15SEP2015'd,3,s))>20437 %then %put aa;
   
5. %else %put bb;
   
6. %mend;
   
7. %test;

复制代码

为什么宏里面时间常数不能做比较
上面的代码写成时间常数就无法比较，输出的是aa
换成该常数对应的数值就可以比较，输出的是bb

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：sysfunc month Macro else Then

首先，用代码也是可以比较的。
如果改成>=号，结果就都是aa了。
问题在于为什么>号不行，还在研究

宏里面的 %IF ... %then 语句是比较两个字符串的大小。
你的程序中 第一个%if 语句比较的是 字符 "20346" 与 "‘15DEC2015’d" 的大小。
           第一个%if 语句比较的是 字符 ‘20346’ 与 ‘20437’ 的大小。

1. %macro test;
   
2. 
   
3.     %if %sysfunc(intnx(month,'15SEP2015'd,3,s)) > '15DEC2015'd %then %put aa1;
   
4.     %else %put bb1;
   
5. 
   
6.     %if '15DEC2015'd > %sysfunc(intnx(month,'15SEP2015'd,3,s)) %then %put aa2;
   
7.     %else %put bb2;
   
8. 
   
9.     %if '15DEC2015'd > 20346 %then %put aa3;
   
10.     %else %put bb3;
    
11. 
    
12.     %if  20437 > 20346 %then %put aa4;
    
13.     %else %put bb4;
    
14. 
    
15.     %if %sysfunc(intnx(month,'15SEP2015'd,3,s)) > 20437 %then %put aa5;
    
16.     %else %put bb5;
    
17. 
    
18.     %if a > b %then %put A greater than B;
    
19.     %else %put Is A not greater then B?;
    
20. %mend;
    
21. %test;
    
22. 
    
23. data _null_;
    
24.    if "20346" gt "15DEC2015'd" then put 'AA';
    
25.    else put 'BB';
    
26. 
    
27.    if "20346" gt "20437" then put 'AA';
    
28.    else put 'BB';
    
29. run;

复制代码

follow up
    %macro test;
    %if 20437>'15DEC2015'd %then %put aa;
    %else %put bb;
    %mend;
    %test;
结果是aa 说明20437>'15DEC2015'd

yongyitian 发表于 2016-1-19 11:18
宏里面的 %IF ... %then 语句是比较两个字符串的大小。
你的程序中 第一个%if 语句比较的是 字符 "20346" ...

不太同意你的观点。
根据下面的程序和结果，%sysfunc(intnx(month,'15SEP2015'd,3,s))和20346或者“20346”并不相等。
第一个%if 语句比较的自然也不是 字符"20346" 与 "‘15DEC2015’d" 的大小。
   %macro test;
    %if %sysfunc(intnx(month,'15SEP2015'd,3,s))=20346 %then %put aa;
    %else %put bb;
    %if %sysfunc(intnx(month,'15SEP2015'd,3,s))=20437 %then %put aa;
    %else %put bb;
        %if %sysfunc(intnx(month,'15SEP2015'd,3,s))='20346' %then %put aa;
    %else %put bb;
    %if %sysfunc(intnx(month,'15SEP2015'd,3,s))='20437' %then %put aa;
    %else %put bb;
    %mend;
    %test;
结果是
bb
aa
bb
bb

co_fund 发表于 2016-1-19 11:29
不太同意你的观点。
根据下面的程序和结果，%sysfunc(intnx(month,'15SEP2015'd,3,s))和20346或者“203 ...

原因应该是宏用的是ASC码，可以用以下代码避免这个问题。
%macro test;
        %if %sysevalf(%sysfunc(intnx(month,'15SEP2015'd,3,s)) = '15DEC2015'd) %then %put aa1;
        %else %put bb1；   
    %mend;
    %test;

个人理解：

对于比号前后两坨，SAS先判断是不是都是整型，都是的话，按照正常判断；
有一方不是的话，就按照字符型看待，从左往右一个一个取字符，按照ASCII大小比较

co_fund 发表于 2016-1-19 13:05
原因应该是宏用的是ASC码，可以用以下代码避免这个问题。
%macro test;
        %if %sysevalf(%sysfunc ...

正解，应该是当成字符比较了，用%sysevalf可以解决，谢谢各位
还有个问题是：

1. data aa;
   
2. input a yymmdd10.;
   
3. format a yymmdd10.;
   
4. cards;
   
5. 2015/11/05
   
6. 2015/12/06
   
7. ;
   
8. %macro test(data_month);
   
9. data bb;
   
10. set aa;
    
11. where a=&data_month.;
    
12. run;
    
13. %mend;
    
14. %test('06DEC2015'd)

复制代码

我有类似test的以时间常数字符串为参数的macro，怎么快捷的把通过intnx计算出来的值变成时间常数形式作为参数带入

我的方案是这样的
%macro test(date);
data _null_;
call symput('date2',put(intnx('Month',&date.,3,'s'),date9.));
run;
%put &date2.;
%mend test;
%test('15SEP2015'd);