如何判断一个值 是否为正整数

feixianxxx

请问在plsql中 如何判断一个值 是否为正整数
要求包含特殊字符 字母 文字 不能为负数 0 也不能为小数

急~~

newkid

先TO_NUMBER如果没有异常则判断是否>0并且MOD(X,1)=0, 也可以用TRUNCATE

feixianxxx

原帖由 newkid 于 2011-3-3 22:25 发表
先TO_NUMBER如果没有异常则判断是否>0并且MOD(X,1)=0, 也可以用TRUNCATE

我想看下 大大的具体语句...

newkid

CREATE OR REPLACE FUNCTION f_check_int (
          p_str VARCHAR2
          )
RETURN VARCHAR2  ------- Y / N
IS
   lv_data NUMBER;
BEGIN
   lv_data := TO_NUMBER(p_str);
   IF lv_data>0 AND MOD(lv_data,1)=0 THEN
      RETURN 'Y';
   ELSE
      RETURN 'N';
   END IF;
EXCEPTION
   WHEN VALUE_ERROR THEN
        RETURN 'N';
END;
/

Function created.

Elapsed: 00:00:00.06
jsu@JSU> SELECT  f_check_int ('123') FROM DUAL;

F_CHECK_INT('123')
----------------------------------------------------------------------
Y

Elapsed: 00:00:00.14
jsu@JSU> SELECT  f_check_int ('12A3') FROM DUAL;

F_CHECK_INT('12A3')
----------------------------------------------------------------------
N

Elapsed: 00:00:00.03
jsu@JSU> SELECT  f_check_int ('123.2') FROM DUAL;

F_CHECK_INT('123.2')
----------------------------------------------------------------------
N

Elapsed: 00:00:00.01
jsu@JSU> SELECT  f_check_int ('-123') FROM DUAL;

F_CHECK_INT('-123')
----------------------------------------------------------------------
N

Elapsed: 00:00:00.01

feixianxxx

原帖由 newkid 于 2011-3-3 23:23 发表
CREATE OR REPLACE FUNCTION f_check_int (
          p_str VARCHAR2
          )
RETURN VARCHAR2  ------- Y / N
IS
   lv_data NUMBER;
BEGIN
   lv_data := TO_NUMBER(p_str);
   IF lv_data>0 AND MOD(lv_data,1)=0 THEN
      RETURN 'Y';
   ELSE
      RETURN 'N';
   END IF;
EXCEPTION
   WHEN VALUE_ERROR THEN
        RETURN 'N';
END;
/

Function created.

Elapsed: 00:00:00.06
jsu@JSU> SELECT  f_check_int ('123') FROM DUAL;

F_CHECK_INT('123')
----------------------------------------------------------------------
Y

Elapsed: 00:00:00.14
jsu@JSU> SELECT  f_check_int ('12A3') FROM DUAL;

F_CHECK_INT('12A3')
----------------------------------------------------------------------
N

Elapsed: 00:00:00.03
jsu@JSU> SELECT  f_check_int ('123.2') FROM DUAL;

F_CHECK_INT('123.2')
----------------------------------------------------------------------
N

Elapsed: 00:00:00.01
jsu@JSU> SELECT  f_check_int ('-123') FROM DUAL;

F_CHECK_INT('-123')
----------------------------------------------------------------------
N

Elapsed: 00:00:00.01

多谢 ...

solomon_007

CREATE OR REPLACE FUNCTION f_check_int (p_str VARCHAR2)
RETURN VARCHAR2  
IS
   l_data NUMBER;
BEGIN
   l_data := TO_NUMBER(p_str);
   IF l_data=ABS(ROUND(l_data)) THEN
      RETURN 'Y';
   ELSE
      RETURN 'N';
   END IF;
EXCEPTION
   WHEN VALUE_ERROR THEN
        RETURN 'N';
END;

luohuap

select * from
(select to_number(&P_NUM) num from dual where regexp_like(&P_NUM, '^(\+)?[[:digit:]]+$')
) where num <> 0

from1985

有一个函数是SIGN可以判定 正 负，但是判定小数的话，还是只有使用大师的方法了

magnuslinux

nice 小知识积累

atgc

简单点
select CASE WHEN trunc(10.1)-10.1=0 AND 10.1>0 THEN  ‘正整数' ELSE  '不是正整数' END from dual;