宏中怎么初始化常量

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

%macro a(y);
%do i=1 %to 3;
data &y&i;
informat date1 ddmmyy10.;
set hb10x.&y&i;
%if i=1 %then date1='10apr2010'd;
%if i=2 %then date1='20apr2010'd;
%if i=3 %then date1='31apr2010'd;
format date1 ddmmyy10.;
%end;
%mend;
%a(Apr)
显示
NOTE: 变量 date1 未初始化。
怎么修改呢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：informat informa format inform FORMA

1. 或者：%macro a(y);
   
2. %do i=1 %to 3;
   
3. data &y&i;
   
4. informat date1 ddmmyy10.;
   
5. set &y&i;
   
6. %if &i=1 %then %do;
   
7. date1='10apr2010'd;
   
8. %end;
   
9. %if &i=2 %then %do;
   
10. date1='20apr2010'd;
    
11. %end;
    
12. %if &i=3 %then %do;
    
13. date1='30apr2010'd;
    
14. %end;
    
15. format date1 ddmmyy10.;
    
16. run;
    
17. %end;
    
18. %mend;
    
19. %a(Apr)
    
20. %macro a(y);
    
21. %do i=1 %to 3;
    
22. data &y&i;
    
23. informat date1 ddmmyy10.;
    
24. set &y&i;
    
25. if &i=1 then date1='10apr2010'd;
    
26. else if &i=2 then date1='20apr2010'd;
    
27. else if &i=3 then date1='30apr2010'd;
    
28. format date1 ddmmyy10.;
    
29. run;
    
30. %end;
    
31. %mend;
    
32. %a(Apr)

复制代码

系统检查出的错误如下

ERROR: Invalid date/time/datetime constant '31apr2010'd.

you may try to change the original '31apr2010'd  to '30apr2010'd.

davil2000 发表于 2012-10-18 14:08
系统检查出的错误如下

ERROR: Invalid date/time/datetime constant '31apr2010'd.

非常谢谢，发上去，才发现

Imasasor 发表于 2012-10-18 12:28

非常谢谢。
下面一段也可以，别人告诉的
%macro a(y);
%do i=1 %to 3;
data h.&y&i;
informat date1 ddmmyy10.;
set hb10x.&y&i;
%if &i=1 %then date1='10apr2010'd;;
%if &i=2 %then date1='20apr2010'd;;
%if &i=3 %then date1='30apr2010'd;;
format date1 ddmmyy10.;
%end;
%mend;
%a(Apr)