基于游标技术的复杂信息发布数据库解决方案

(交通部管理干部学院计算机系，北京 101601)
摘 要：讨论了在TSQL编程环境下，如何有效的通过游标 技术，在一个存储过程中封装复杂的软件业务逻辑，并在对具体问题提出的同时，有针对性 的提出并实现解决方案。
关键词：游标；存储过程；数据库编程
中图分类号：TP311.1  文献标识码：A  文章编号：1007—6921(2008)18—0040—02
1 T-SQL游标使用

使用游标(cursor)的一个主要的原因就是把集合操作转换成单个记录处理方式。用SQL语言 从数据库中检索数据后，结果放在内存的一块区域中，且结果往往是一个含有多个记录的集 合。游标机制允许用户在SQL server内逐行地访问这些记录，按照用户自己的意愿来显示和 处理这些记录。

一般使用游标都遵循下列的常规步骤： 首先声明游标，把游标与T-SQL语句的结果集联 系起来；其次打开游标；然后使用游标操作数据；最后关闭游标。
2 用户信息发布问题提出

在《交通培训网网上办公系统》项目(为交通部2006年度西部培训项目指定研究子课题)实施 过程中，各个培训机构在执行行业部委年度培 训任务时候已经获取了项目任务书的批准，并成为该部委本年度培训执行计划的一部分。接 下来的任务是给各个省交通厅发送消息，告知具体的培训开班时间和地点。但是由于每个培 训班可能会开设多期，每期虽然内容相同但是时间地点迥异。而各个省厅收到消息后，在通 知本省行业员工参加培训时候，由于人数众多，班次复杂，往往口头通知的时候在时间和地 点上易产生差错。因此省厅希望给这些未来培训的学员随机的密码和用户名，通知他们自己 登录系统获取具体的培训资讯，而在开班后这些信息自动消失。其基本流程见图1所示。


该数据库局部模式关系是：OA_message(用户消息表)与OA_user(用户表)存 在参照完整 性联系(users_id，userf_id)，OA_jtbzxplan(交通部执行计划表)与OA_user(用户表)存在 参照完整性联系(user_id)，OA_jtbzxplan(交通部执行计划表)与OA_itemwork(培训计划任 务书表)存在参照完整性联系(plan_id)，OA_kbnotify(开班通知表)与OA_itemwork(培训计 划任务书表)存在参照完整性联系(work_id)，OA_kbnotify(开班通知表)与OA_kbqs(开班期 数表)存在参照完整性联系(kbtz_id)。

程序在执行过程中，如果培训单位发布了一条开班通知和该开班通知的期数信息(已经同通 过存储过程实现)，程序在获取插入信息成功的前提下，应该自动执行短消息发布系统，通 知各个省厅培训学员的登录密码和账号。由于培训学员仅仅关系自己想培训的项目时间地点 费用等信息，因此其登录时候系统仅需知道具体的项目任务书编号和该任务书所对应的第几 期信息就可以了。因为当培训任务书编号一旦确定，则开班的各个期项目的集合就可以为已 锁定，而这些集合中唯一不同的点就是培训时间，所以在培训学员登录报名时候，系统最终 获得项目任务书编号(登陆用户名称)和开班期数中的开班报到时间(密码)就可以唯一确定该 学员是具体哪个培训项目第几期的学员了。

问题是，由于培训单位发布的每个培训项目其培训期数都不相同，决定每条短消息所告知的 登陆用户名称和密码也完全不同，这就导致了无法通过传统的面向集合的查询方式进行数据 的显示，而必须通过动态的游标形式将数据有针对性的显示出来。
3 用户信息发布问题数据库编程方案

该复杂问题可以完全在存储过程中实现封装。该存储过程执行时刻是在程序刚刚插入一条开 班通知和该开班通知的期数信息之后，故而首先需要获取已知的外部数据接口信息为(项目 任务书编号)@work_id int和(用户编号)@user_id int。
3.1 第一步：根据这两个基本信息，就可以获得与输入的work_id有关的kbtz_id，以及与k btz_id相关联的kbqs_id。
CREATE proc OAproc_kbtz_shortmessage
@work_id int,@user_id int,@plan_code varchar(40) output
as
declare @plan_name varchar(40),@q int,@kbtz_topic varchar(120),
@short_mess varchar(5000),@kbtz_id int,@password varchar(3000),
@semi bit,@i int,@EVENTDATA VARCHAR(1024),@user_name varchar(40)
select top 1 @plan_name=plan_name,@kbtz_topic=kbtz_topic,@q=work_times,
@plan_code=oa_jtbzxplan.plan_code
from  oa_kbnotify,oa_itemwork,oa_jtbzxplan
where oa_kbnotify.work_id=oa_itemwork.work_id and       
oa_itemwork.plan_id=oa_jtbzxplan.plan_id and 
oa_kbnotify.work_id=@work_id
order by kbtz_time desc
3.2 第二步：获得与输入的work_id有关的kbtz_id；获得培训单位的名称。
select @kbtz_id=kbtz_id from oa_kbnotify where work_id=@work_id
select @user_name=user_name from oa_user
where oa_user.user_id=@user_id
3.3 第三步：获得kbtz_id相关的每一期的开班报道时间，并且形成一个字符串备用。
--首先，初始化一些变量。
set @password=""
set @semi=0
set @i=0
--接着开始定义游标
DECLARE CEVENT CURSOR FAST_FORWARD
FOR 
select cast(year(kbqs_bdtime) as varchar(4))+"-"+ cast(month(kbqs_bdtime) as var char(4))+"-"+cast(day(kbqs_bdtime) as varchar(4))
from oa_kbqs where kbtz_id=@kbtz_id
OPEN CEVENT

FETCH CEVENT INTO @EVENTDATA --获得基本日期的信息字符串
  while @@fetch_status=0
    begin       
      if @semi=1 
        begin
        set @i=@i+1
        set @password=@password+"；"+"第"+cast(@i as varchar(5))+"期开班的密码是 ："+CAST ( @EVENTDATA AS varchar(20) ) 
        insert into oa_user (user_name,user_code,user_degree) 
        values(@plan_code,CAST ( @EVENTDATA AS varchar(20) ),5)
        end
      else
        begin
          set @i=@i+1
          set @password="第"+cast(@i as varchar(5))+"期开班的密码是："+CAST ( @E VENTDATA AS varchar(20) ) 
          set @semi=1 
        insert into oa_user (user_name,user_code,user_degree) 
        values(@plan_code,CAST ( @EVENTDATA AS varchar(20) ),5)
        end
    fetch CEVENT into @EVENTDATA --游标向下移动
    end
close CEVENT
deallocate CEVENT
3.4 第四步：将以上信息进行拼接，形成短消息字符串，并嵌入标准的css格式。

set @short_mess="<p>"+@plan_name+"培训项目现在已经开班，共拟开办"+"<span class=t s>"+CAST (@q AS varchar(4)) +"</span>期。本次通知的详细内容已经在您的公告新闻中 可以查询到。<br>
<span class=ts>本次开班的用户名称是："+@plan_code+"<br>
本次开班的用户密码是："+@password+"</span><br>

收到本消息后，请尽快通知相关单位培训的同志，登陆网址：http://www.ccetnet.net.cn  进行网上报名工作。"+"再次感谢您对我们工作的支持。</p></div><div  id=lk>"+@user_n ame+"<br>"+cast(year(getdate()) as varchar(4)) +"年"+cast(month(getdate()) as va rchar(4))+"月"+cast(day(getdate()) as varchar(4))+"日</div>"insert into oa_messa ge(Users_id,Userf_id,mess_topic,mess_content)select user_id ,@user_id,@kbtz_topi c,"<div id=ch>"+user_name+"：</div><div id=nr><p>您好!</p>"+@short_mess
from oa_user
where user_degree=4
GO
［参考文献］
［1］ 项目任务书［Z］.中国交通教育培训网.
［2］ 用户需求说明书［Z］.中国交通教育培训网.
［3］ 用户说明书［Z］.中国交通教育培训网.
［4］ 软件设计说明书［Z］.中国交通教育培训网.