加入收藏 | 设为首页 | 会员中心 | 我要投稿 湖南网 (https://www.hunanwang.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 电商 > 正文

新旧体系切换中 资料内码 处理赏罚

发布时间: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   --提交事宜



以上为商品资料的内码处理赏罚,其他资料同上。      

















  










(编辑:湖南网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    热点阅读