《PB项目管理系统实验报告》由会员分享，可在线阅读，更多相关《PB项目管理系统实验报告（11页珍藏版）》请在金锄头文库上搜索。
1、重庆邮电大学课程设计任务书学院 计算机科学与技术学院 专业_ 计算机网络技术 班级_3150801-03_指导教师 张化川 课程名 数据库应用开发 学年 2009/10 学期 第 2 学期主要内容、方法和要求1、实验目的在市场化竞争日益激烈的今天，提高工作效率和降低生产成本已成为提高企业竞争力的一个主要方面。软件行业作为新型的、知识密集型行业，开发先进的、科学的信息管理系统来管理和组织日常工作是必经之路。因此，我们要开发出一些有自己特色的、实用的管理软件。二、实验内容1、系统设计本系统实现项目管理，项目创建，项目进度管理及项目查询功能，包括 3 个子模块。1） 、项目管理对各个项目的相关信息进
2、行编辑，主要包括项目的增加、删除。 2） 、项目过程维护主要是对项目的进行状态的信息设定和维护等。3） 、系统维护对参与各项目的人员的基本信息与日常行为信息进行增加、删除、修改和查询等，以及对系统字典表等系统运行进行基础设置。系统功能模块图如图 1 所示，本系统的设计思路相对简单。数据流程图如图 2所示。图 1图 22、数据库设计1） 、用户基本库（yhb）用于记录用户的基本情况，主键为 yhbh。2） 、项目基本库（xmjbk）用于记录各个项目的基本情况，主键为 xmbh。3） 、项目相关人员设置（xgry）用于记录项目的实施情况，主键为 xmbh+yhbh。4） 、项目实施信息库（xmss
3、）用于记录项目实施情况。5） 、数据字典维护表（s_zdms）设置各组数据字典的显示字段、惟一字段、存放表单、显示字典的数据窗口等情况，主键为f_dbf。 3、数据库的实现设计数据库中各种表的结构并将其创建出来。本系统选用Microsoft SQL Server 2000作为后台数据库。在Microsoft SQL Server 2000中新建数据库project 。并且创建用户基本库（yhb） 、项目基本库（xmjbk） 、项目相关人员设置（ xgry） 、项目实施信息库（xmss） 。使用 ODB ODBC 创建数据库链接4、应用程序对象的创建创建本实例的应用对象project ，并存放在
4、预先创建好的目录下。进入应用对象画板修改其属性。应用对象的 open 事件脚本如下：应用对象的close事件脚本如下：/断开数据事务Disconnect Using SQLCA;5、全局函数和结构的定义1） 、全局函数定义字典显示功能通过自定义的全局函数f_zdcx完成。在数据录入时，将根据输入的数据与字典表的匹配，以及弹出相应的字典列表的功能，写成全局函数f_zdcx。获得各字典项的编号后，通过定义的f_zdcx_get_mc函数翻译成相应的字典名称。1. f_zdcx函数用于有字典的字段值的输入。返回string 类型数据（字典项的编号） ，有3个参数：as_tab（存放字典数据的表单名称
5、，string类型） ，as_mc（已输入的字段编号或名称，string类型） ，as_tj（数据的过滤条件，string 类型） 。2. f_zdcx_get_mc函数该函数将得到的字典项编号转换成相应字典项的名称。返回值为string类型数据（字典项的名称） ，有3个参数：as_tab（存放字典数据的表单名称，string类型） ，as_mc （已输入的字段编号或名称，string类型） ，as_tj（数据的过滤条件，string类型） 。2） 、结构定义数据字典检索数据，通过结构给数据字典列表窗口传递其字典项的条件，因而定义结构 s_zd。6、对象设计及其代码编写1） 、 系统维护子系统
6、1. 系统主窗口 w_project应用程序的主要功能是通过主窗口 w_project 调用不同的功能界面来完成的。创建 w_project 窗口，将窗口的 Title 属性设置为“项目管理系统” ，并取消ControMenu 复选框选项。通过窗口画板工具栏给窗口添加控件，并设置其相应的属性。 窗口中各控件的代码如下。位置：cb_1的clicked事件功能：打开项目管理窗口代码：/打开项目管理窗口open(w_xmgl)位置：cb_2的clicked事件功能：打开项目实施过程窗口代码：/打开项目实施过程窗口open(w_xmss)位置：cb_4的clicked事件功能：打开系统用户窗口代码：/
7、维护系统用户open(w_yhgl)位置：cb_close的clicked事件功能：退出系统代码：/退出应用程序close(parent)2. 用户管理窗口 w_yhglw_yhgl窗口用于用户信息的增加、删除、修改等。创建w_yhgl窗口，并将窗口的WindowType属性设置为Response!，通过窗口画板工具栏给窗口添加控件。dw_1 连接 d_yhgl_list 数据窗口对象，d_yhgl_list 数据窗口对象的显示风格为Grid。w_yhgl窗口及其控件的脚本如下。/连接事务DW_1.Settransobject(sqlca)/检索数据DW_1.Retrieve()位置：cb_n
8、ew的clicked事件功能：打开新增用户窗口代码：/打开新增加的用户窗口openwithparm(w_yhgl_new,new)位置：cb_del的clicked事件功能：删除用户信息代码：Long li_rowli_row=dw_1.getrow()If li_row 0 thenIf MessageBox(删除询问,真的要删除这条信息吗?,question! ,YesNo! ,2) = 1 Thendw_1.deleterow(li_row)/删除数据If dw_1.update() 0 Thencommit;/提交事务ElseRollback;/回滚事务Messagebox(错误提示,
9、无法删除！)End IFli_row = dw_1.getrow()If li_row 0 Then/得到用户编号ls_yhbh = dw_1.object.yhbhll_row/打开修改用户窗口openwithparm(w_yhgl_new,ls_yhbh)End If位置：cb_close 的 clicked 事件功能：关闭窗口代码：close(parent)3. 用户编辑窗口w_yhgl_neww_yhgl_new窗口是w_yhgl的辅助窗口，用于增加、修改用户信息。创建一个窗口w_yhgl_new，并将窗口的Window Type设置为Response!，选择Center复选框。通过窗
10、口画板工具栏给窗口添加控件，并设置其相应的属性。dw_1 连接 d_yhgl_new 数据窗口对象，d_yhgl_new 数据窗口对象的显示风格为Freefor.特殊设置如下：定义了string 类型检索参数ls_yhbh ； 编辑yhb.lx 的Edit 属性， Style Type 选择DropDownList.用户分类：4. 字典窗口w_zdcxw_zdcx窗口用于显示数据字典的项及选择相应的数据项。创建一个窗口w_zdcx，并将窗口的Window Type设置为Response!，选择Center复选框。在窗口中添加一个数据窗口控件dw_1 ，dw_1 ，从数据字典设置表 s_zdcx
11、中检索相应的数据窗口名。dw_1创建自定义事件 ue_enter，当某行记录回车时，自动将字典项的值返回到程序中，并关闭数据字典窗口。将Event ID 设为pbm_dwnkey。5. d_xmgl数据窗口d_xmgl数据窗口用于数据字典显示项目。创建一个数据窗口 d_xmgl。数据窗口对象的显示风格为Grid。6. d_yhb数据窗口d_yhb数据窗口用于数据字典显示用户。创建一个数据窗口d_yhb。数据窗口对象的显示风格为Grid。2。项目管理子系统1. 项目管理窗口w_xmglw_xmgl窗口用于创建新项目和维护已创建的项目。创建w_xmgl 窗口，并将窗口的Title属性设置为 “项目
12、管理 ”，Window Type设置为 Response!。通过窗口画板工具栏给窗口添加控件，并设置其相应属性。把数据窗口控件dw_1的VsrollBar复选框选中。 dw_1 连接 d_xmgl_list 数据窗口对象，d_xmgl_list 数据窗口对象的显示风格为Grid。dw_2 连接d_xmgl_new 数据窗口对象， d_xmgl_new数据窗口对象的显示风格为Freeform。2. w_xmmc窗口w_xmmc窗口是w_xmgl的辅助窗口。在w_xmgl 窗口中查找项目时，调用w_xmmc窗口来输入项目的名称。创建w_xmmc窗口，通过窗口画板工具栏给窗口添加控件，并设置其相应的
13、属性。 w_xmmc窗口及其控件的脚本如下。位置：sle_xmmc的modifide 事件功能：调用数据字典，读取已创建的项目代码：string bh,mcbh=trim(text)/调用数据字典函数f_zdcx（表名，项目编号，过滤条件）bh=f_zdcx(xmjbk,bh,)/根据项目编号返回项目名称mc=f_zdcx_get_mc(xmmc,xmjbk,xmbh=+bh+)This.text=mc位置：cb_ok的clicked 事件功能：关闭窗口并返回项目名称代码：string ls_xmmc/得到输入的项目名称ls_xmmc=sle_xmmc.textif ls_xmmc= or i
14、snull(ls_xmmc) thenmessagebox(系统提示, 请输入项目名称)returnend if/关闭窗口并返回项目名称closewithreturn(parent,ls_xmmc)位置：cb_close的clicked事件功能：关闭窗口不返回项目名称代码：/取消查找closewithreturn(parent,)3 项目过程维护w_xmss窗口用于编辑项目实施过程的信息，即项目的立项、分析、设计、开发、测试等过程。创建w_xmss窗口，并将窗口的Title属性设置为“项目实施” ，通过窗口画板工具栏给窗口添加控件，选中tv_1 控件的LineAtRoot复选框。 dw_1连接
15、d_xmss_list 数据窗口对象， d_xmss_list数据窗口对象的显示风格为Grid 。定义Retrieve Argument变量：ls_xmbh为string类型。定义窗口的Instance 变量，代码如下：treeviewitem itvi_currentitem在窗口的open事件中输入如下程序代码：/检索数据dw_1.settransobject(sqlca)cb_new.setfocus()四、程序总结5、合作分工情况主要参考文PowerBuilder 9 软件项目开发实践powerbuilder 数据库应用开发教程PowerBuilder.9.0.参考手册指导教师签字 _张化川_ _2010_年_5_月_10_日教学部主任/实验实训部主任签字_ _年_月_ 日备注：由指导教师填写，可另加附页。源代码下载地址http:/ 项目管理系统.rar
