1

我试图在 PL/SQL 中反转一个数字。它工作正常，但是当我的号码包含任何 0 时，输出是意外的。例如：

1234 output 4321
1000 output 1
1203 ouput 3021
10001 output 1


DECLARE
r number(9);
num number(9):=&p_num;
BEGIN
    WHILE num>=1 LOOP 
        IF mod(num,10)=0 THEN -- extracting last digit of a number .
            r:=r||0; --if end digit is 0 then concat r with 0
        ELSE
            r:=r||mod(num,10);--if mod is not 0 then it would be last digit.
        END IF; 
            num:=trunc(num/10);--Removing last digit from number
    END LOOP;
dbms_output.put_line(r);
END;
4

5 回答 5

4

尝试将变量“r”的类型更改为 varchar2。由于它被声明为数字，所以前导零被丢弃。

于 2010-04-04T15:54:29.103 回答
2

“反转数字”基本上是一种字符串操作，而不是数字操作。在数值上，10、100、1000 等的倒数都是 1 - 结果中的前导零不计算在内。因此，该操作是不可逆的；所有具有相同前导（有效）数字和零个或多个尾随零的数字在反转时都会产生相同的输出。

因此，您需要修改代码以生成字符串，而不是数字。

于 2010-04-04T15:56:53.577 回答
1

您不能用数字保留前导零；您必须使用字符串 (varchar2)。尝试这样的事情来看看：

DECLARE 
    r varchar2(9); 
    num varchars(9):=&p_num; 
BEGIN 
    r := REVERSE(num);
    dbms_output.put_line(r); 
END;
于 2010-04-04T16:04:49.207 回答
0

我不确定您的代码 Vineet 出了什么问题，但也许这会起作用。

DECLARE
    newStr    varchar2(9) = "";
    numStr    varchar2(9) := to_char(&p_num);
    i         number;
BEGIN
    i = length(numStr);
    WHILE i>0 LOOP
        newStr := newStr || substr(numStr, i, i + 1);
        i = i - 1;
    END LOOP;
    dbms_output.put_line(r);
END;

编辑：或者正如 gabe 正确指出的那样，只需使用 REVERSE 功能。

于 2010-04-04T15:20:40.963 回答
0

问题是您正在处理一个 NUMBER 值。当你反转 1000 时，你得到 0001，当输出未格式化时为 1。

你真正需要的是类似于：

CREATE OR REPLACE FUNCTION rev(p_num NUMBER)
RETURN VARCHAR2 IS
  v_chr VARCHAR2(50);
BEGIN
  v_chr := p_num;
  IF LENGTH(v_chr) > 1 THEN
    RETURN SUBSTR(v_chr, -1, 1)||rev(SUBSTR(v_chr, 1, LENGTH(v_chr)-1));
  END IF;
  RETURN v_chr;
EXCEPTION
  WHEN OTHERS THEN
    RETURN 'Bad Input';
END;
/

Function created

SQL> SELECT rev(100000) FROM dual;

REV(100000)
--------------------------------------------------------------------------------
000001

SQL>
于 2010-04-04T16:32:48.130 回答