GSP记录补充

WMS中先生成单据编号

目前创新互联已为上千多家的企业提供了网站建设、域名、网站空间、网站托管、服务器托管、企业网站设计、明水网站维护等服务，公司将坚持客户导向、应用为本的策略，正道将秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。

--《--采购入库----》

--1、删除表

drop table temp_djbh

--2、创建表

create table temp_djbh as

select djbh,djbh_sj shdh,djbh_sj ysdh,djbh_sj cgddh from in_upload_m where 1=2;

--3、将生成的数据插入表 中

declare

v_shdh varchar2(20) :='JHGYMA00027196';--收货最大单据编号

v_ysdh varchar2(20) :='JYDYMA00026766';--验收最大单据编号

begin

  for r_c in (select djbh,djbh_sj cgddh from in_upload_m where djbh_sj like 'JHF%' and dwid <>'QCRK') loop

    v_shdh := substr(v_shdh||'0000000000',1,9)||(substr(v_shdh,7,8) +1);

    v_ysdh := substr(v_ysdh||'0000000000',1,9)||(substr(v_ysdh,7,8) +1);

    insert into temp_djbh (djbh,shdh,ysdh,cgddh) values(r_c.djbh,v_shdh,v_ysdh,r_c.cgddh);

  end loop;

end;

--4、查询表中数据

select * from temp_djbh order by djbh

--《---销售退回单号----》

declare

v_shdh varchar2(20) :='XSSYMA00019474';--收货最大单据编号

v_ysdh varchar2(20) :='FHBYMA00019481';--验收最大单据编号

begin

  for r_c in (select djbh,djbh_sj cgddh from in_upload_m where djbh_sj like 'XST%' and dwid 

<>'QCRK') loop

    v_shdh := substr(v_shdh||'0000000000',1,9)||(substr(v_shdh,7,8) +1);

    v_ysdh := substr(v_ysdh||'0000000000',1,9)||(substr(v_ysdh,7,8) +1);

    insert into temp_djbh (djbh,shdh,ysdh,cgddh) values(r_c.djbh,v_shdh,v_ysdh,r_c.cgddh);

  end loop;

end;

--《--购退单号----》

declare

v_shdh varchar2(20) :='JYTYMA00004497';--收货最大单据编号

begin

  for r_c in (select djbh from inf_gjtc_hz where djbh like 'JHT%') loop

    v_shdh := substr(v_shdh||'0000000000',1,9)||(substr(v_shdh,7,8) +1);

    insert into temp_djbh (djbh,shdh,ysdh,cgddh) values(r_c.djbh,v_shdh,'','');

  end loop;

end;

ERP中插入相关记录

select * from spkfk where spbh in ('J000531','J000532','J000533','J000626','J000535','J000673')

update spkfk set spid=replace(spid,'SPA','SPH') where spbh in ('J000531','J000532','J000533','J000626','J000535','J000673')

--单据对应关系

select * from openquery ( ORACLE  , 'SELECT * FROM temp_djbh')  

select * from fr_tmp_wms_djdygx

--收货明细

truncate table fr_tmp_jh_djmx

insert into fr_tmp_jh_djmx (djbh,dj_sn,dj_sort,spid,xgdjbh,recnum,duiydjbh,duiydj_cn,shl,hshj,hsje,wkfs,ddwd,qywd,ddsj,jsshl,qysj)

select  a.shdh as djbh,a.dj_sort as dj_sn,a.dj_sort,a.spid,a.djbh_sj as xgdjbh,a.dj_sort_sj as recnum,a.djbh_rk as duiydjbh,a.dj_sort as duiydj_cn,a.sl as shl,b.hshj,b.hsje,isnull(a.wkfs,'') wkfs,a.dhwd as ddwd,'' as qywd,case when a.sf_lc=1 then CONVERT(varchar(20), a.dhsj, 24) else '' end as ddsj,0 as jsshl,case when sf_lc=1 then CONVERT(varchar(20), a.qysj, 24) else '' end qysj 

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a,jxddmx b

where a.shdh like 'JHG%' and a.djbh_sj=b.djbh and a.dj_sort_sj=b.dj_sn and a.spid=b.spid order by a.shdh

--更新拒收数量

update b set b.jsshl=a.sl from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys_js') a,fr_tmp_jh_djmx b

where a.shdh like 'JHG%' and a.shdh=b.djbh and a.dj_sort=b.dj_sn and a.spid=b.spid 

delete jh_djmx where djbh>'JHGYMA00027196' and djbh like 'JHG%'

 insert into jh_djmx

select * from fr_tmp_jh_djmx  order by djbh

 

--insert into fr_tmp_jh_djmx

 

--    select f.shdh as djbh,d.dj_sort as dj_sn,d.dj_sort,d.spid,d.cgddh as xgdjbh,d.cgdd_sort as recnum,d.djbh as duiydjbh,d.dj_sort as duiydj_cn,b.dw,'' pihao,

--  '' as baozhiqi,'' as sxrq,b.jlgg,'' as hw,d.jiansh as baozhshl,d.lingsshl as lingsshl,d.shl,a.dj,a.hshj,100 as koul,round(d.shl*a.dj,2) as je,a.shlv,round(d.shl*a.hshj,2) -round(d.shl*a.dj,2) as she,

--  round(d.shl*a.hshj,2) as hsje,0 as lshj,0 as lshje,0 as chbdj,'' as miejph,'' as beihy,0 as ydj,0 as ndj,0 as yixsl,0 as weixsl,0 as picishl,'' as songhr,'否' as zengp,'' as pici,'' as fapiaoh,0 as bukccb,0 as yhshj,

--  0 as nhshj,0 as jiansh,0 as buckcb,'' as beizhu,100 as koulv,100 as koulv1,100 as koulv2,100 as koulv3,0 as dj2,0 as je2,''  as thyy,100 as koulv4,'' as jwh,'' as yssx,'' as wkfs,'' as ddwd,'' as qywd,'' as ddsj,0 as jsshl,0 as pckhdj,

--  '' as xsbmxz,'' as qyrq,'' as qysj,0 as pcxsxj,'是' as is_zx,0 as yiwchsl,0 as quxsl  

-- from jxddmx a (nolock) join jxddhz e on a.djbh=e.djbh                                                           

--  join spkfk b (nolock) on a.spid = b.spid                                                                                        

--  join int_wms_cgrk_bill_his d (nolock) on  a.dj_sn=d.cgdd_sort and a.djbh=d.cgddh                    

--   left join huoweizl c (nolock) on d.yspd = c.huowlb 

--    left join fr_tmp_wms_djdygx f on left(shdh,3)='jhg' and f.djbh=d.djbh                                                             

-- where a.djbh like 'jhf%'  and d.yspd<>'5' 

-- order by f.shdh 

 

 

-- --冷藏明细

--update b set b.ddwd=a.dhwd,b.wkfs=a.wkfs,b.ddsj=CONVERT(varchar(20), dhsj, 24),b.qysj=CONVERT(varchar(20), a.qysj, 24) from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a left join fr_tmp_jh_djmx b on a.djbh_sj=b.xgdjbh and a.spid=b.spid and b.recnum=a.dj_sort_sj 

--where a.sf_lc=1 and a.djbh_sj like 'jhF%'  

--收货汇总

truncate table fr_tmp_jh_djhz

insert into fr_tmp_jh_djhz (djbh,djbs,djlx,bendian,rq,dwbh,kaiprq,ontime,yuansph,username,zhy)

select distinct a.shdh as djbh,'JHG' as djbs,'112' as djlx,'YMA' as bendian,CONVERT(varchar(20),a.savedate, 23) rq,a.dwid as dwbh,CONVERT(varchar(20),a.savedate, 23) kaiprq,CONVERT(varchar(20),a.savedate, 24) ontime,a.djbh_sj as yuansph,a.ry_shy as username,'进货票单' as zhy

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a

where a.shdh like 'JHG%' order by a.shdh

--insert into fr_tmp_jh_djhz

--select distinct d.djbh as djbh,'JHG' as djbs,'112' as djlx,'YMA' as bendian,'' as rq,c.dwbh,a.bezzs,'' as kaiprq,'' ontime,'' as pihao,a.bm,a.ywy,a.username,'' as leth,c.djbh as yuansph,'' as zph,'' as kpman,'否' as is_yckp,'否' yishj,'进货票单' as zhy,'' as ywbmid,'' as ywyid,'' beizhu,a.fukfs,'' fukqx,a.ydhrq,'' as jingd,a.cyfs,a.cydw,a.is_wtys,'' yssx,'' as wkfs,'' qysj,'' is_jus,'否' shenhe,'' shenhr,

--'' as shenhyj,'' shenhrq,'' as shenhe_cw,'' as shenher_cw,'' as shenheyj_cw,'' as shenherq_cw,'' fhdz,a.ywlxr,a.xszxshx,a.bmgs,a.rktype,'是' is_zx

--from jxddhz a,mchk b,int_wms_cgrk_bill_his c,(select distinct djbh,duiydjbh from fr_tmp_jh_djmx) d

--where  a.dwbh=b.dwbh  and a.djbh=c.cgddh and c.djbh=d.duiydjbh

--order by d.djbh

delete jh_djhz where djbh>'JHGYMA00027196' and djbh like 'JHG%'

 insert into jh_djhz

select * from fr_tmp_jh_djhz  order by djbh

--收货更新汇总

--update b set b.rq=CONVERT(varchar(20), a.savedate, 23),b.ontime=CONVERT(varchar(20), a.savedate, 24),b.username=a.ry_shy from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a left join fr_tmp_jh_djhz b on a.djbh_rk=b.yuansph  

--where a.sf_lc=1 and a.djbh_sj like 'jhF%'

--update b set b.rq=CONVERT(varchar(20), a.savedate, 23),b.ontime=CONVERT(varchar(20), a.savedate, 24),b.username=a.ry_shy from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a left join fr_tmp_jh_djhz b on a.djbh_rk=b.yuansph  

--where a.djbh_sj like 'jhF%'

--采退出库复核明细

truncate table fr_tmp_jzorder_mx_ysd

insert into fr_tmp_jzorder_mx_ysd (djbh,dj_sn,dj_sort,spid,pihao,baozhiqi,sxrq,shl,xgdjbh,recnum,thyy) 

select a.fudj as djbh,a.dj_sort as dj_sn,a.dj_sort,a.spid,a.ph as pihao,CONVERT(varchar(20), a.rq_sc, 23) as baozhiqi,CONVERT(varchar(20), a.yxqz, 23) as sxrq,a.sl as shl,a.djbh as xgdjbh,a.dj_sort_erp as recnum,a.thyy 

from openquery ( ORACLE  , 'SELECT * FROM v_ck_gjtc') a

where a.fudj like 'JYT%' order by a.fudj 

delete jzorder_mx_ysd where djbh>'JYTYMA00004497' and djbh like 'JYT%'

insert into jzorder_mx_ysd

select * from fr_tmp_jzorder_mx_ysd where djbh like 'JYT%' order by djbh

--采退出库复核汇总

truncate table fr_tmp_jzorder_hz_ysd

insert into fr_tmp_jzorder_hz_ysd ( djbh,djbs,djlx,bendian,rq,dwbh,yanshr,username,kaiprq,ontime,kpman,zhy,kaipiaodjbh )

select distinct a.fudj as djbh,'JYT' as djbs,'131' as djlx,'YMA' as bendian,CONVERT(varchar(20), a.rq, 23) as rq,a.dwid as dwbh,a.ry_fuhy as yanshr,a.ry_fuhy as username,CONVERT(varchar(20), a.rq, 23) as kaiprq,CONVERT(varchar(20), a.rq, 24) as ontime,a.ry_fuhy as kpman,'进货退出GSP复核' as zhy,a.djbh as kaipiaodjbh 

from openquery ( ORACLE  , 'SELECT * FROM v_ck_gjtc') a

where a.fudj like 'JYT%' order by a.fudj 

delete jzorder_hz_ysd where djbh>'JYTYMA00004497' and djbh like 'JYT%'

insert into jzorder_hz_ysd

select * from   fr_tmp_jzorder_hz_ysd where djbh like 'JYT%' order by djbh

--采购验收明细

truncate table fr_tmp_jzorder_mx_ysd

 insert into fr_tmp_jzorder_mx_ysd (djbh,dj_sn,dj_sort,spid,pihao,baozhiqi,sxrq,shl,xgdjbh,recnum,dwbh) 

 select a.ysdh as djbh,a.dj_sort as dj_sn,a.dj_sort,a.spid,a.ph pihao,CONVERT(varchar(20),a.rq_sc, 23) baozhiqi,CONVERT(varchar(20), yxqz, 23) sxrq,a.sl as shl,a.djbh_sj as xgdjbh,dj_sort_sj recnum,a.dwid as dwbh

 from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a

 where a.ysdh like 'JYD%'  order by a.ysdh 

 

 delete jzorder_mx_ysd where djbh>'JYDYMA00026766' and djbh like 'JYD%'

 insert into jzorder_mx_ysd

 select * from fr_tmp_jzorder_mx_ysd where djbh like 'JYD%' order by djbh 

--采购验收汇总

truncate table fr_tmp_jzorder_hz_ysd 

 insert into fr_tmp_jzorder_hz_ysd ( djbh,djbs,djlx,bendian,rq,dwbh,yanshr,username,kaiprq,ontime,kpman,zhy,kaipiaodjbh )

select  distinct a.ysdh as djbh,'JYD' as djbs,'130' as djlx,'YMA' as bendian,CONVERT(varchar(20), a.ysrq, 23) as rq,a.dwid as dwbh,a.ry_zjy as yanshr,a.ry_zjy as username,CONVERT(varchar(20), a.ysrq, 23) as kaiprq,CONVERT(varchar(20), a.ysrq, 24) as ontime,a.ry_zjy as kpman,'进货入库GSP验收' as zhy,a.djbh_rk as kaipiaodjbh 

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a

where a.ysdh like 'JYD%'  order by a.ysdh

delete jzorder_hz_ysd where djbh>'JYDYMA00026766' and djbh like 'JYD%'

 insert into jzorder_hz_ysd

 select * from fr_tmp_jzorder_hz_ysd where djbh like 'JYD%' order by djbh 

--销退验收明细

select top 10 * from jzorder_mx_fhd where  djbh like 'FHB%' order by djbh desc

truncate table fr_tmp_jzorder_mx_fhd 

insert into fr_tmp_jzorder_mx_fhd (djbh,dj_sn,dj_sort,spid,pihao,baozhiqi,sxrq,hw,shl,xgdjbh,duiydjbh,duiydj_cn,thyy)

select a.ysdh as djbh,a.dj_sort as dj_sn,a.dj_sort,a.spid,a.ph as pihao,CONVERT(varchar(20),a.rq_sc, 23) baozhiqi,CONVERT(varchar(20), yxqz, 23) sxrq,b.hw,a.sl as shl,a.shdh as xgdjbh,a.djbh_sj as duiydjbh,a.dj_sort_sj as duiydj_cn,b.thyy

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a,pf_djmx b

where a.ysdh like 'FHB%' and a.djbh_sj=b.djbh and a.dj_sort_sj=b.dj_sn and a.spid=b.spid order by a.ysdh

delete jzorder_mx_fhd where djbh>'FHBYMA00019481' and djbh like 'FHB%'

--需要更新xh

insert into jzorder_mx_fhd (djbh,dj_sn,dj_sort,spid,pihao,baozhiqi,sxrq,hw,shl,xgdjbh,duiydjbh,duiydj_cn,thyy)

select a.ysdh as djbh,a.dj_sort as dj_sn,a.dj_sort,a.spid,a.ph as pihao,CONVERT(varchar(20),a.rq_sc, 23) baozhiqi,CONVERT(varchar(20), yxqz, 23) sxrq,b.hw,a.sl as shl,a.shdh as xgdjbh,a.djbh_sj as duiydjbh,a.dj_sort_sj as duiydj_cn,b.thyy

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a,pf_djmx b

where a.ysdh like 'FHB%' and a.djbh_sj=b.djbh and a.dj_sort_sj=b.dj_sn and a.spid=b.spid order by a.ysdh

--select * from fr_tmp_jzorder_mx_fhd　

--销退验收汇总

truncate table fr_tmp_jzorder_hz_fhd 

insert into fr_tmp_jzorder_hz_fhd (djbh,djbs,djlx,bendian,rq,dwbh,yanshr,username,kaiprq,ontime,kpman,kaipiaodjbh)

select distinct a.ysdh as djbh,'FHB' as djbs,'233' as djlx,'YMA' as bendian,CONVERT(varchar(20),a.ysrq, 23) rq,a.dwid as dwbh,a.ry_zjy as yanshr,a.ry_zjy as username,CONVERT(varchar(20),a.ysrq, 23) kaiprq,CONVERT(varchar(20),a.ysrq, 24) ontime,a.ry_zjy as kpman,a.djbh_sj as duiydjbh

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a

where a.ysdh like 'FHB%' order by a.ysdh

delete jzorder_hz_fhd where djbh>'FHBYMA00019481' and djbh like 'FHB%'

insert into jzorder_hz_fhd

select * from fr_tmp_jzorder_hz_fhd

--销退收货明细

truncate table fr_tmp_pf_djmx 

insert into fr_tmp_pf_djmx (djbh,dj_sn,spid,dj_sort,xgdjbh,recnum,duiydjbh,duiydj_cn,pihao,baozhiqi,hw,shl,hshj,hsje,sxrq,thyy,dwbh)

 

select  a.shdh as djbh,a.dj_sort as dj_sn,a.spid,a.dj_sort,a.djbh_sj as xgdjbh,a.dj_sort_sj as recnum,a.djbh_rk as duiydjbh,a.dj_sort as duiydj_cn,a.ph as pihao,CONVERT(varchar(20),a.rq_sc, 23) baozhiqi,b.hw,a.sl as shl,b.hshj,b.hsje,CONVERT(varchar(20), yxqz, 23) sxrq,b.thyy,a.dwid as dwbh

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a,pf_djmx b

where a.shdh like 'XSS%' and a.djbh_sj=b.djbh and a.dj_sort_sj=b.dj_sn and a.spid=b.spid order by a.shdh

delete pf_djmx where djbh>'XSSYMA00019474' and djbh like 'XSS%'

insert into pf_djmx

select * from fr_tmp_pf_djmx

--销退收货汇总

truncate table fr_tmp_pf_djhz 

insert into fr_tmp_pf_djhz (djbh,djbs,djlx,bendian,rq,dwbh,kaiprq,ontime,yuansph,username,zhy)

select distinct a.shdh as djbh,'XSS' as djbs,'232' as djlx,'YMA' as bendian,CONVERT(varchar(20),a.savedate, 23) rq,a.dwid as dwbh,CONVERT(varchar(20),a.savedate, 23) kaiprq,CONVERT(varchar(20),a.savedate, 24) ontime,a.djbh_sj as yuansph,a.ry_shy as username,'销售退回收货单' as zhy

from openquery ( ORACLE  , 'SELECT * FROM v_rk_lcys') a

where a.shdh like 'XSS%'  order by a.shdh

delete pf_djhz where djbh>'XSSYMA00019474' and djbh like 'XSS%'

insert into pf_djhz

select * from fr_tmp_pf_djhz

--还原屏蔽商品

update spkfk set spid=replace(spid,'SPH','SPA') where spbh in ('J000531','J000532','J000533','J000626','J000535','J000673')

文章题目：GSP记录补充
当前网址：http://shouzuofang.com/article/jhegjd.html