Kingbase实现Oracle decode函数功能

目录

1. 问题

2. 文档概述

3. Oracle decode()函数功能调研

3.1. 函数名称/函数原型

3.2. 函数功能

3.3. 参数介绍

3.3.1. Expr

3.3.2. Search1

3.3.3. Result1

3.3.4. Default

3.4. 函数示例

3.4.1. 示例1： 

3.5. 基于Kingbase适配decode函数功能的实现

3.5.1. 实现decode(variadic p_decode_list text[])函数

---

1. 问题

Kingbase如何实现Oracle的decode函数功能。

2. 文档概述

本文主要是通过调研Oracle的decode函数功能，然后基于kingbase自定义函数形式实现decode函数功能。

3. Oracle decode()函数功能调研

3.1. 函数名称/函数原型

decode(expr, search1, result1[,search2, result2]… [, default]);

3.2. 函数功能

Decode函数的功能是用第一个参数expr和之后的偶数位值进行比较，如果相同则取偶数位+1的数值，否则取最后一位值，依次按照这个规则直到最后一个参数（如果最后一位为偶数位，则为null）。

3.3. 参数介绍

3.3.1. Expr

Expr被比较的字符串。

3.3.2. Search1

Search1表示第一期望值。

3.3.3. Result1

Result1表示如果被比较字符串expr与第一期望值search1相同，则输出result1的值。

3.3.4. Default

Default表示如果前面依次都比较结束都没有符合预期期望的值，则输出default作为最终结果。

3.4. 函数示例

3.4.1. 示例1： 

SQL> with xx as

(

 select 'M' sex

 union all

 select 'F' sex

 union all

 select 'X' sex

 union all

 select 'Z' sex

 union all

 select '' sex

)

select sex, decode(sex, 'M', '男', 'F', '女', decode(sex, 'X', '变性', '其它')) from xx;

SEX | DECODE

-----+--------

 M   | 男

 F   | 女

 X   | 变性

 Z   | 其它

     | 其它

(5 行记录)

3.5. 基于Kingbase适配decode函数功能的实现

3.5.1. 实现decode(variadic p_decode_list text[])函数

create or replace function decode(variadic p_decode_list text[])

returns text

 as

$$

declare

 v_len integer := array_length(p_decode_list, 1);

 v_ret text;

begin



 if v_len >= 3 then

  for i in 2..(v_len - 1) loop

   v_ret := null;

   if mod(i, 2) = 0 then

    if p_decode_list[1] = p_decode_list[i] then

     v_ret := p_decode_list[i+1];

    elsif p_decode_list[1] <> p_decode_list[i] then

     if v_len = i + 2 and v_len > 3 then

      v_ret := p_decode_list[v_len];

     end if;

    end if;

   end if;

   exit when v_ret is not null;

  end loop;

 else

  raise exception 'UPG-00938: not enough args for function.';

 end if;

 return v_ret;

end;

$$

 language plpgsql;