医药进销存系统详细设计说明书.doc

第 1 页 共 38 页 第 2 页 共 38 页2 目目目目 录录录录 第第 1 章章 引言引言.4 1.1. 编写目的.4 1.2. 参考资料.4 1.3. 定义.4 第第 2 章章 系统结构系统结构.5 2.1. 系统体系结构.5 2.2. 系统运行环境.5 2.3. 系统开发环境.5 2.4. 数据访问方式：.5 2.5. 开发辅助工具列表.5 第第 3 章章 程序系统的结构程序系统的结构.7 3.1. 目录结构：.7 3.2. 子系统结构.7 3.3. 子系统编码表：.7 第第 4 章章 权限管理权限管理.8 4.1. 数据库设计.8 4.2. 功能设计说明.8 4.3. 权限明细列表.8 第第 5 章章 报表管理报表管理.9 第第 6 章章 代码规则代码规则.10 第第 7 章章 参数管理参数管理.11 第第 8 章章 第三方控件说明第三方控件说明.12 第第 9 章章 公用接口程序设计说明公用接口程序设计说明.13 9.1. 窗体类继承关系.14 9.2. TPKForm .14 9.3. TPKMainform.15 9.4. TPKChaXForm.16 9.5. TPKChaZForm .17 9.6. TDM.18 9.7. 全局变量声明单元：uPublic .19 9.8. 常量定义单元：uConsts.19 9.9. 操作员类 (TCaoZY).19 9.10. 报表管理类类 (TRpt).22 9.11. 报表打印类 (TfrmReport).23 9.12. 公用对话框：uDialogs.24 9.13. 数据库连接参数类 TDBConn.24 第 3 页 共 38 页3 9.14. 参数类 TParams .25 9.15. 公用变量类 TPubVars .26 9.16. 标准代码类 TCodes.26 9.17. 用户登录窗体 (TfrmLogin).27 9.18. 修改密码窗体 (TfrmChangePass) .29 9.19. 选择界面风格窗体 (TfrmSkinSelect).30 9.20. 关于窗体 (TfrmAboutBox).30 9.21. 动态链接库公用函数和过程.30 9.21.1 Pankudll.DLL.30 9.21.2 PKCommon.DLL.34 第第 10 章章 附件附件.37 第 4 页 共 38 页4 第第 1 章章 引言引言 1.1. 编写目的编写目的 该说明书为系统详细设计的说明，其主要目的是： 详细定义系统整体设计框架及系统结构及设计各子系统的开发规范； 作为开发人员之间对研发产品共同认识的基础； 定义各子系统、系统接口及接口结构； 开发及维护的技术和文献依据； 作为系统验收及测试的文献依据； 本说明书作为软件公司研发人员讨论的依据和结论的记录； 本说明书同时可作为 公司软件测试及结题的参考。 1.2. 参考资料参考资料 GB/T 11457软件工程术语 GB8566-1995计算机软件开发规范 GB 8567-1995计算机软件产品开发文件编制指南 GB/T12504计算机软件质量保证计划规范 GB/T12505计算机软件配置管理计划规范 1.3. 定义定义 无 第 5 页 共 38 页5 第第 2 章章 系统结构系统结构 2.1. 系统体系结构系统体系结构 客户机/服务器模式(Client/Server) 2.2. 系统运行环境系统运行环境 数据库操作系统： Windows 2000 Server 数据库服务器：Oracle 8.17 Enterprise 客户端操作系统：Windows 2000 Professional、Windows XP Professional 2.3. 系统开发环境系统开发环境 数据库操作系统：Windows 2000 Server 数据库服务器：Oracle 8.17 Enterprise 开发工具：Delphi 7.0 开发用机操作系统：Windows XP Professional 2.4. 数据访问方式：数据访问方式： 考虑到客户机系统的安装、配置和可维护性各方面的要求，应用程序中 与数据库系统的数据访问不采用 Delphi 中的 BDE、ADO、DBExpress 来实 现，而是采用第三方控件 ODAC 5.0 来实现。(ODAC 是 Core Lab.开发的第 三方控件，采用 OCI 方式与 Oracle 进行数据访问，采用 ODAC 开发的应用 程序客户端不需要安装 Oracle 的客户端，也不需要安装 Delphi 的 BDE 等 数据引擎) 2.5. 开发辅助工具列表开发辅助工具列表 1配置管理工具：Visual SourceSafe 6.0c 2数据库设计工具：PowerDesigner 9.5 3数据库管理辅助工具：PLSQL Developer 5 4项目管理：Microsoft Project2003 5流程图绘制工具：Microsoft Visio2003 第 6 页 共 38 页6 6文档编制工具：Microsoft Office 2000(或 Microsoft Office 2003) 第 7 页 共 38 页7 第第 3 章章 程序系统的结构程序系统的结构 3.1. 目录结构：目录结构： 3.2. 子系统结构子系统结构 3.3. 子系统编码表：子系统编码表： 子系统编码表信息存储于“标准代码”数据表中，代码编号为：1101 第 8 页 共 38 页8 第第 4 章章 权限管理权限管理 系统采用系统统一权限编码的方式进行权限管理。各子系统中每一个功能 权限进行惟一编码，对用户的授权精确至每一个权限编码。同时，系统支持权 限分组管理，便于对用户进行批量授权管理。 4.1. 数据库设计数据库设计 系统数据库设计如下图所示： 权限明细 权限编号 权限名称 子系统编号 子系统名称 权限说明 VARCHAR2(4) VARCHAR2(40) CHAR(2) VARCHAR2(20) VARCHAR2(100) Pk_QuanXMX 权限分组 组编号 组名称 说明 VARCHAR2(4) VARCHAR2(40) VARCHAR2(100) Pk_QuanXFZ 操作员信息 操作员代码 操作员姓名 人员编号 密码 启用 VARCHAR2(4) VARCHAR2(20) VARCHAR2(6) VARCHAR2(20) NUMBER(1) PK_CaoZYXX 操作员权限 操作员代码 权限编号 VARCHAR2(4) VARCHAR2(4) PK_CaoZYQX 组权限明细 组编号 权限编号 VARCHAR2(4) VARCHAR2(4) Pk_ZuQXMX 操作员权限组 操作员代码 权限组编号 VARCHAR2(4) VARCHAR2(4) PK_CaoZYQXZ 4.2. 功能设计说明功能设计说明 权限管理相关功能设计说明参见文档Smart 代码管理设计说明书 4.3. 权限明细列表权限明细列表 序号序号权限编码权限编码子系统编码子系统编码子系统名称子系统名称权限名称权限名称权限描述权限描述 11 100110通用用户登录 22 100210通用修改密码 34 45 56 6 第 9 页 共 38 页9 第第 5 章章 报表管理报表管理 报表定义清单如下： 序号序号报表编码报表编码子系统编码子系统编码子系统名称子系统名称报表名称报表名称报表描述报表描述 11 1001药品购进记录 GSP 22 1002药品入库验收记录 GSP 34 1003批发销售记录 GSP 4 1004出库复核记录GSP 5 1005出库退回记录GSP 6 1006入库退货记录GSP 7 1007药品购进计划GSP 81 1008药品养护记录GSP 9 1009近效期药品催销表GSP 10 1010仓库灭鼠记录GSP 11 1011设备检修保养记录GSP 12 1012温湿度记录GSP 13 1013仓库设备目录 141 1014购进计划单 15 1015库存信息 161 1016收款工作日报 17 1017操作员收款记录 18 1018 库存盘点表 19 1101客户档案 20 1102供货商档案 21 1103药品档案 22 1104收款单 23 1105付款单 24 1201空盘点表 第 10 页 共 38 页10 25 1202药品销售统计-客户 26 1203药品销售统计-业务员 27 1204药品销售统计-品种 28 1205药品销售统计-操作员 29 1206药品流向分析 30 1207药品库存限量 31 1208药品库存报警 32 1301入库明细查询 33 1302入库退货明细查询 34 1303销售明细查询 35 1304销售退货明细查询 36 1305货位调拨明细查询 37 1306购进冲价明细查询 38 1307批号效期修改查询 39 1308出库单重打查询 40 第 11 页 共 38 页11 第第 6 章章 代码规则代码规则 代码规则用以约束系统中用到的统一代码的管理，以下简称“代码管理” 。 注意：只管理系统中基本不发生变动的代码，如：出入库类型、状态参数等等。 对于用户数据中的基础数据，例如：配棉别、品种编码等，则不属于代码管理 的范畴，属于系统基础数据，在系统基础编码维护中进行管理。 代码管理采用类 TCode 进行管理。其属性和方法如下： 代码列表如下表所示：（代码编号前两位为子系统编号，后两位为序号） 子系子系 统统 编号编号名称名称中文名称中文名称类型类型内容内容 维护维护 第 12 页 共 38 页12 第第 7 章章 参数管理参数管理 统一参数类和参数的数据管理，参数类 TParams 参见参数列表如下： 子系统子系统参数名称参数名称描述描述取值及内容取值及内容 10CaiDKZFS 菜单控制方式0:控制菜单的 Visibled 1:控制菜单的 Enabled 13 13 13 14 14 第 13 页 共 38 页13 第第 8 章章 第三方控件说明第三方控件说明 为统一系统所使用的第三方控件及其版本，减少因控件版本不一致而对系 统开发造成的影响，本系统中对第三方控件的使用作如下要求： 1. 未经允许，不得在任何模块中使用本列表以外的其它任何第三方控件。 2. 列表中的控件必须从配置管理服务器中取得，不得从网上或其它途径取 得该控件的其它版本。 3. 控件列表如下： 序号控件名称版本控件用途 1EhLib4.0用于数据一览时显示数据表格 DBGrid 2FastReport3.0用于报表打印与设计 3ODAC5.0用于与 Oracle 的数据访问 4VclSkin2.62界面控件 5KbmMemTable内存表控件 4. 控件目录：控件均位于 VSS 服务器中的 VCL 项目中。 第 14 页 共 38 页14 第第 9 章章 公用接口程序设计说明公用接口程序设计说明 系统公用程序单元如下表所示： 文件名程序模块名模块标识符特征简要说明 uPKForm窗体基类公用窗体基类 uPKMainform主窗体基类公用主窗体基类 uPKChaXForm浏览窗体基类公用各类数据查询采用该窗体 uPKChaZForm查找窗体基类公用查找各类数据时采用该窗 体 uDM数据模块公用公用数据模块 uPublic全局变量声明公用声明系统全局变量和和函 数 uConsts常量定义单元公用常量义单元 uCaoZY操作员类公用操作员类定义单元 uRpt报表管理类公用用于管理报表与数据库之 间的存取操作 uReport报表打印类公用实现报表的打印、报表格 式设计 uDialogs对话框单元公用对话框类说明 uDBConn数据库连接类公用定义数据库连接参数 uParams参数类公用定义系统参数类 uPubVars公用变量类公用定义系统全局变量 uCodes标准代码类公用定义系统标准代码类 uAboutBox关于窗体公用系统关于版权信息窗体 SkinSelect界面风格选择公用窗体界面风格选择 Login系统登录公用用于用户登录身份验证 ChangePass修改用户密码公用修改用户密码 第 15 页 共 38 页15 9.1. 窗体类继承关系窗体类继承关系 本系统中窗体类关系如下图所示： TForm TPKForm TPKMainform 继承 继承 各模块窗体 各子系统主窗体继承 TPKChaXForm 各数据浏览窗体继承 TPKChaZForm 各数据查找窗体继承 9.2. TPKForm 窗体基类，SmartERP 中所有窗体必须从该窗体继承。 用途统一系统中所有窗体的公共属性和方法 单元名 PublicUPKForm.pas 属性 名称类型描述约束 FontsTfonts 字体，统一系统窗体字体为宋 体五号字 方法 调用参数与类型 返回参数与类型 处理逻辑 方法 1 算法说明 第 16 页 共 38 页16 。 。 。 9.3. TPKMainform 主窗体基类，各个子系统中主窗体从该窗体继承。TPKMainform 继承自 TPKForm。 用途统一系统中各个子系统主窗体的公共属性和方法 单元名 PublicuPKMainForm.pas 属性 名称类型描述约束 MainMenu1TMainMenu 主窗体中主菜单控件 SkinData1TskinData 界面皮肤控件，用于界面美化 ActionManager1TactionManager 用于控制和管理该子系统中所 有 Action ToolBar1Ttoolbar 工具栏 StatusBar1TstatusBar 状态栏 方法 描述用于根据登录用户 MyCaoZY 的权限信息和系统 参数信息刷新 ActionManager1 中各个 Action 的权限，从而达到权限控制的功能 调用参数与类型 MyCaoZY 返回参数与类型无 ShowMenu 算法说明从 MyCaoZY 中取得该登录用户的权限列表，遍 历 ActionManager1 中各个 Action，将其 Tag 与 MyCaoZY.QuanX 中列表进行对比，若用户权 限中存在该权限，则根据系统参数中 DisplayMenuMode 参数禁用该 Action 或隐藏 该 Acton 描述主窗体初始化过程，用于创建初始对象 调用参数与类型 TDBConn,TDM,TCaoZY, TPubVars 返回参数与类型 Init 算法说明创建对象 MyDBConn，从配置文件中 读取数据库连接配置信息 根据连接信息创建 DM 对象，打开数 据库连接 创建用户对象 MyCaoZY，进行用户身 份验证 创建公用变量对象，并进行初始化， 获得公用变量和值，调入界面风格 描述调用系统登录窗体，进行用户身份验证 调用参数与类型 TfrmLogin Relogin 返回参数与类型 第 17 页 共 38 页17 算法说明身份验证通过，则获得操作员对象值，否则退 出系统 描述查找是否存在该类型的对象（子窗体） 调用参数与类型 FName: TClass 返回参数与类型Integer，-1:不存在，=0，找到，返回其编 号 FindChild 算法说明 描述用于创建并显示 MDI 子窗体 调用参数与类型 FName: TformClass 返回参数与类型 ShowChildForm 算法说明.如果该类子窗体已经存在，则不创建，直 接显示 .如果该类子窗体不存在，则创建，并显示。 9.4. TPKChaXForm 1.窗体设计 2.类设计 用途数据浏览窗体基类，用于统一数据浏览窗体 单元名 PublicuPKChaXForm.pas 属性 名称类型描述约束 Img_BarTimag 标题栏图片，动态从本地装入 第 18 页 共 38 页18 Toolbar1Ttoolbar 工具栏，按钮在程序设计时可 增加，其 Images 为 frmpublic 中的 ImageList QryToraQuery 数据查询控件 DataSource1TdataSource 数据源 DBGridEh1TstatusBar 数据显示控件 TB_Query 查询按钮 TB_Close 关闭 TB_Print 打印 TB_Design 设计报表 TB_Export Ttoolbutton 导出 方法 描述动态截入 Img_bar 的图片文件 调用参数与类型 返回参数与类型无 FormCreate 算法说明 描述点击导出按钮，将 DBGridEh1 中的表格数据导 出至文件中 调用参数与类型 TDBConn,TDM,TCaoZY, TPubVars 返回参数与类型 TB_ExportClick 算法说明调用 frmpublic 中的过程 ExpDBGridEh 描述设计报表过程，根据该按钮的 Tag 指定的报表 编号，打开该报表设计器 调用参数与类型 返回参数与类型 TB_DesignClick 算法说明通过创建类 TfrmReport 的对象完成该方法。 9.5. TPKChaZForm 1.窗体设计 第 19 页 共 38 页19 2.类设计 用途查找窗体基类，主要功能如下： 1.上下箭头选择及双击，回车键代码处理 2.窗体显示时指定显示位置，在 formShow 中增加代码 3.GetReturn 过程用于获得返回值 4.presearch(PYM:String):integer，用于进行预查询，返回值为查询 的记录数量如果结果为 0，则未找到记录, 1 找到一条记录 2：找到多 条记录 5.公用函数 Public DoSearch 用于调用该窗体及查询 6.该窗体不自动释放，必须在调用后进行释放。 单元名 PublicuPKChaZForm.pas 属性 名称类型描述约束 E_PinYMTedit 拼音码输入 QryToraQuery 数据查询控件 DataSource1TdataSource 数据源 DBGridEh1TstatusBar 数据显示控件 方法 描述虚函数，必须在子类中实现 调用参数与类型 PYM:String 返回参数与类型无 DoQuery 算法说明 描述调用执行查询过程，并返回执行该查询后查询 结果的记录数 调用参数与类型 PYM: String 返回参数与类型Integer：记录数 GetQueryRecord 算法说明1.1.打印查询 qry 2.2.计算 qry 结果的记录数：0:无记录 1:一 条记录 2:多条记录 描述在固定的位置显示该窗体 调用参数与类型Left, Top: integer 显示窗体坐标 返回参数与类型 ShowPosition 算法说明确定显示位置 9.6. TDM 公用数据模块类，用于数据访问。 用途用于数据访问 单元名 PublicuDM.pas 属性 名称类型描述约束 第 20 页 共 38 页20 OraSession1TOraSession 用于与数据库连接会话 DoSQLTOraQuery 用于与数据库操作 方法 调用参数与类型ConStr:TDBConn：数据库连接参数 返回参数与类型无 GetConnParams 算法说明将 ConStr 对象中的各个数据库连接参数赋值 给 OraSession1。 调用参数与类型无 返回参数与类型字符串型； 0：表示连接成功 -1: 错误提示信息 返回值为-1+Delims+ 错误提示信息 ConnDB 算法说明打开 OraSession1 的连接，调用前必须先调用 GetConnParams 过程获得连接参数 9.7. 全局变量声明单元：全局变量声明单元：uPublic 系统全局变量声明单元用于声明系统全局变量和公用动态连接库中的过程 和函数。具体含义与用途可参见单元文件中的注释说明。文件路径： PublicuPublic.pas 系统全局变量表定义如下： 序号变量名中文名类型变量说明 1MyCaoZY操作员TCaoZY 2MyPubVars全局变量类TPubVar s 3MyDBConn数据库连接 4ImageList1主窗体图标，大图标 5ImageList2各子模块中工具栏及按 钮图标，小图标 9.8. 常量定义单元：常量定义单元：uConsts 常量定义单元具体内容参见常量定义单元文件注释。文件路径：PublicuConsts.pas 第 21 页 共 38 页21 9.9. 操作员类操作员类 (TCaoZY) 用途系统操作员类 单元名 PublicuCaoZY.pas 属性 属性名称类型描述约束 CaoZYDMString 操作员代码 CaoZYMMString 操作员密码 CaoZYXMString 操作员姓名 CaoZYQXTStrings 操作员权限编号列表，组+权限 CaoZYQXMCTStrings 操作员权限名称列表，组_权限 ZuBHListTStrings 组列表，表 CaoZYQXZ 中数据 QXBHListTStrings 权限列表，表 CaoZYQX 中数据 NewZuBHListTStrings 更新组编号列表，修改时的缓 存数据 NewQXBHListTStrings 更新权限编号列表，修改时的 缓存数据， PinYMString 拼音码 QiYInteger 是否启用，：禁用：启用 方法 描述用于从数据库取得操作员数据 调用参数类型BianM:String，用户编码 方法类型 Public GetUserData 算法说明从表 CaoZYXX 中查询操作员编号为 BianM 的用户，并 将操作员信息赋与各属性域，更新属性有： CaoZYDM,CaoZYXM,CaoZYMM,PinYM,QiY 描述获得操作员权限数据 调用参数类型BianM:String，用户编码 方法类型 Public GetQuanXData 算法说明1.1.从视图 V_CaoZYQXMX 中查询操作员编号为 BianM 的用户的所有权限，权限列表赋与 CaoZYQX,CaoZYQXMC， 2.2.从 CaoZYQX 中取得权限，赋与：QXBHList 3.3.从 CaoZYQXZ 中取得权限组，赋与 ZuBHList 4.4.清空更新缓存 NewZuBHList，NewQXBHList 描述用于获得操作员列表。 方法类型 Public 调用参数类型无 返回参数类型 Tstrings GetUserList 算法说明从 CaoZYXX 表中获得所有 QiY=1 的操作员信息，并按 操作员编码排序返回列表。列表内容为 CaoZYDM:CaoZYXM UpdateUserPass 描述修改用户密码 第 22 页 共 38 页22 方法类型 Public 调用参数类型BianM 操作员编码,NewPass 新密码 String 返回参数类型String，返回0成功， -1:错误信息失败 算法说明修改 CaoZYXX 表，将 CaoZYDM 为 BianM 的记录 CaoZYMM 修改为 NewPass。 描述清空对象各属性数据 调用参数类型无 返回参数类型无 ClearUserData 算法说明 描述将对象各属性数据存入数据库 调用参数类型无 方法类型 Public SaveToDB 算法说明调用私有方法完成以下工作 1.保存 CaoZYXX 2.保存 CaoZYQXZ 3.保存 CaoZYQX 描述从数据库中删除指定用户 调用参数类型BianM:String，要删除的用户编号 返回参数类型String:0成功， -1:E.Message失败 DeleteUser 算法说明1.从 CaoZYQXZ 中删除 CaoZYDM=BianM 的记录 2.从 CaoZYQX 中删除 CaoZYDM=BianM 的记录 3.从 CaoZYXX 中删除 CaoZYDM=BianM 的记录 描述将指定的权限赋与指定的操作员， 调用参数类型BianM,QuanXBH:String 操作员代码，权限编号 返回参数类型String: 0成功,-1:E.Message失败 AddQX 算法说明1.将 BianM,QuanXBH 插入表 CaoZYQX(CaoZYDM,QuanXBH 2.该方法不提交数据，所以必须在事务中调用该方法 描述将指定的权限组赋与指定的操作员， 调用参数类型BianM,ZBH:String 操作员代码，组编号 返回参数类型String: 0成功,-1:E.Message失败 AddQXZ 算法说明1.将 BianM,ZBH 插入表 CaoZYQXZ(CaoZYDM,QuanXZ) 2.该方法不提交数据，所以必须在事务中调用该方法 描述从操作员权限表中删除指定的权限 调用参数类型BianM,QuanXBH:String 操作员代码，权限编号 返回参数类型String: 0成功,-1:E.Message失败 DeleteQX 算法说明1.从 CaoZYQX 中删除 CaoZYDM=BianM,QuanXBH=QuanXBH 2.该方法不提交数据，所以必须在事务中调用该方法 描述从操作员权限组表中删除指定的权限组 调用参数类型BianM,ZBH:String 操作员代码，组编号 DeleteQXZ 返回参数类型String: 0成功,-1:E.Message失败 第 23 页 共 38 页23 算法说明1.从 CaoZYQXZ 中删除 CaoZYDM=BianM,QuanXZ=ZBH 2.该方法不提交数据，所以必须在事务中调用该方法 描述保存操作员基本信息： CaoZYDM,CaoZYXM,RenYBH,QiY,PinYM 调用参数类型无 返回参数类型String；0成功 -1失败 SaveCZY 算法说明1.从 CaoZYXX 表中查找 CaoZYDM=CaoZYDM 的记录，未 找到则新增加，找到则修改 2.该方法不提交数据， 描述将 NewQXBHList 中的数据保存到 CaoZYQX 表中 调用参数类型 返回参数类型 SaveCZYQX 算法说明循环更新用户权限明细,对照 QXBHList 和 NewQXBHList 进行更新 1.遍历 QXBHList 中每一项，若 NewQXBHList 中不存在 则删除 DeleteQX 2.遍历 NewQXBHList 中每一项，若 QXBHList 中不存在 则增加 AddQX; 3.该函数不提交数据，必须在事务中调用 描述将 NewZuBHList 中的数据保存到 CaoZYQXZ 表中 调用参数类型 返回参数类型 SaveCZYQXZ 算法说明循环更新用户权限组,对照 ZuBHList 和 NewZuBHList 进行更新 1.遍历 ZuBHList 中每一项，若 NewZuBHList 中不存在 则删除 DeleteQXZ 2.遍历 NewZuBHList 中每一项，若 ZuBHList 中不存在 则增加 AddQXZ; 3.该函数不提交数据，必须在事务中调用 9.10. 报表管理类类报表管理类类 (TRpt) 用途报表管理类 单元名 PublicuRpt.pas 属性 属性名称类型描述约束 BianHString 报表编号 MingCString 报表名称 ShuoMString 报表说明 tmpFileNameTStrings 临时文件名 方法 ClearData 描述清空对象数据 第 24 页 共 38 页24 调用参数类型 方法类型 Public 算法说明从表 CaoZYXX 中查询操作员编号为 BianM 的用户，并 将操作员信息赋与各属性域，更新属性有： CaoZYDM,CaoZYXM,CaoZYMM,PinYM,QiY 描述从数据库中取得报表的描述信息，不含文件信息 调用参数类型BH: String：报表编号 方法类型 Public GetData 算法说明1.1.从视图 RptDef 中查询报表编号=BH 的记录 描述将本地文件的信息保存在数据库中 方法类型 Public 调用参数类型 FileName, ReportNo: String 返回参数类型 Tstrings SaveToDB 算法说明1 首先确定数据库中是否存在该记录 bianh=ReportNo 2.若存在，则修改该记录，若不存在，则新增记录。 描述从数据库中将报表定义信息取出，并保存至本地文件 中 方法类型 Public 调用参数类型FileName: 保存的本地文件名 ReportNo: 报表编号 返回参数类型String，返回0成功， -1:错误信息失败 GetFileFromDB 算法说明从表 rptdef 中取得指定编号的报表记录，将其 BOLB 信息保存至 FileName 文件中。 9.11. 报表打印类报表打印类 (TfrmReport) 用途报表打印类，采用 FastReport 控件打印输出报表和设计报表 单元名 PublicuReport.pas 属性 属性名称类型描述约束 frxReport1TfrxReport 报表打印控件 frxDesigner1TfrxDesigner 报表设计控件 ReportNoString 报表编号 Public 方法 描述打印报表设计器，设计 FrxReport1 中的报表 调用参数类型 方法类型 Public DesignReport 算法说明在调用该方法前，frxReport1 必须已经装入 其报表文件 第 25 页 共 38 页25 描述FrxDesigner1 的 SaveReport 事件，用于在设 计报表时，点击保存设计器中的报存按钮自 动将报表文件保存至数据库 调用参数类型 方法类型 Public frxDesigner1SaveReport 算法说明1.1.将 frxReport 中的信息保存至本地报表文 件 2.2.采用 TRpt 将该文件保存至数据库。 描述根据公用数据；ReportNo 的内容，从数据库 中将报表文件取出，并载入该文件至 frxReport1 控件 方法类型 Public 调用参数类型 返回参数类型 Tstrings GetRptFile 算法说明1.创建对象 TRpt 2.根据报表编号取得该报表的文件名 3. 采用 Trpt 从数据库中将报表文件取出 存入本地文件 4.将该报表文件载入控件 frxReport1 描述生成并预览报表 方法类型 Public 调用参数类型 返回参数类型 ShowReport 算法说明调用 frxReport1 的 ShowReport 方法。 9.12. 公用对话框：公用对话框：uDialogs 公用对话框函数如下： 序号函数声明说明 1MSGMessage(MyString:String) 2MSGWarning(MyString: String) 3MSGQuestion(MyString: String):Boolean 9.13. 数据库连接参数类数据库连接参数类 TDBConn 用途数据库连接参数类 单元名 PublicuDBConn.pas 属性 第 26 页 共 38 页26 属性名称类型描述约束 ServerIPString 服务器 IP ServerNameString 服务器名 PortString 端口号 SIDString 数据库 SID 名称 UserNameString 数据库用户名 PasswordString 数据库用户密码 NetBoolean 是否 Net 方式 方法 描述用于从配置文件取得参数信息 调用参数类型 返回参数类型无 GetData 算法说明 描述用于将属性数据保存于配置文件中 调用参数类型 返回参数类型无 SaveData 算法说明 9.14. 参数类参数类 TParams 用途参数类 单元名 PublicuParams.pas 属性 属性名称类型描述约束 CanSMCString 参数名称 XiTString 子系统 ValueString 参数值 ShuoMS