专注Oracle EBS--理性的浪漫
===========================================================
===========================================================
最后一位数字为校验位

/* Formatted on 2007/05/28 17:01 (Formatter Plus v4.8.7) */
declare
v_char varchar2(13);
v_result varchar2(10);
begin

v_char:='EC186409676CN';
SELECT
( 11
- MOD (( 8 * TO_NUMBER (SUBSTR (v_char, 3, 1))
+ 6 * TO_NUMBER (SUBSTR (v_char, 4, 1))
+ 4 * TO_NUMBER (SUBSTR (v_char, 5, 1))
+ 2 * TO_NUMBER (SUBSTR (v_char, 6, 1))
+ 3 * TO_NUMBER (SUBSTR (v_char, 7, 1))
+ 5 * TO_NUMBER (SUBSTR (v_char, 8, 1))
+ 9 * TO_NUMBER (SUBSTR (v_char, 9, 1))
+ 7 * TO_NUMBER (SUBSTR (v_char, 10, 1))
),
11
)
) RESULT
into v_result
FROM dual;
dbms_output.put_line('result'|| v_result);
end ;

moonsoft 发表于:2007.05.28 17:15 ::分类: ( 分销 ) ::阅读:(359次) :: 评论 (0) ::收藏此页到365Key

发表评论
标题

在此添加评论
表情符号: smile laughing tongue angry crying sad wassat wink

称呼

邮箱地址(可选)

个人主页(可选)

 authimage


Blog信息
博客日历
切换风格
文章归档...
最新发表...
最新评论...
最多阅读文章...
博客统计...
网站链接...
新闻聚合