用SAS宏实现Oracle中的decode函数
DECODE函数是ORACLE PL/SQL的功能强大的函数之一,目前还只有ORACLE公司的SQL提供了此函数,其它数据库厂商的SQL实现还没有此功能
函数介绍
DECODE函数是Oracle PL/SQL的功能强大的函数之一,,目前还只有ORACLE公司的SQL提供了此函数,其它数据库厂商的SQL实现还没有此功能。DECODE有什么用途呢? 先构造一个例子,假设我们想给智星职员加工资,其标准是:工资在8000元以下的加20%;工资在8000元或以上的加15%,通常的做法是,先选出记录中的工资字段值? select salary into var-salary from employee,然后对变量var-salary用if-then-else或choose case之类的流控制语句进行判断。 如果用DECODE函数,那么我们就可以把这些流控制语句省略,通过SQL语句就可以直接完成。
看用SAS怎么实现吧,就是这么一个小小的宏,就实现了所谓其他数据库都不能实现的功能,
%macro decode /PARMBUFF;
%local i count ifn valuen countall currfeild valueelse;
%let countall=%sysfunc(countw(&SYSPBUFF,%quote(,)));
%let count=%eval((&countall-1)/2);
%let currfeild=%scan(%quote(&SYSPBUFF),1);
case &currfeild
%do i=1 %to &count;
%let ifn=%scan(%quote(&SYSPBUFF),%eval(&i*2));
%let valuen=%scan(%quote(&SYSPBUFF),%eval(&i*2+1));
when &ifn then &valuen
%end;
%if %eval(&countall>(&count+1)) %then %do;
%let valueelse=%scan(%quote(&SYSPBUFF),&countall);
else &valueelse
%end;
end
%mend;
调用代码如下,和oracle的调用方式和功能实现基本上都是一样的
proc sql;
create table test as
select
%decode(sex,"男",0,"女",1,2)
as abc
from sashelp.class;
quit;
推荐阅读
-
oracle中decode函数的使用方法
-
Oracle用decode函数或CASE-WHEN实现自定义排序
-
Oracle中decode函数与lpad结合的用法讲解
-
学习笔记:用c语言编写泰勒展开公式myexp()实现math.h.数学函数库中的exp()函数。并与exp()函数做比较。精度相同。
-
Oracle中nvl、nvl2函数的用法以及Decode区别
-
oracle中decode函数的使用方法示例
-
用SAS宏实现Oracle中的decode函数
-
Oracle数据库中decode函数的用法
-
oracle中decode函数的用法
-
mysql-MySQL中的group_concat函数怎么用sybase实现?