16宏编程技术.ppt

%macro analyze(dat, year, pr,price,year1); %* create the data set TEMP; %create; %* plot the variables selected; %plot; %mend analyze; %analyze(stk000002, 2000, 收盘价,clpr,2000); run; 条件表达式 例16.18 用条件表达式%if-%then定义宏。 %macro analyze(getdata, dat, year, pr,price,year1); %if getdata=yes %then %create; %plot; %mend analyze; %analyze(yes, stk000002, 2000, 收盘价,clpr,2000); %analyze(no, stk000002, 2000, 最高价,hipr,2000); run; 例16.19 多个%THEN分句。 %macro analyze(getdata, dat, year, pr,price,year1); title; %if getdata=yes %then %do; %create; title3 Data Set Created for The Plot; %end; %plot; %mend analyze; %analyze(yes, stk000002, 2000, 收盘价,clpr,2000); %analyze(no, stk000002, 2000, 最高价,hipr,2000); run; 对于上述的宏analyze，如果用下面语句来调用它，%analyze(YES, stk000002, 2000, 收盘价,clpr,2000);　宏处理器就不能调用宏Create来产生数据集，因为%IF条件是小写字符值yes。为了避免这种情况出现，可以使用宏函数%upcase。 例16.20 大小写字符的统一。 %macro analyze(getdata, dat, year, pr,price,year1); %if %upcase(getdata)=YES %then %create; %plot; %mend analyze; /*这样无论是yes或YES，%IF条件就都成立了。即：*/ %analyze(yes, stk000002, 2000, 收盘价,clpr,2000); %analyze(no, stk000002, 2000, 最高价,hipr,2000); %analyze(YES, stk000002, 1999, 收盘价,clpr,1999); %analyze(YES, stk000002, 1999, 最高价,hipr,1999); run; 生成重复文本 例16.21 定义生成重复文本宏。 %macro names(name, number); %do n=1 %to number; namen %end; %mend names; 例中，宏names通过宏参数name，number和宏变量n可以生成一系列的名字。 在DATA语句中调用宏NAMES： data %names(dsn, 5); run; 产生下列data步语句： DATA DSN1 DSN2 DSN3 DSN4 DSN5; 620 %end; 621 %mend names; 622 data %names(dsn, 5); 623 run; NOTE: 数据集 WORK.DSN1 有 1 个观测和 0 个变量。 NOTE: 数据集 WORK.DSN2 有 1 个观测和 0 个变量。 NOTE: 数据集 WORK.DSN3 有 1 个观测和 0 个变量。 NOTE: 数据集 WORK.DSN4 有 1 个观测和 0 个变量。 NOTE: 数据集 WORK.DSN5 有 1 个观测和 0 个变量。 NOTE: “DATA 语句”所用时间（总处理时间）: 实际时间 0.06 秒 CPU 时间 0.04 秒 LOG窗口显示： 例16.22 生成某个引用的词尾。 %macro namesx(name, number); %do n=1 %to number; name.xn %end; %mend namesx; 例中，在成生一系列名子的同时，在前缀和数字之间放一个字母X。 调用宏NAMESEX： data %namesx(dsn, 5); run; 产生如下data步语句： DATA DSNX1 DSNX2 DSNX3 DSNX4 DSNX5; 宏表达式 宏处理器如何处理算术表达式 默认的