资质修改查询(经营范围转换为中文)

来源:互联网 发布:java什么是数据字典 编辑:程序博客网 时间:2024/06/09 23:21
---删除临时表
IF OBJECT_ID('tempdb..#businesscont') is not null
drop table #businesscont
---检索数据
SELECT t1.Dates,t1.OldBussName,t1.NewBussName,t1.OldAdd,
t1.NewAdd,t1.OldTel,t1.NewTel,t1.OldRegNo,t1.NewRegNo,
t1.OldRegDate,t1.NewRegDate,t1.OldCont,t1.NewCont,
t1.OldMedNo,t1.OldMedDate,t1.OldVDate,t1.NewMedNo,
t1.NewMedDate,t1.NewVDate,t1.OldPhaNo,t1.OldPhaDate,
t1.OldPhaVDate,t1.NewPhaNo,t1.NewPhaDate,t1.NewPhaVDate,
t1.OldHealthNo,t1.OldHeaDate,t1.OldHeaVDate,t1.NewHealthNo,
t1.NewHeaDate,t1.NewHeaVDate,t1.OldGSPNo,t1.OldGSPDate,
t1.OldGSPVDate,t1.NewGSPNo,t1.NewGSPDate,t1.NewGSPVDate,
t1.Summaries,t1.Remark,t2.OrgName,t3.Department,t4.StaffName,t1.BillNo
into #businesscont
FROM BusinessChange t1,OrgDoc t2,DeptDoc t3,StaffDoc t4
WHERE t1.OrgId = t2.OrgId AND t1.DeptId = t3.DeptId 
AND t1.caozy = t4.StaffId 
AND (t1.Dates between :Dates and :Dates__end) 
AND t2.OrgName like :OrgName AND t3.Department like :Department 
AND t1.OrgId='O0V4E28QYGY' 
ORDER BY t1.BillNo asc,t1.Dates asc


---游标处理经营范围
declare @BillNo int 
declare @OldCont varchar(1024)
declare @NewCont varchar(1024)
declare pcurr cursor for select billno,oldcont,newcont from #businesscont
open pcurr 
fetch next from pcurr into @BillNo,@OldCont,@NewCont
while (@@fetch_status = 0)  
begin  
update a set a.oldcont = (select [val]=stuff((
select ','+b.DICTLIST from fn_StrToTable(@OldCont) a
join DICTDOC b on a.goodsid = b.DICTVALUE
where b.FDNAME = 'GCategory'
for xml path('')),1,1,''))
,a.newCont = (select [val]=stuff((
select ','+b.DICTLIST from fn_StrToTable(@NewCont) a
join DICTDOC b on a.goodsid = b.DICTVALUE
where b.FDNAME = 'GCategory'
for xml path('')),1,1,''))
from #businesscont a
where a.billno = @BillNo
 fetch next from pcurr into @BillNo,@OldCont,@NewCont
end  
close pcurr
deallocate pcurr 
----界面显示数据
select * from #businesscont
0 0
原创粉丝点击