知识大全 Oracle中将数字转化成字符串

Posted 2022-07-16 知

篇首语：相逢意气为君饮，系马高楼垂柳边。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 Oracle中将数字转化成字符串相关的知识，希望对你有一定的参考价值。

Oracle中将数字转化成字符串 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　CREATE OR REPLACE FUNCTION to_words (　　　 m_amount_in IN NUMBER 　　　 m_first_para IN VARCHAR := Dollars 　　　 m_second_para IN VARCHAR := Cents 　　　 )　　　 RETURN VARCHAR 　　AS　　　 m_amount　　 NUMBER := m_amount_in;　　　 word_string　VARCHAR ( );　　　 lower_number NUMBER;　　　 lower_str　　VARCHAR ( );　　　 loop_var　　 NUMBER := ;　　　 /* Function declarartion to convert into string */　　　 FUNCTION to_string (m_val_in NUMBER)　　　　　RETURN CHAR　　　 IS　　　 BEGIN　　　　　IF m_val_in > 　　　　　THEN　　　　　　 RETURN　(INITCAP (TO_CHAR (TO_DATE (m_val_in SSSSS ) SSSSSSP )));　　　　　ELSE　　　　　　 RETURN　( );　　　　　END IF;　　　 END;　　　 /*　　　　 End of Function 　 */　　BEGIN　　　　/* 　place the parameters at required places */　　　 lower_number :=　(m_amount MOD ) * ;　　　　　 /* Check for lower denominations not exceeding o digits */　　　 IF length(lower_number) < 　　　 THEN　　　 IF m_amount >= and lower_number > 　　　 THEN　 lower_str :=　　　　　　 ||　　　　　　 m_first_para ||　　　　　　 & ||　　　　　　 LOWER (to_string (lower_number)) ||　　　　　　 ||　　　　　　 m_second_para;　　　 ELSIF m_amount < and lower_number > 　　　 THEN　 lower_str :=　　　　　　 LOWER (to_string (lower_number)) ||　　　　　　 ||　　　　　　 m_second_para;　　　 ELSIF m_amount >= and lower_number = 　　　 THEN　 lower_str := || m_first_para;　　　 END IF;　　　 ELSE 　　　　　　　 word_string := Invalid lower denomination !! ;　　　 RETURN　(word_string);　　　 END IF;　　/* End of placing paramters　 */　　　　　 WHILE loop_var = 　　　 LOOP　　　　　IF　　 m_amount > 　　　　　　 AND m_amount <= 　　　　　THEN　　　　　　 word_string :=　　　　　　　　word_string ||　　　　　　　　 (INITCAP (to_string (FLOOR (m_amount))) || lower_str);　　　　　　 loop_var := ;　　　　　ELSIF　　 m_amount > 　　　　　　　　AND m_amount < 　　　　　THEN　　　　　　 word_string :=　　　　　　　　word_string ||　　　　　　　　 (INITCAP (to_string (FLOOR (m_amount / ))) ||　　　　　　　　 Thousand ||　　　　　　　　to_string (FLOOR (m_amount MOD )) ||　　　　　　　　lower_str　　　　　　　　　 );　　　　　　 loop_var := ;　　　　　ELSIF　　 m_amount >= 　　　　　　　　AND m_amount < 　　　　　THEN　　　　　　 word_string :=　　　　　　　　word_string ||　　　　　　　　INITCAP (to_string (FLOOR (m_amount / ))) || Million ;　　　　　　 m_amount := FLOOR (m_amount MOD );　　　　　　 IF m_amount = 　　　　　　 THEN　　　　　　　　loop_var := ;　　　　　　　　word_string := word_string || lower_str;　　　　　　 END IF;　　　　　ELSIF　　 m_amount >= 　　　　　　　　AND m_amount <= 　　　　　THEN　　　　　　 word_string :=　　　　　　　　INITCAP (　　　　　　　　　 to_string (FLOOR (m_amount / ))) || Billion ;　　　　　　 m_amount := FLOOR (m_amount MOD );　　　　　　 IF m_amount = 　　　　　　 THEN　　　　　　　　loop_var := ;　　　　　　　　word_string := word_string || lower_str;　　　　　　 END IF;　　　　　ELSIF m_amount = 　　　　　THEN　　　　　　 word_string :=　( Zero || lower_str);　　　　　　 loop_var := ;　　　　　ELSE　　　　　　 word_string := This is beyond my scope !! ;　　　　　　 loop_var := ;　　　　　END IF;　　　 END LOOP;　　　 RETURN　(word_string);　　END to_words;　　/　　　　 cha138/Article/program/Oracle/201311/17291