【叶子函数分享三十八】得到条形码的校验位函数

一、校验码说明：

 

校验码的计算方法

1.        代码位置序号 代码位置序号是指包括校验码在内的，由右至左的顺序号（校验码的代码位置序号为1）。 2.        计算步骤 校验码的计算步骤如下： a.从代码位置序号2开始，所有偶数位的数字代码求和。 b.将步骤a的和乘以3。 c.从代码位置序号3开始，所有奇数位的数字代码求和。 d.将步骤b与步骤c的结果相加。 e.用大于或等于步骤d所得结果且为10最小整数倍的数减去步骤d所得结果，其差即为所求校验码的值。 示例：代码690123456789X1校验码的计算见表B.1。 步 骤 举 例 说 明 1.自右向左顺序编号 位置序号 13 12 11 10 9 8 7 6 5 4 3 2 1 代码 6 9 0 1 2 3 4 5 6 7 8 9 X 2.从序号2开始求出偶数位上数字之和① 9+7+5+3+1+9＝34 ① 3. ①*3=② 34×3＝102  ② 4.从序号3开始求出奇数位上数字之和③ 8+6+4+2+0+6＝26 ③ 5. ②+③=④ 102+26＝128 ④ 6.用大于或等于结果④且为10最小整数倍的数减去④，其差即为所求校验码的值 130－128＝2 校验码X1＝2 表1 校验码的计算方法

 

 

 

 

二、SQL实现：

 

go

-- =============================================

-- Author:        <Maco Wang>

-- Create date: <2009-10-27 16:01>

-- Description:   <计算条形码的校验码>

-- =============================================

create function [dbo].[Get_CheckCode]

(

    @ActiveCode varchar(12)

)  

returns varchar(13)

as  

begin  

    declare @codelength int

    set @codelength= len(@ActiveCode)

    declare @curnum int;set @curnum=0

    declare @temp1 int;set @temp1=0

    declare @temp2 int;set @temp2=0

    declare @locatnum int;set @locatnum=0

    declare @code13 int

    declare @i int;set @i=0

    while(@i<@codelength)

    begin

       set @locatnum=@i+2;

       set @curnum=floor(substring(@ActiveCode,@codelength-@i,1))

       if(@locatnum%2=0)

           set @temp1=@temp1+@curnum

       else

           set @temp2=@temp2+@curnum

       set @i=@i+1

    end

    set @code13=10-(@temp1*3+@temp2)%10;

    if(@code13=10)

       set @code13=0

    return @ActiveCode+cast(@code13 as varchar(1));

end

 

--测试示例

select dbo.[Get_CheckCode]('827123121212')

 

--运行结果

/*

8271231212124

*/