最近工作涉及计算条形码第 13位校验位批量更改, ai、条码打印机、条码扫描器等软件内置生成校验位,网上搜索也找了条码生成器,但对我们来说不够灵活,编写了一个小程序 计算校验位
ok 先看看php版的,跟网上搜索到的简单了不少
function en13($code)
{
$tmp1=0;
$tmp2=0;
for($i=0;$i<12;$i++)
{
if($i % 2==0)
$tmp1+=substr($code,$i,1);
el
$tmp2+=substr($code,$i,1);
}
return (10-($tmp2*3+$tmp1)%10)%10;
}
//测试www.2cto.com
$t=”6939762911740″;
echo en13($t);
function en13($code)
{
$tmp1=0;
$tmp2=0;
for($i=0;$i<12;$i++)
{
if($i % 2==0)
$tmp1+=substr($code,$i,1);
el
$tmp2+=substr($code,$i,1);
}
return (10-($tmp2*3+$tmp1)%10)%10;
}
//测试
$t=”6939762911740″;
echo en13($t);
还有要把mssql中的数据批量更新 就不写程序了 直接在sql企业管理器里更新消费者商业问卷调查
t-sql代码
declare @str as varchar(15)
declare @tmp as varchar(30)
declare @t1 as int
declare @t2 as int
declare @i int
t @t1=0
t @t2=0
t @str=’6939762911740′
t @i=1
while @i<=12
begin
if @i % 2=0
begin
t @t1=@t1+substring(@str,@i,1)
end
el
begin
t @t2=@t2+substring(@str,@i,1)
end
t @i=@广东最好的高中i+1
end
t @tmp=(10-(@t1*3+@t2)%10)%10
–end function
lect @t1 ,@t2,@tmp
declare @str as varchar(15)
declare @tmp as varchar(30)
declare @t1 as int
declare @t2 as int
declare @i int
t @t1=0
t @t2=0
t @str=’6939762911740′
t @i=1
while @i<=12
begin
if @i % 2=0
begin
t @t1=@t1+substring(@str,@i,1)
end
el
begin
t @t2=@t2+substring(@str,@i,1)
end
t @用心灵去倾听教学设计i=@i+1
end
t @tmp=(10-(@t1*3+@t2)%10)%10
–end function
lect @t1 ,@t2,@tmp www.2cto.com
ena-13校验码的计算方法代码位置序号代码位置序号是指包括校验码在内的,由右至左的顺序号(校验码的代码位置序号为1)。 计算步骤校验码的计算步骤如下:a.从代码位置序号2开始,所有偶数位的数字代码求和。b.将步骤a的和乘以3。c.从代码位置序号3开始,所有奇数位的数字代码求和。d.将步骤b与步骤c的结果相加。e.用大于或等于步骤d所得结果且为10最小整数倍的数减去步骤d所得结果,其差即为所求校验码的城市轨道交通工程技术值。示例:代码690123456789×1校验码的计算见表1。 表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
摘自 tao2581 日常小记
本文发布于:2023-04-07 05:53:24,感谢您对本站的认可!
本文链接:https://www.wtabcd.cn/fanwen/zuowen/1519f65cc333fdd08aff6150ddff121f.html
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。
本文word下载地址:条形码 校验位 计算公式 PHP、T.doc
本文 PDF 下载地址:条形码 校验位 计算公式 PHP、T.pdf
留言与评论(共有 0 条评论) |