IDCARD的第一代是15位号码，第二代是18位号码，
新的18位IDCARD号码各位的含义:1-2位省、自治区、直辖市代码
3-4位地级市、盟、自治州代码
5-6位县、县级市、区代码
7-14位出生年月日，比如19670401代表1967年4月1日
15-17位为顺序号，其中17位男为单数，女为双数
18位为校验码，0-9和X，由公式随机产生。
15位IDCARD号码各位的含义: 1-2位省、自治区、直辖市代码；
3-4位地级市、盟、自治州代码；
5-6位县、县级市、区代码；
7-12位出生年月日,比如670401代表1967年4月1日,这是和18位号码的第一个区别；
13-15位为顺序号，其中15位男为单数，女为双数
与18位***号的第二个区别：没有最后一位的验证码
从IDCARD中获取用户年龄信息，要对IDCARD合法性进行校验。
--判断是否为数字，返回True,False
CREATE OR REPLACE FUNCTION DT_ISNUMBER(P_IN VARCHAR2) RETURN BOOLEAN AS
I NUMBER ;
BEGIN
I := TO_NUMBER(P_IN);
RETURN TRUE;
EXCEPTION
WHEN OTHERS THEN
RETURN FALSE;
END;
--判断是否为日期，返回True,False
CREATE OR REPLACE FUNCTION DT_ISDATE(P_IN VARCHAR2) RETURN BOOLEAN AS
I DATE;
BEGIN
I := TO_DATE(P_IN,'YYYYMMDD');
RETURN TRUE;
EXCEPTION
WHEN OTHERS THEN
RETURN FALSE;
END;
--判断是否为合法的***号
CREATE OR REPLACE FUNCTION DT_ISIDCARD(P_IDCARD VARCHAR2) RETURN BOOLEAN IS
IDCARDLEN INTEGER;
BEGIN
IDCARDLEN := LENGTH(P_IDCARD);
IF (IDCARDLEN = 18 AND DT_ISNUMBER(SUBSTR(P_IDCARD, 1, IDCARDLEN - 1)) AND
DT_ISDATE(SUBSTR(P_IDCARD, 7, 8)) ) OR
(IDCARDLEN = 15 AND DT_ISNUMBER(SUBSTR(P_IDCARD, 1, IDCARDLEN)) AND
DT_ISDATE('19' || SUBSTR(P_IDCARD, 7, 6)) ) THEN
RETURN TRUE;
ELSE
RETURN FALSE;
END IF;
END DT_ISIDCARD;
--获取***号信息的年龄并返回
CREATE OR REPLACE FUNCTION DT_GETAGE(P_IDCARD VARCHAR2) RETURN INTEGER IS
IDCARDLEN INTEGER;
IDCARDYEAR INTEGER;
BEGIN
IDCARDLEN :=LENGTH(P_IDCARD);
IF DT_ISIDCARD(P_IDCARD) AND IDCARDLEN = 18 THEN
IDCARDYEAR := TO_NUMBER(SUBSTR(P_IDCARD,7,4));
END IF;
IF DT_ISIDCARD(P_IDCARD) AND IDCARDLEN = 15 THEN
IDCARDYEAR := TO_NUMBER('19'||SUBSTR(P_IDCARD,7,2));
END IF;
RETURN TO_NUMBER(TO_CHAR(SYSDATE,'YYYY'))-IDCARDYEAR;
END DT_GETAGE;以上针对***年龄获取常用函数做个记录，方便日后直接使用或者对***中其他地址、性别做进一步解析使用
（PS：为啥shenfenzheng这三个字要当做敏感信息被过滤掉了呢）
