新旧体系切换中 资料内码 处理赏罚
发布时间:2018-08-21 15:48:27 所属栏目:电商 来源:站长网
导读:原体系 :MSSQL SERVER 7.0+DELPHI 新体系 :MSSQL SERVER 2000 + DELPHI 必要处理赏罚资料:spkfk(商品库房库) : (spid , //商品内码 pk spbh ,//商品编号 Unique index spmch ,//商品名称 shpgg ,//商品规格 dw ,//单元 shpchd //商品产地 ) 新体系中资料来
原体系 :MSSQL SERVER 7.0+DELPHI 新体系 :MSSQL SERVER 2000 + DELPHI 必要处理赏罚资料:spkfk(商品库房库) : (spid , //商品内码 pk spbh ,//商品编号 Unique index spmch ,//商品名称 shpgg ,//商品规格 dw , //单元 shpchd //商品产地 ) 新体系中资料来历为原体系中 SPKFK , 原体系中无 SPID 字段 , 需在导入时天生。 将旧体系营业数据库(dtx4) 附加到MSSQL2000中 执行如下操纵: use st70 --新体系营业数据库 declare @tran_point int set @tran_point=@@trancount --获取体系事宜数 if @tran_point=0 begin tran tran_c --开始事宜else save tran tran_c --配置事宜生涯点 declare @spid char(11) --界说变量set @spid='' declare @id int --界说 内码 数值变量 set @id = 0 --初始化 起始 值 select @spid as spid , spbh ,spmch ,shpgg , dw ,shpchd into #t1 --提取原体系中 商品信息from dtx40..spkfk if @@error<>0 goto err_lab update #t1 set spid=@id ,@id=@id+1 -- 天生商品内码数值 if @@error<>0 goto err_lab update #t1 set spid='SPH' + REPLICATE('0',8-len(ltrim(rtrim(spid))))+ltrim(rtrim(spid)) --天生商品内码(商品内码为:SPHxxxxxxxxx) if @@error<>0 goto err_lab delete from spkfk --清空 目标表 if @@error<>0 goto err_lab insert into spkfk(spid , spbh , spmch ,shpgg ,dw ,shpchd) --将数据插入到目标表select spid , spbh , spmch ,shpgg ,dw ,shpchd from #t1 if @@error<>0 goto err_lab drop table #t1 if @tran_point=0 goto returnlb err_lab: rollback tran tran_c --打消事宜 returnlb: commit tran tran_c --提交事宜 以上为商品资料的内码处理赏罚,其他资料同上。 (编辑:湖南网) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |
站长推荐
热点阅读