ID_Card.rar_PowerBuilder_oracle资源-CSDN文库

共2个文件

txt：2个

版权申诉

28 浏览量 2022-09-14 15:13:45 上传评论收藏 2KB RAR 举报

标题中的“ID_Card.rar_PowerBuilder_oracle”暗示了这是一个关于使用PowerBuilder和Oracle数据库处理身份证号码转换问题的资源包。在这个场景中，我们主要关注两个关键知识点：身份证号码的15位到18位转换算法以及如何在PowerBuilder和Oracle数据库中实现这些算法。身份证号码在中国分为15位和18位两种形式，18位身份证号码是目前通用的标准格式，而15位则是早期版本。18位身份证号码包含了出生日期、性别、地区代码等信息，并且加入了校验码以增强其唯一性。15位身份证号码升级到18位时，通常需要补充出生年份的前两位（19或20）以及校验码。在PowerBuilder中，我们可以创建自定义函数来实现这个转换。PowerBuilder是一种可视化编程工具，主要用于开发企业级的应用程序，它的数据窗口组件可以方便地与数据库进行交互。我们可以编写一个函数，接收15位身份证号作为输入，然后根据规则计算出18位身份证号。这可能涉及到字符串操作，如截取、拼接和计算校验码。PowerBuilder支持多种编程语言，如PBL（PowerBuilder Language）、SQL等，因此你可以选择你熟悉的语言来实现这个功能。在Oracle数据库中，我们也可以创建存储过程或者函数来处理这个转换。Oracle是一种广泛使用的关系型数据库管理系统，它支持PL/SQL语言，可以用来编写复杂的数据库逻辑。存储过程或函数可以接收15位身份证号作为参数，然后返回18位身份证号。在Oracle中，我们需要考虑如何用SQL语句或PL/SQL代码来生成校验码，这通常涉及到模运算和位运算。在www.pudn.com.txt和ID_Card.txt这两个文件中，可能包含了实现上述转换的具体步骤、示例代码或者相关的讨论。"www.pudn.com"是一个知名的中文技术资源网站，经常分享各种编程代码和解决方案。ID_Card.txt可能是包含身份证号码转换算法的文本文件，或者是一些示例数据和解释。要理解并实现这个任务，你需要熟悉PowerBuilder的函数编写和Oracle的存储过程设计，同时要掌握15位到18位身份证号码转换的逻辑。通过阅读提供的文件，你将能够获取具体的操作指南和代码示例，进一步加深对这个知识点的理解。

资源详情

资源评论

资源推荐

收起资源包目录

ID_Card.rar （2个子文件）

www.pudn.com.txt 218B

ID_Card.txt 3KB

身份证号码15位18位相互转化算法，Powerbuiler、Oracle函数身份证标准在国家质量技术监督局于1999年7月1日实施的GB11643-1999《公民身份号码》中做了明确的规定。 GB11643-1999《公民身份号码》从实施之日起代替GB11643-1989。GB11643-1999《公民身份号码》主要内容如下：一、范围该标准规定了公民身份号码的编码对象、号码的结构和表现形式，使每个编码对象获得一个唯一的、不变的法定号码。二、编码对象公民身份号码的编码对象是具有中华人民共和国国籍的公民。三、号码的结构和表示形式 1、号码的结构公民身份号码是特征组合码，由十七位数字本体码和一位校验码组成。排列顺序从左至右依次为：六位数字地址码八位数字出生日期码三位数字顺序码一位数字校验码。 2、地址码表示编码对象常住户口所在县(市、旗、区)的行政区划代码，按GB/T2260的规定执行。 3、出生日期码表示编码对象出生的年、月、日，按GB/T7408的规定执行，年、月、日代码之间不用分隔符。 4、顺序码表示在同一地址码所标识的区域范围内，对同年、同月、同日出生的人编定的顺序号，顺序码的奇数分配给男性，偶数分配给女性。 5、校验码（1）十七位数字本体码加权求和公式 S = Sum(Ai * Wi), i = 0, ... , 16 ，先对前17位数字的权求和 Ai:表示第i位置上的身份证号码数字值 Wi:表示第i位置上的加权因子 Wi: 7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4 2 （2）计算模 Y = mod(S, 11) （3）通过模得到对应的校验码 Y: 0 1 2 3 4 5 6 7 8 9 10 校验码: 1 0 X 9 8 7 6 5 4 3 2 本人写的身份证号码15位18位相互转化的Powerbuilder函数 global type getid from function_object end type forward prototypes global function string getnewid (string old_id) global function string getid (string idcard) end prototypes global function string getid (string idcard); //Leehost写的新旧身份证号码转换函数 //如果输入的身份证号为15位，则返回18位对应号 //如果输入的身份证号为18位，则返回15位对应号 //如果为其它长度，则返回"0" if len(IDCard)=15 then int Wi[]={7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2, 1} string Wf[]= {'1', '0', 'X', '9', '8', '7', '6', '5', '4', '3', '2'} IDCard = Mid(IDCard, 1, 6) + "19" + Mid(IDCard, 7, 9) int i,S=0 For i = 1 To 17 S = Wi[ i ] * integer(Mid(IDCard, i , 1)) +S Next return IDCard + Wf[Mod(S,11) + 1] elseif len(IDCard)=18 then return Mid(IDCard, 1, 6) + Mid(IDCard, 9, 9) end if return "0" end function 身份证号码15位18位相互转化Oracle数据库函数 FUNCTION GetID(Prm_Id15 IN VARCHAR2) RETURN VARCHAR2 IS Prm_Id18 VARCHAR2(20); TYPE Wi IS VARRAY(18) OF NUMBER(2); TYPE Wf IS VARRAY(11) OF VARCHAR2(1); i NUMBER := 1; Str VARCHAR2(18); v_Sum NUMBER(10); Ai NUMBER(2); w Wi := Wi(7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2, 1); a Wf := Wf('1', '0', 'X', '9', '8', '7', '6', '5', '4', '3', '2'); BEGIN IF Length(Prm_Id15) = 15 THEN Str := Substr(Prm_Id15, 1, 6) || '19' || Substr(Prm_Id15, 7, 9); v_Sum := 0; FOR i IN 1 .. 17 LOOP v_Sum := v_Sum + To_Number(Substr(Str, i, 1)) * w(i); END LOOP; Ai := MOD(v_Sum, 11); Prm_Id18 := Str || a(Ai + 1); RETURN Prm_Id18; ELSIF Length(Prm_Id15) = 18 THEN Prm_Id18 := Prm_Id15; RETURN Prm_Id18; ELSE RETURN Prm_Id15; END IF; EXCEPTION WHEN OTHERS THEN RETURN Prm_Id15; END GetID;