https://blog.youkuaiyun.com/neilzh-cnhttps://blog.youkuaiyun.com/https://blog.youkuaiyun.com/neil/article/details/5860196https://blog.youkuaiyun.com/neil/article/details/5860196neilFri, 03 Sep 2010 00:17:00 +0800create function p_check_txm_xlw (@txm char(13))
returns char(13)
as
begin
--传入 13位条形码(eg: 1234567890123)
计算 条码校验位 ，输出1 则校验位正确，0，不正确
if left(@txm,1)='2'
return 1
if len(rtrim(@txm))<=7
return 1
https://blog.youkuaiyun.com/neil/article/details/648427https://blog.youkuaiyun.com/neil/article/details/648427neilMon, 03 Apr 2006 02:47:00 +0800https://blog.youkuaiyun.com/neil/article/details/648420https://blog.youkuaiyun.com/neil/article/details/648420neilMon, 03 Apr 2006 02:34:00 +0800https://blog.youkuaiyun.com/neil/article/details/629590https://blog.youkuaiyun.com/neil/article/details/629590neilMon, 20 Mar 2006 03:56:00 +0800https://blog.youkuaiyun.com/neil/article/details/3015https://blog.youkuaiyun.com/neil/article/details/3015neilFri, 31 Aug 2001 02:03:00 +0800https://blog.youkuaiyun.com/neil/article/details/3014https://blog.youkuaiyun.com/neil/article/details/3014neilFri, 31 Aug 2001 02:00:00 +0800https://blog.youkuaiyun.com/neil/article/details/3013https://blog.youkuaiyun.com/neil/article/details/3013neilFri, 31 Aug 2001 01:59:00 +0800https://blog.youkuaiyun.com/neil/article/details/3012https://blog.youkuaiyun.com/neil/article/details/3012neilFri, 31 Aug 2001 01:58:00 +0800https://blog.youkuaiyun.com/neil/article/details/3011https://blog.youkuaiyun.com/neil/article/details/3011neilFri, 31 Aug 2001 01:56:00 +0800https://blog.youkuaiyun.com/neil/article/details/3010https://blog.youkuaiyun.com/neil/article/details/3010neilWed, 06 Jun 2001 00:09:00 +0800https://blog.youkuaiyun.com/neil/article/details/3009https://blog.youkuaiyun.com/neil/article/details/3009neilFri, 25 May 2001 12:05:00 +0800