oracle 小写转大写函数

create or replace function F_upper_money(p_num in number default null)
  return nvarchar2 is
  Result      nvarchar2(100); --返回字符串
  num_round   nvarchar2(100) := to_char(abs(round(p_num, 2))); --转换数字为小数点后2位的字符(正数)
  num_left    nvarchar2(100); --小数点左边的数字
  num_right   nvarchar2(2); --小数点右边的数字
  str1        nchar(10) := '零壹贰参肆伍陆柒捌玖'; --数字大写
  str2        nchar(16) := '元拾佰仟万拾佰仟亿拾佰仟万拾佰仟'; --数字位数(从低至高)
  num_pre     number(1) := 1; --前一位上的数字
  num_current number(1); --当前位上的数字
  num_count   number := 0; --当前数字位数

begin
  if p_num is null then
    return null;
  end if; --转换数字为null时返回null

  select to_char(nvl(substr(to_char(num_round),
                            1,
                            decode(instr(to_char(num_round), '.'),
                                   0,
                                   length(num_round),
                                   instr(to_char(num_round), '.') - 1)),
                     0))
    into num_left
    from dual; --取得小数点左边的数字
  select substr(to_char(num_round),
                decode(instr(to_char(num_round), '.'),
                       0,
                       length(num_round) + 1,
                       instr(to_char(num_round), '.') + 1),
                2)
    into num_right
    from dual; --取得小数点右边的数字

  if length(num_left) > 16 then
    return '**********';
  end if; --数字整数部分超过16位时

  --采用从低至高的算法,先处理小数点右边的数字
  if length(num_right) = 2 then
    if to_number(substr(num_right, 1, 1)) = 0 then
      result := '零' ||
                substr(str1, to_number(substr(num_right, 2, 1)) + 1, 1) || '分';
    else
      result := substr(str1, to_number(substr(num_right, 1, 1)) + 1, 1) || '角' ||
                substr(str1, to_number(substr(num_right, 2, 1)) + 1, 1) || '分';
    end if;
  elsif length(num_right) = 1 then
    result := substr(str1, to_number(substr(num_right, 1, 1)) + 1, 1) || '角整';
  else
    result := '整';
  end if;
  --再处理小数点左边的数字
  for i in reverse 1 .. length(num_left) loop
    --(从低至高)
    num_count   := num_count + 1; --当前数字位数
    num_current := to_number(substr(num_left, i, 1)); --当前位上的数字
    if num_current > 0 then
      --当前位上数字不为0按正常处理
      result := substr(str1, num_current + 1, 1) ||
                substr(str2, num_count, 1) || result;
    else
      --当前位上数字为0时
      if mod(num_count - 1, 4) = 0 then
        --当前位是元、万或亿时
        result  := substr(str2, num_count, 1) || result;
        num_pre := 0; --元、万,亿前不准加零
      end if;
      if num_pre > 0 or length(num_left) = 1 then
        --上一位数字不为0或只有个位时
        result := substr(str1, num_current + 1, 1) || result;
      end if;
    end if;
    num_pre := num_current;
  end loop;

  if p_num < 0 then
    --转换数字是负数时
    result := '负' || result;
  end if;

  return Result;

exception
  when others then
    raise_application_error(-20001, '数字转换大写出现错误!' || sqlerrm);
end;

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
### 回答1: 可以使用Oracle中的UPPER函数将字符串中的小写字母转换大写字母,例如: SELECT UPPER('hello world') FROM DUAL; 这将返回结果:'HELLO WORLD' ### 回答2: 要将Oracle中的小写字母转换大写字母,可以使用Oracle的内置函数UPPER()来实现。UPPER()函数用于将字符串中的小写字母转换大写字母。 例如,假设我们有一个名为"employees"的表,其中有一个名为"first_name"的字段存储的是员工的名字,我们可以使用如下的SQL语句将这些名字转换大写字母: SELECT UPPER(first_name) FROM employees; 这个SQL语句会将"first_name"字段中的所有小写字母转换大写字母,并将结果返回。你可以通过添加其他查询条件来进一步过滤和排序结果。 需要注意的是,UPPER()函数只会将小写字母转换大写字母,其他字符如数字、符号和大写字母本身都不会受到影响。同时,UPPER()函数是不区分大小写的,也就是说,它会将所有字符都转换大写字母,而不管原始字符串中是否已经是大写字母。 在实际应用中,可以根据具体需求使用UPPER()函数来处理不同的字段和表,以满足数据转换的要求。 ### 回答3: 在Oracle中,我们可以使用TO_UPPER函数小写字母转换大写字母。TO_UPPER函数接受一个字符串作为参数,并返回将该字符串中的所有小写字母转换大写字母的结果。 例如,如果我们有一个名为"employees"的表,其中包一个名为"first_name"的列,我们可以使用以下语句将该列的所有小写字母转换大写字母: SELECT TO_UPPER(first_name) FROM employees; 这将返回一个结果集,其中包"first_name"列中的所有值,并且这些值的小写字母已经转换大写字母。 如果我们只想转换特定的字符串而不是从表中选择列的值,我们可以直接将待转换的字符串作为参数传递给TO_UPPER函数。 例如,我们可以使用以下语句将字符串"hello world"中的所有小写字母转换大写字母: SELECT TO_UPPER('hello world') FROM dual; 这将返回一个结果集,其中包"HELLO WORLD"字符串。 无论是转换表中的列值还是特定的字符串,TO_UPPER函数都是一个方便的方法来在Oracle中实现小写字母到大写字母的转换

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值