使用plsql实现阿拉伯数字转中文大写

mikixiyou

浏览: 1098451 次
性别:
来自: 南京

最近访客更多访客>>

ringphone

seahb

my_xinwen

stevenyj

博主相关

博客

微博

相册

留言

关于我

博客专栏

: Oracle管理和开发
浏览量：352970

文章分类

社区版块

存档分类

博客分类：

Oracle

oracle 阿拉伯数字转中文大写 pl sql

使用pl sql的数组功能、循环机制将小于10的16次方的任意阿拉伯数字转换为中文大写数字。该函数从原来的200多行，优化成现在70行左右。

始终相信，最少的代码实现某个功能才是最优雅的开发方式，代码越少出bug的概率就越低。

从开发、调试、到优化这个函数，我用掉了约5个小时的时间，最后只有短短的70行。顺便膜拜一下，那个解放军美女尖兵：90昼夜主持编写40万行代码

(miki西游 @mikixiyou 原文链接: http://mikixiyou.iteye.com/blog/1608834 )

附上函数代码：

create or replace function chinese_number_program(p_input float)
  return varchar2 as
  /*
  created by miki西游 on 2012-7-27
  It is used to change Arabic numbers to Chinese big numbers.
  */
  type typ_money is table of varchar2(20);
  c_numbers typ_money := typ_money('零', '壹', '贰', '叁', '肆', '伍', '陆', '柒', '捌', '玖');
	c_unit typ_money := typ_money('分', '角', '圆', '拾', '佰', '仟', '万', '拾', '佰', '仟', '亿', '拾', '佰', '仟', '兆', '拾', '佰', '仟');
  v_array_money    typ_money := typ_money();
  chinese_number   varchar2(30);
  result           varchar2(1000);
  v_number         integer;
  v_number_element integer;
  i                int;
begin
  if (p_input >= power(10, 16)) then
    result := '超出计算范围';
    return result;
  end if;
  v_number := round(p_input * 100);

  i := 1;
  v_array_money.extend(1);
  v_array_money(v_array_money.count) := '整';

  while v_number > 0 loop
    v_number_element := mod(v_number, 10);
    if (v_number_element = 0) then
      if i in (3, 7, 11, 15) then
        chinese_number := c_unit(i);
      else
        chinese_number := c_numbers(v_number_element + 1);
      end if;
    else
      chinese_number := c_numbers(v_number_element + 1) || c_unit(i);
    end if;
  
    case
      when chinese_number = '零' then
        if (v_array_money(v_array_money.count) not in
           ('整', '零', '圆', '万', '亿', '兆')) then
          v_array_money.extend(1);
          v_array_money(v_array_money.count) := chinese_number;
        end if;
      when chinese_number like '%亿' then
        if (v_array_money(v_array_money.count) in ('万')) then
          v_array_money(v_array_money.count) := chinese_number;
        else
          v_array_money.extend(1);
          v_array_money(v_array_money.count) := chinese_number;
        end if;
      when chinese_number like '%兆' then
        if (v_array_money(v_array_money.count) in ('万', '亿')) then
          v_array_money(v_array_money.count) := chinese_number;
        else
          v_array_money.extend(1);
          v_array_money(v_array_money.count) := chinese_number;
        end if;
      else
        v_array_money.extend(1);
        v_array_money(v_array_money.count) := chinese_number;
    end case;
    v_number := floor(v_number / 10);
    i        := i + 1;
  end loop;
  for i in v_array_money.first .. v_array_money.last loop
    result := v_array_money(i) || result;
  end loop;

  return result;
end;

测试结果如下：

SQL> select chinese_number_program(9999999999999999.99) from dual;\
 
CHINESE_NUMBER_PROGRAM(9999999
--------------------------------------------------------------------------------
玖仟玖佰玖拾玖兆玖仟玖佰玖拾玖亿玖仟玖佰玖拾玖万玖仟玖佰玖拾玖圆玖角玖分整
 
SQL> select chinese_number_program(9999999999999999.99) as cc from dual;
 
CC
--------------------------------------------------------------------------------
玖仟玖佰玖拾玖兆玖仟玖佰玖拾玖亿玖仟玖佰玖拾玖万玖仟玖佰玖拾玖圆玖角玖分整
 
SQL> select chinese_number_program(990000001229.00) as cc from dual;
 
CC
--------------------------------------------------------------------------------
玖仟玖佰亿壹仟贰佰贰拾玖圆整
 
SQL> select chinese_number_program(9900029.01) as cc from dual;
 
CC
--------------------------------------------------------------------------------
玖佰玖拾万零贰拾玖圆零壹分整
 
SQL> select chinese_number_program(10029.3) as cc from dual;
 
CC
--------------------------------------------------------------------------------
壹万零贰拾玖圆叁角整
 
SQL>

btw,如果您觉得有同感，请鼓励一下。呵呵

objective-c

#import <Foundation/Foundation.h>
#import <stdio.h>

void print( NSArray *array ) {
    int i;
    for (i=0;i<[array count];i++)
    {
        NSLog(@"%@",[array objectAtIndex:i]);
    }

}

void print2( NSArray *array ) {
    NSEnumerator *enumerator = [array objectEnumerator];
    id obj;
    while ( obj = [enumerator nextObject] ) {
        printf( "%s\n", [[obj description] cString] );
    }
}

void print3( NSArray *array ) {
    id obj;
    NSLog(@"new array is ");
    for (obj in array)
    {
        NSLog(@"%@",obj);
    }
}

NSString * printByLine( NSArray *array ) {
    id obj;
    NSMutableString * oneLine;
    oneLine=[NSMutableString stringWithCapacity:100];
    NSString * oneString;

    for (obj in array)
    {
        oneString=[obj copy];

        //[oneLine appendString:oneString];
        [oneLine insertString:oneString atIndex:0];

       // NSLog(@"xx= %@,%d,%d",oneLine,oneLine,oneString);
    }

    return oneLine;


}



int main() {
    NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];

    //NSArray *arr_numbers = [[NSArray alloc] initWithObjects:@"Áã", @"Ò¼", @"·¡", @"Èþ", @"ËÁ", @"Îé", @"Â½", @"Æâ", @"°Æ", @"¾Á", nil];
    NSArray *arr_numbers = [[NSArray alloc] initWithObjects:@"Zero", @"One", @"Two", @"Three", @"Four", @"Five", @"Six", @"Seven", @"Eight", @"Nine", nil];

    //NSArray *arr_unit = [[NSArray alloc] initWithObjects:@"·Ö", @"½Ç", @"Ô²", @"Ê°", @"°Û", @"Çª", @"Íò", @"Ê°", @"°Û", @"Çª", @"ÒÚ", @"Ê°", @"°Û", @"Çª", @"Õ×", @"Ê°", @"°Û", @"Çª",nil];
    NSArray *arr_unit = [[NSArray alloc] initWithObjects:@"F", @"J", @"Yuan", @"S", @"B", @"Q", @"W", @"S", @"B", @"Q", @"Yi", @"S", @"B", @"Q", @"Z", @"S", @"B", @"Q",nil];

    NSMutableArray * mutable_money = [[NSMutableArray alloc] init];

    NSSet * set_special_number=[[NSSet alloc] initWithObjects:@"Zheng",@"Zero",@"Yuan",@"W",@"Yi",@"Z"];

    //print(arr_numbers);
   // print2(arr_numbers);
   // print3(arr_unit);

    float p_input_number;
    int input_number;
    int input_number_element;
    int i=0;

    NSString * chinese_number;
    NSString * result;
    p_input_number=1008.20;

    if (p_input_number>9999999)
    {
        result =@"out of maximize range";
        NSLog(@"%@",result);
        return 0;
    }


    input_number=p_input_number*100;

    [mutable_money addObject:@"Zheng"];

    //[[chinese_number alloc] init];

    while (input_number>0)
    {
        input_number_element=input_number%10;

        if(input_number_element==0)
        {
            if (i == 2 || i==6 || i==10 || i==14)
            {
                chinese_number=[arr_unit objectAtIndex:i];
            }
            else
            {
                chinese_number=[arr_numbers objectAtIndex:input_number_element];
            }

        }
        else
        {
            chinese_number=[[arr_numbers objectAtIndex:input_number_element] stringByAppendingString:[arr_unit objectAtIndex:i]];
        }

      //  NSLog(@"%@,%@,%@",chinese_number,[arr_numbers objectAtIndex:input_number_element],[arr_unit objectAtIndex:i]);
       // NSLog(@"%d,%d,%d",chinese_number,[arr_numbers objectAtIndex:input_number_element],[arr_unit objectAtIndex:i]);


        if ([chinese_number isEqualToString:@"Zero"])
        {
            if (!([set_special_number containsObject:[mutable_money lastObject]]))
            {
            [mutable_money addObject:chinese_number];

            //NSLog(@"zero is %@,%@,%@",chinese_number,[arr_numbers objectAtIndex:input_number_element],[arr_unit objectAtIndex:i]);

            }
        }
        else if ([chinese_number hasSuffix:@"Yi"])
        {
            if ([[mutable_money lastObject] isEqualToString:@"W"])
            {
                [mutable_money removeLastObject];
                [mutable_money addObject:chinese_number];
            }
            else
            {
                [mutable_money addObject:chinese_number];
            }

            //NSLog(@"Yi is %@,%@,%@",chinese_number,[arr_numbers objectAtIndex:input_number_element],[arr_unit objectAtIndex:i]);
        }

        else
        {
            [mutable_money addObject:chinese_number];
            //NSLog(@"Others is %@,%@,%@",chinese_number,[arr_numbers objectAtIndex:input_number_element],[arr_unit objectAtIndex:i]);
        }

        input_number=input_number/10;
        i++;

    }





   NSLog(@"%@",printByLine(mutable_money));



    // free memory

    [arr_numbers release];
    [arr_unit release];
    [mutable_money release];

    [pool release];

    return 0;
}

8
顶

13
踩

分享到：

如何去掉String的前后空格或某字符 | PLSQL集合类型的使用总结

2012-07-27 11:33
浏览 4829
评论(8)
分类:编程语言
查看更多

8 楼 szkktom 2012-08-02

又见雷锋了，呵呵！加油，好好研究下。

7 楼 freezingsky 2012-07-27

数据库来实现这个有点不靠谱，不过，能实现说明掌握了，不错！建议把这种转换放到UI前端！

6 楼 mikixiyou 2012-07-27

jamcode 写道

用PL SQL去实现这个真蛋疼
。
哪，这里，http://jamcode.iteye.com/blog/1157096

你这个没有pl sql的实现方法吧。
哈哈

在一些报表上还是能用上的。

5 楼 jamcode 2012-07-27

用PL SQL去实现这个真蛋疼
。
哪，这里，http://jamcode.iteye.com/blog/1157096

4 楼 mikixiyou 2012-07-27

我还是觉得，
代码简洁是排在第一位的。
可读性取决于注释，而可维护性是和技术能力关联密切。

3 楼 teamilk 2012-07-27

其实我觉得，很多时候易读性可维护性要比代码量来的相对重要点，还是要平衡吧

2 楼 mikixiyou 2012-07-27

Miracle_Qsc 写道

不错，留下啦以后可能用的上~~感谢

呵呵，分享嘛！
优化过程，我是不是也应该也写下来。这个只是产品。

1 楼 Miracle_Qsc 2012-07-27