毕业设计（论文）-针对小型医疗机构的门诊收费系统设计与实现.doc

皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 目 录 摘要 1 ABSTRACT 2 第一章 绪论 3 1 1 引言 3 1 2 课题背景 3 1 3 研究意义 4 1 4 研究内容 4 1 5 研究现状 4 1 6 研究目的 5 第二章 系统可行性分析 6 2 1 技术可行性分析 6 2 2 经济可行性分析 6 2 3 管理可行性分析 7 2 4 操作可行性分析 7 第三章 背景知识介绍 8 3 1 POWERBUILDER编程工具 8 3 2 ORACLE数据库介绍 8 3 3 C S 体系结构的基本简介 9 3 4 系统运行环境要求 9 第四章 系统总体设计 10 4 1 概述 10 4 2 系统总计功能 10 4 2 系统程序流程图 11 4 2 1 登录模块流程图 11 4 2 2 收费模块流程图 11 4 3 数据库概念结构设计 12 4 3 1 用户信息 E R 图 12 4 3 2 病人信息 E R 图 13 4 3 3 汉字库信息 E R 图 13 4 3 4 收费项目信息 E R 图 13 4 3 5 收费记录信息 E R 图 14 4 3 6 收费明细信息 E R 图 14 第五章 数据库的设计 15 5 1 数据库设计 15 5 2 数据表的设计 15 5 3 数据表结构设计 15 第六章 系统的详细设计与实现 17 6 1 概述 17 6 2 主界面图及主要代码 17 6 2 1 登录认证窗口的设计和实现 17 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 6 2 2 系统主界面的设计与实现 18 第七章 功能测试 28 7 1 系统调试 28 7 2 系统运行 28 结论与展望 29 参考文献 30 致谢 31 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 1 页 共 31 页 门诊收费系统的设计与实现 摘要 随着信息技术的发展以及医疗行业的规范化和高效率要求 手 工的收费流程早已满足不了现代人们的需求 昂贵的全面化医疗系 统又不太适合我国众多的小型医疗机构 建立针对性强而价格适中 的门诊收费系统很有必要 门诊收费系统是利用基于 PowerBuilder 平台的 Power Script 编程语言 辅以 C S 架构体系以及 oracle 数据库开发的系统 它以 收费管理为核心 集病人信息管理 收费项目管理以及汉字库管理 为一体完成简单收费功能 通过该系统 收费人员可以大大地提高 工作效率 不仅可以进行收费工作 还可以对病人的信息进行查询 以及维护 本文详细地描述了门诊收费系统的设计和实现过程 通过详细 的需求分析以及流程设计和界面设计 完成了一个针对小型医疗机 构设计的界面相对简单 功能相对少且价格适中的门诊收费系统 加快医疗信息化进程的同时使医院效益最大化 关键字 门诊收费系统 小型医疗机构 PowerBuilder 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 2 页 共 31 页 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 3 页 共 31 页 THE DESIGN AND IMPLEMENTATION OF OUTPATIENT SERVICE CHARGE SYSTEM ABSTRACT With the development of information technology and the standardization of the medical industry and high efficiency requirements manual charging process already can t satisfy the needs of modern people expensive health system and an all round way is not suitable for our country numerous small medical institutions establish well targeted and moderate price of outpatient service charge system is necessary Outpatient service charge system is the use of Power based on the original concept platform Script programming language supplemented by C S architecture system and oracle database development system It charges management as the core set the patient information management project management fee and charge Chinese management as a whole to do simple function Through this system charge personnel can greatly improve the work efficiency can not only for work also can query to the patient s information and maintenance This paper describes in detail the design and implementation process of outpatient service charge system through the detailed demand analysis and process design and interface design completed a design for small medical institutions interface is relatively simple function is relatively few and moderate price of outpatient service charge system In speed up the process of medical information at the same time maximize the benefit of hospital Key words Outpatient service charge system Small medical institutions PowerBuilder 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 4 页 共 31 页 第一章 绪论 1 1 引言 随着医疗改革的发展以及人民生活水平的提高 乡村医疗室以及诊所等小 型医疗机构也逐步迈向信息化 而我国医疗软件行业所生产的医疗软件产品大 多数都是针对二甲或三甲医院等大型医院所设计的 其功能模块较多 价格昂 贵 且不适用于小型医疗机构 因此 开发一套适合小型医疗机构的门诊收费 系统 不仅可以提高医院收费人员的工作效率 而且可以使我国的整体医疗信 息化水平更上一层楼 1 2 课题背景 医院信息系统在 1988 年被Morris Collen 定义为 医院信息系统就是利用计 算机和网络设备 对病人的就医流程 挂号 门诊 诊断 护理等进行全方位 的计算机管理 为医院提供就诊 财务 行政等信息的收集 存储 处理等操 作 并满足系统用户对各类信息的功能需求 门诊收费系统作为医院信息系统的一个子系统 自身有着很强的特点 医 院收费管理水平的高低很大程度上反映了医院的整体管理水平 过去医院所采 用的传统手工收费方式不仅速度慢 操作复杂 而且经常出现漏收 错收的现 象 统计核算费时费力 已经越来越不适应医院现代化管理的需要 随着改革开放步伐的加大 卫生事业的发展 我国医疗水平的提高 以及 国民就诊意识的增强 医院业务不断扩大 看病人数也日益增多 这些因素都 导致传统人工收费方式越来越不适应新形势下医疗系统的发展 医院对新的门 诊收费方式提出了迫切需求 建立医院门诊收费管理系统势在必行 信息技术的迅猛发展将人们带入了信息时代 作为各个领域业务处理和工 作管理的重要辅助工具 计算机对各行业的发展起到越来越大的推动作用 计算机的有效应用能够在很大程度上减少工作量 减轻工作负担 降低工作中 产生错误的几率 更为重要的是它能够为工作提供各种所需信息 并且能将这 些重要信息循环再利用 从而给使用单位带来了巨大的效益 由于信息化时代的来临 医院的现代化建设遇到了前所未有的动力和机遇 计算机越来越多的应用于医院的日常管理中 为医院的发展提供了前所未有的 动力 医院信息系统 HIS 已被公认为是新兴的医学信息学 Medical Information 的重要分支 HIS 的应用已经成为医院科学化 现代化管理的重 要标志 并将给医院带来可观的经济效益和显著的社会效益 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 5 页 共 31 页 1 3 研究意义 在各个乡镇医疗卫生室以及个人诊所等小型机构 医疗软件的使用已经非 常普遍 用计算机不但可以提高效率 而且还节省了许多人力和物力 增强了 数据资料的安全性 由于以下几方面的原因 意识到了建立针对小型医疗机构 的门诊收费系统的重要性和必要性 1 我国小型医疗机构的医生大多是年长者对电脑技术不太擅长 手工医疗 过程不符合医疗信息化的要求 而大多医疗软件又都功能模块全面 操作复杂 非常不适合小型医疗机构 一个简单易操作的门诊收费系统可以大大提高业务 处理量和处理效率 减轻工作人员的工作量 使医院工作人员的工作变得操作快 速 规范 高效 解决病人排长队的问题 2 我国的小型医疗机构具有数量多的特点 所以市场需求很大 针对性的 产品开发很有必要 3 还可以降低医院成本 能够找到一个价格适中而且针对小型医疗机构设 计的系统 1 4 研究内容 1 对门诊收费系统进行需求分析 结合自己本人学知识 重点分析如何有 效优化收费流程和提高工作效率 此部分内容还包括编写用例和画出用例图 2 利用软件工作思想 对以上需求进行概要分析 详细设计和实现 在概 要设计中 它包括对需求分析中提出的用例进行细化 分别画出对应的流程图 在详细设计中 编写伪代码 最后 本文给出了一个可运行的系统 1 5 研究现状 我国对医院信息化的关注和研究较国外晚 但是随着政府的不断重视 发展 的速度不断加快 并取得了一定的研究成果 随着医院信息管理系统实施的流行 和普及 一些软件开发公司也适时地为医院开发了一些 HIS 系统 但这些系统大 部分针对性不强 有的甚至为了提高软件的价格不顾需求一味的增加功能模块 致使小型医疗机构要么花大价钱买一个昂贵而功能全面的系统却只用其中一个 小模块 要么任停留在手工医疗阶段 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 6 页 共 31 页 1 6 研究目的 本系统主要用于小型医疗机构的门诊收费管理 总体任务是实现收费信息 以及病人信息关系的系统化 规范化和自动化 其主要任务是用计算机对病人 进行收费 以及对病人收费信息和病人基本信息进行日常管理 如查询 修改 增加 删除 门诊收费系统是典型的医疗软件系统 其开发主要包括后台数据库的建立 和维护以及前端应用程序的开发两个方面 对于前者要求建立起数据一致性和 完整性强 数据安全性好的库 而对于后者则要求应用程序功能完备 易使用 等特点 经过分析 我们使用PowerBuilder开发工具 利用其提供的各种面向对象的 开发工具 尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象 首先 在短时间内建立系统应用原型 然后 对初始原型系统进行需优化 不断修正 和改进 直到形成用户满意的可行系统 门诊收费系统能为小型医疗机构信息化管理的长期发展提供坚实的基础 为医院的流程管理带来极大的便捷 可以有效的管理病人的基本信息 进行信 息化的查询以及详细维护 随着信息化的建设和医疗卫生的改革 医疗软件成 为了医疗机构不可或缺的工具 我国一直提倡专业化 医疗软件的专业化也很 重要 虽然小型医疗机构的效益不多 但和人们的生命健康息息相关 也是最 贴近老百姓的机构 这么大的市场需求和需求的特殊性成为我开始此次课题的 原因 有了门诊收费系统作为小型医疗机构的收费软件 可以更好的做好医疗 机构信息化管理的建设 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 7 页 共 31 页 第二章 系统可行性分析 可行性分析 Feasibility Analysis 也称为可行性研究 是在系统调查的基础 上 针对新系统的开发是否具备必要性和可能性 对新系统的开发从技术 经 济 社会的方面进行分析和研究 以避免投资失误 保证新系统的开发成功 可行性研究的目的就是用最小的代价在尽可能短的时间内确定问题是否能够解 决 并且 可行性分析的目的不是研究如何解决问题 而是研究问题是否指的 去解 该系统的可行性分析包括以下几个方面的内容 2 1 技术可行性分析 本系统采用采用 C S 体系结构 数据库服务器使用Oracle 9i 开发工具使 用PowerBuilder 这种结构具有数据处理量大 响应迅速 安全性高等特点 PowerBuilder是一种面向对象的开发工具 在PowerBuilder中我们可以创建自 己的用户对象 特别要指出的是PowerBuilder提供了对面向对象中的各种技术的 全面支持 我们可以利用面向对象方法中的对象的封装性 继承性 多态性等 特点使得我们开发的应用程序具有极大的可重用性和可扩展性 PowerBuilder提 供了流行的大多数关系数据库的支持 由于在 PowerBuilder 的应用程序中对数 据库访问的部分一般采用国际化标准数据库查询语言 SQL 使得用PowerBuilder 开发的应用程序可以不做修改或者只做少量的修改就可以在不同的后台数据库 管理系统上使用 PowerBuilder正在成为客户 服务器应用开发的标准 相对于其他任何客户 服务器开发环境 PowerBuilder使开发人员的工作更快 成本更低 质量更高 功能更强 2 2 经济可行性分析 随着科学技术的不断发展与创新 计算机作用的日益突显 我国近年来对 医疗行业的还是比较重视的 这也就促进了医疗软件的发展 而现在许多公司 开发的医院信息系统都价格不菲 而且功能项目太多 针对于小型诊所以及乡 村卫生所等小型机构没有必要花费大价格去买一个很多功能都用不到的软件 门诊收费系统是一个功能相对简单的系统 在课题进展过程中对已经使用 的类似的系统进调查分析 类比 本课题具有的特点 开发工作量小 周期短 可以有两个人合作开发或一个人独立开发和测试 并且很快完成 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 8 页 共 31 页 2 3 管理可行性分析 管理可信性分析是指分析系统安装运行后 对原有管理体系的影响和对系 统使用人员的相关培训等 目前 我国的医疗工作人员的素质有了很大的提高 特别是收费人员都有熟练操作计算机的能力 为了确保门诊收费信息的正常运 行 医院应有相应信息科人员管理医院网络以及软件硬件方面问题 这也为门 诊收费系统的正常运行打下了坚实的基础 2 4 操作可行性分析 本系统是专门针对乡村诊所类小型医疗机构设计的 功能模块相对较少 界面友好 操作简单 对于医院收费人员经过简单的指导即可熟练掌握本系统 的所有操作流程 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 9 页 共 31 页 第三章 背景知识介绍 3 1 PowerBuilder 编程工具 PowerBuilder是一个可视化的数据库集成的开发工具 由美国公司Sybase推出 的 也是一个专业 C S 应用程序 发工具 可基于Windows和WindowsNT进行开发 它包含一个 UI 接口和 OPP 编程语言PowerScript 可提供现主流数据库接口 并通 过 ODBC 与其他数据库相连 PowerScript语言是 PowerBuilder 工具的内嵌脚本语 言 它提供的 API 接口包含数百个内部函数 并且具有一个面向对象的编译器和 调试器 可以随时编译新增加的代码 并调试结果 同时带有完整的在线帮助和编 程实例 PowerBuilder具有以下几大特点 1 多特性 可视化的开发工具 支持Win或WinNT所提供的函数 事 件和控制 PowerScript为用户提供了好几百个函数 一个可随时编译或新增 代码的调试器和编译器 还有编程实例和在线帮助 13 2 具有强大功能的面向对象技术 它可以支持可视或不可视的对象模型 并 且支持包括继承 封装 多态等面向对象编程技术 这些特性提高了软件的 高聚散 低耦合 从而提高软件可维护性 以此确保其可靠性 3 支持高效而复杂的应用程序 开发人员可用PowerBuilder中的 Watcom C C 来定义 编译 调试一个类 4 具有企业数据库连接能力 可通过Data Window对数据库中各类报 表进行操作和处理 不需要编写 SQL 语句 就可以与主流数据库 比如 Sybase SQL Server Oracle等等进行直接连接 5 具有查询 图形和报表功能 PowerBuilder所提供的多表的快速选择 界面 可视化的查询自动生成器 可生成 1 个查询对象 把反馈的查询结果作 为各种图形和图表的数据源 因此PowerBuilder非常适用于数据信息管理系 统的开发设计 尤其是 C S 的结构 3 2 oracle 数据库介绍 Oracle Database 又名Oracle RDBMS 或简称Oracle 是甲骨文公司的一款关 系数据库管理系统 到目前仍在数据库市场上占有主要份额 劳伦斯 埃里森和 他的朋友 之前的同事Bob Miner和Ed Oates在 1977 年建立了软件开发实验室咨 询公司 SDL Software Development Laboratories Oracle 是以高级结构化查询语言 SQL 为基础的大型关系数据库 版本分 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 10 页 共 31 页 为 企业版 标准版 个人版 企业版主要用于构建安全的 可靠的 大容量 的互联网应用和数据仓库 可以用包括数据分区和集群支持的组件进行功能扩 充 面向企业级应用 标准版提供了能够通过 Web 浏览器进行管理的高性能数 据库服务 面向部门级应用 个人版面向开发设计人员 与以前的版本相比 Oracle 9i 在性能 工具等方面都进行了大的改进 分别是企业管理器方面的增 强 数据库管理方面的增强 性能调整方面的增强 改变管理方面的增强和性 能诊断方面的增强 Oracle 具备以下特点 1 具备高性能 多用户的事务处理能力 2 遵 守各种工业标准 3 实施安全性控制和完整性控制 4 支持分布式数据 库和分布处理 5 具有可移植性 可兼容性和可连接性 3 3 C S 体系结构的基本简介 目前比较普遍的软件体系结构之一就是 C S Client Server 架构 即客户 机 服务器架构 客户机负责执行前台操作 服务器负责执行后台服务 一般服 务器上都有一个关系数据库管理系统 C S 体系结构必须在客户机端安装专用 的客户端软件才可以运行 客户机和服务器之间的通讯以 请求 响应 的 方式进行 客户机先向服务器发起 请求 Request 服务器再 响应 Response 这个请求 在 C S 体系结构中 所有的数据和数据库管理系统都 放在服务器端 客户机通过 SQL 语句等方式来访问服务器上的数据 因此 C S 体系结构的数据完整性和安全性大大增强 1 架构优点 1 C S 架构的界面和操作很丰富 更适应用户的需求 2 安全性能高 能够实现多层认证 3 响应速度较快 只有一层交互 2 架构缺点 1 适用面窄 适用于局域网 2 用户群固定 3 维护成本高 3 4 系统运行环境要求 为了保证系统运行的效率和可靠性 对软硬件配置有一定要求 此应用 程序运行要求如下 1 软件环境 操作系统 Windows2000 WindowsXP 者Windows98 等 数据库 Oracle 10g 数据库 Access 数据库 2 硬件环境 10GHZ 1024MB 160G 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 11 页 共 31 页 第四章 系统总体设计 4 1 概述 总体设计即概要性设计 就是对整个系统的各个功能模块有一个大概的设 计 设计出系统各个模块之间的相互联系以及设计出各个功能是如何实现的流 程情况 总体设计可以站在全局高度上 花较少成本 从中选出最佳方案和最 合理的软件结构 从而较低成本开发出较高质量的软件系统 此外 还需要对 系统的后台数据库的进行设计与实现 建立了本系统所需要的信息的数据库表 4 2 系统总计功能 1 系统具备功能 1 病人信息查询与维护功能 2 对病人进行收费以及对收费记录的添加 修改和删除功能 3 收费项目的添加 修改和删除功能 4 汉字库的查询与维护功能 2 根据实际情况把握进行系统功能设计如图 4 1 门诊收费系统 病人信息管理 收费细目管理 汉字库管理 收费项目 病人信息查询 添加 修改和 删除 对病人收费以及查询和维护 病人收费信息 收费项目的添加 修改改 删除和查询 汉字库信息查询与维护 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 12 页 共 31 页 图 4 1 系统功能图 4 2 系统程序流程图 4 2 1 登录模块流程图 登录模块 用户在登录界面输入自己的用户名和密码 若用户名和密码正 确则进入系统 否则提示密码错误 返回登录界面 登录后进行其他操作 如 图 4 2 所示 开 始 输入密码 密码识别 密码错误 密码正确 登 陆 相关操作 退 出 图 4 2 登录模块流程图 4 2 2 收费模块流程图 收费模块 用户针对某个病人进行收费 系统判断病人 id 是否符合数据库 若条件符合即进入系统连接数据库 结算以及查询收费信息 否则 返回收费 主界面 如图 4 3 所示 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 13 页 共 31 页 图 4 3 收费模块流程图 4 3 数据库概念结构设计 4 3 1 用户信息 E R 图 该图反映的是表描述用户的用户名 id 用户姓名以及用户密码的基本信息 通过yonghuid与其他数据库表连接 如图所示 Gy yonghu Yonghuid Yonghuxm yonghumm 限 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 14 页 共 31 页 图 4 4 用户信息 E R 图 4 3 2 病人信息 E R 图 该图反映的表描述了病人信息 包括病人 id 姓名 输入码 1 输入码 2 通过bingrenzyid与其他数据表连接 如图所示 图 4 5 病人信息 E R 图 4 3 3 汉字库信息 E R 图 该图反映的表是描述汉字库信息 包括 id 汉字 拼音码以及五笔码 其 中id与其他数据库表连接 如图所示 图 4 6 汉字库信息 E R 图 4 3 4 收费项目信息 E R 图 该图反映的表是收费项目信息 包括收费项目 id 收费项目名称 输入码 1 输入码 2 以及单价 通过shoufeixmid与其他数据库表实现连接 如图所示 图 4 7 收费项目信息 E R 图 Gy bingrenxx Bingrenzyid Xingming Shuruma2 Shuruma1 Gy hanziku Id Hanzi Pinyinma Gy shoufeixm Shoufeixmid Shoufeixmmc Shuruma1 Shuruma2 wubima Danjia 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 15 页 共 31 页 4 3 5 收费记录信息 E R 图 该图反映的表是收费记录信息 包括收费 id 病人 id 姓名 收费日期 通过shoufeiid与其他数据库表实现连接 如图所示 图 4 8 收费记录信息 E R 图 4 3 6 收费明细信息 E R 图 该图反映的表是收费明细信息 包括收费明细 id 收费 id 收费项目 id 数量 金额 通过shoufeimxid与其他数据库表实现连接 如图所示 图 4 9 收费明细信息 E R 图 Gy shoufeixm BingrenzyidShoufeiid Xingming Shoufeirq Mz shoufeimxid Shoufeiid Shoufeimxid Shuliang Jine Shoufeixmid 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 16 页 共 31 页 第五章 数据库的设计 5 1 数据库设计 数据库设计 Database Design 是指对于一个给定的应用环境 构造最优的数 据库模式 建数据库及其应用系统 使之能够有效地存储数据 满足各种用户 的应用需求 信息要求和处理要求 数据库的设计是一个非常重要的问题 在面向过程程序设计中 我们通常 采用 E R 图也就是实体 关系图来作为关系数据库设计的工具 E R 图看重的 是数据 在医院门诊智能化收费系统的开发过程中 选用Oracle 公司的 Oracle 关系数据库 5 2 数据表的设计 根据实际情况的需要的表很多 其主要的表分别如下 表 4 1 数据信息表 数据表名称 数据表用途 Gy yonghu用户信息 Gy bingrenxx病人信息 Gy hanziku汉字库信息 Gy shoufeixm收费项目信息 Mz shoufei1收费记录信息 Mz shoufei2收费明细信息 5 3 数据表结构设计 1 该表是用来记录用户信息的 包含用户 id 用户姓名 用户密码 表 4 2 gy yonghu 字段名含义类型长度是否可为空是否主键 Yonghuid用户idVarchar210Not是 Yonghuxm用户姓名Varchar28Null否 Yonghumm用户密码Varchar210Null否 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 17 页 共 31 页 2 该表示用来记录病人信息的 包含病人 id 病人姓名 输入码 1 输入码 2 表 4 3 gy bingrenxx 字段名含义类型长度是否可为空是否主键 Bingrenzyid病人idVarchar210Not是 Xingming姓名Varchar28Null否 Shuruma1输入码 1Varchar28Null否 Shuruma2输入码 2Varchar28Null否 3 该表用来记录汉字库信息信息 包含 id 汉字和拼音码以及五笔码 表 4 4 gy hanziku 字段名含义类型长度是否可为空是否主键 IdIdVarchar210Not是 Hanzi汉字Varchar22Null否 Pinyinma拼音码Varchar22Null否 Wubima五笔码Varchar22Null否 4 该表记录收费项目信息 包含各收费项目 id 收费项目名称 输入码 1 输入码 2 单价 表 4 5 gy shoufeixm 字段名含义类型长度是否可为空是否主键 Shoufeixmid收费项目idNumber 10 Not是 Shoufeixmmc收费项目名称Varchar2 50 Null否 Shuruma1输入码 1Varchar2 20 Null否 Shuruma2输入码 2Varchar2 20 Null否 Danjia单价Number 10 Null否 5 该表记录收费记录信息 包含收费 id 病人 id 病人姓名 收费日期 表 4 6 mz shoufei1 字段名含义类型长度是否可为空是否主键 Shoufeiid收费idNumber 10 Not是 Bingrenzyid病人idVarchar2 10 Null否 Xingming姓名Varchar2 8 Null否 Shoufeirq收费日期Date否 6 该表记录收费明细信息 包含收费明细 id 收费 id 收费项目 id 数 量 金额 表 4 7 mz shoufei2 字段名含义类型长度是否可为空是否主键 Shoufeimxid收费明细idNumber 10 Not是 Shoufeiid收费idNumber 10 Null否 Shoufeixmid收费项目idNumber 10 Null否 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 18 页 共 31 页 Shuliang数量Number 10 Null否 Jine金额Number 20 Null否 第六章 系统的详细设计与实现 6 1 概述 首先确定本系统需要实现的所有功能模块 再确定每个功能模块中需要实 现的功能 确定好各功能之间的关系 根据系统的流程用 Power Scrip 语言设 计出各功能模块界面 将其连接一起 并连接好原先设计好的后台数据库 从 而形成本系统 本部分主要是列出本系统的各个功能模块的详细设计过程以及系统的一些 功能界面的截图和主要代码 6 2 主界面图及主要代码 6 2 1 登录认证窗口的设计和实现 在进入门诊挂号收费系统之前 首先要通过登录认证窗口 首先是一个主 界面 用户可以根据自己的用户工号名以及密码登陆系统 本系统比较人性化 的一点就是显示登陆时间 当用户需要退出系统可以直接点击注销 如下图是 学生成绩管理系统的主界面 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 19 页 共 31 页 图 6 1 门诊收费系统登录界面截图 门诊收费系统登陆主界面代码 Strin ls UserId ls Pwd1 ls Pwd2 ls UserId Trim sle User Text ls Pwd1 Trim sle Pwd Text If ls UserId Then MessageBox 提示 请输入用户名 sle User SetFocus Return End If Select YongHuMm Into ls Pwd2 From Gy YongHu Where YongHuId ls UserId If SQLCA SQLCode 0 Then MessageBox 提示 无效的用户名 sle User SetFocus Return End If If IsNull ls Pwd2 Then ls Pwd2 If ls Pwd1 ls Pwd2 Then Open gy Main Close Parent Else MessageBox 提示 错误的用户名或密码 sle User SetFocus End If 6 2 2 系统主界面的设计与实现 主窗口是用户在输入正确的用户名和密码后并登录成功后 所见到的第一 个窗口 也是所有用户用户操作的主界面 这里包括了用户被允许进行的操作 根据功能界面设计管理员所授权的权限 如图所示该用户登陆后的界面 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 20 页 共 31 页 图 6 2 用户登录后的操作界面 用户在这个门诊收费系统里有三大模块 分别是收费管理模块 基础设置 模块 系统设置模块 接下来 分别介绍各个模块 1 收费管理模块 本模块主要包括 病人登记 和 门诊收费 两大部分 病人登记 主要是用来查询和维护病人信息的 门诊收费 则是对病人进行 收费退费操作的部分 包括查询和维护收费记录的功能 1 用户点击 病人登记 菜单将弹出下图 图 6 3 病人登记管理 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 21 页 共 31 页 If dw BingRenXx ModifiedCount 0 Or dw BingRenXx DeletedCount 0 Then If MessageBox 提示 数据有变动 是否保存 Question YesNo 1 1 Then cb Save Event Clicked End If End If 其中 建档 代码 Longll InsertRow ll InsertRow dw BingRenXx InsertRow 0 dw BingRenXx ScrollToRow ll InsertRow dw BingRenXx SetRow ll InsertRow dw BingRenXx SelectRow 0 False dw BingRenXx SelectRow ll InsertRow True dw BingRenXx SetColumn XINGMING dw BingRenXx Function Post SetFocus 其中 删除 代码 Stringls XingMing Longll CurrentRow ll CurrentRow dw BingRenXx GetRow If Not ll CurrentRow 0 Then MessageBox 提示 请选择需要删除的记录 Return End If ls XingMing dw BingRenXx GetItemString ll CurrentRow XINGMING If MessageBox 提示 确认要删除 ls XingMing 吗 Question YesNo 2 2 Then Return dw BingRenXx DeleteRow ll CurrentRow 其中 刷新 代码 If dw BingRenXx ModifiedCount 0 Or dw BingRenXx DeletedCount 0 Then If MessageBox 提示 数据有变动 是否保存 Question YesNo 1 1 Then cb Save Event Clicked End If End If wf Refresh 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 22 页 共 31 页 其中 保存 代码 Stringls ErrMsg Longll FindRow dw BingRenXx AcceptText ll FindRow dw BingRenXx Find Trim XINGMING Or IsNull XINGMING 1 dw BingRenXx RowCount If ll FindRow 0 Then MessageBox 提示 第 String ll FindRow 行姓名不能为空 StopSign dw BingRenXx SetRow ll FindRow dw BingRenXx SetColumn XINGMING dw BingRenXx Function Post SetFocus Return End If If dw BingRenXx Update 0 Then Commit Using SQLCA MessageBox 提示 保存成功 Parent Function wf Refresh Else ls ErrMsg SQLCA SQLErrText Rollback Using SQLCA MessageBox 提示 保存失败 ls ErrMsg StopSign End If 在本部分 用户可以新增 删除 修改等病人基本信息 2 用户点击 门诊收费 菜单将弹出如下图所示 图 6 4 门诊收费记录管理界面 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 23 页 共 31 页 其中 收费 代码 OpenWithParm gy shoufeixx1 ADD wf Refresh 其中 删除 代码 Stringls XingMing ls ErrMsg Longll CurrentRow ll ShouFeiId ll CurrentRow dw ShouFeiXx GetRow If Not ll CurrentRow 0 Then MessageBox 提示 请选择需要删除的收费记录 Return End If ll ShouFeiId dw ShouFeiXx GetItemNumber ll CurrentRow SHOUFEIID If IsNull ll ShouFeiId Or ll ShouFeiId 0 Then MessageBox 提示 无效的收费 ID 请核实 StopSign Return End If ls XingMing dw ShouFeiXx GetItemString ll CurrentRow XINGMING If MessageBox 提示 确认要删除 ls XingMing 的收费记录吗 Question YesNo 2 2 Then Return Delete From MZ SHOUFEI2 Where SHOUFEIID ll ShouFeiId If SQLCA SQLCode 0 Then ls ErrMsg SQLCA SQLErrText Rollback Using SQLCA MessageBox 提示 删除 ls XingMing 的收费记录失败 r n ls ErrMsg StopSign Return End If Delete From MZ SHOUFEI1 Where SHOUFEIID ll ShouFeiId If SQLCA SQLCode 0 Or SQLCA SQLNRows 1 Then ls ErrMsg SQLCA SQLErrText Rollback Using SQLCA MessageBox 提示 删除 ls XingMing 的收费记录失败 r n ls ErrMsg StopSign Return End If Commit Using SQLCA dw ShouFeiXx DeleteRow ll CurrentRow 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 24 页 共 31 页 MessageBox 提示 删除收费记录成功 其中 修改 代码 Longll CurrentRow ll ShouFeiId ll CurrentRow dw ShouFeiXx GetRow If Not ll CurrentRow 0 Then MessageBox 提示 请选择需要修改的收费记录 Return End If ll ShouFeiId dw ShouFeiXx GetItemNumber ll CurrentRow SHOUFEIID If IsNull ll ShouFeiId Or ll ShouFeiId 0 Then MessageBox 提示 无效的收费 ID 请核实 StopSign Return End If OpenWithParm gy shoufeixx1 String ll ShouFeiId wf Refresh 在本部分 用户可以收费 删除收费记录 修改收费记录 另外在此模块 中点击 收费 后会出现收费界面 如下图所示 图 6 5 门诊收费界面 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 25 页 共 31 页 其中 新增明细 代码 DataWindowChildldwc ShouFeiXm Longll InsertRow dw ShouFei2 GetChild SHOUFEIXMID ldwc ShouFeiXm ldwc ShouFeiXm SetTransObject SQLCA ldwc ShouFeiXm SetFilter ldwc ShouFeiXm Filter ll InsertRow dw ShouFei2 InsertRow 0 dw ShouFei2 ScrollToRow ll InsertRow dw ShouFei2 SetRow ll InsertRow dw ShouFei2 SelectRow 0 False dw ShouFei2 SelectRow ll InsertRow True dw ShouFei2 SetColumn SHOUFEIXMID dw ShouFei2 Function Post SetFocus 其中 保存 代码 Stringls ErrMsg Longll Loop ll ShouFeiId ll BingRenZyId ll ShoUFeiXmId dw ShouFei1 AcceptText If dw ShouFei1 Update 0 Then ll BingRenZyId dw ShouFei1 GetItemNumber 1 BINGRENZYID Select Max ShouFeiId Into ll ShouFeiId From Mz ShouFei1 Where BingRenZyId ll BingRenZyId If IsNull ll ShouFeiId Or ll ShouFeiId 0 Then Rollback Using SQLCA MessageBox 提示 保存收费信息失败 r n ls ErrMsg StopSign Return End If For ll Loop 1 To dw ShouFei2 RowCount dw ShouFei2 SetItem ll Loop SHOUFEIID ll ShouFeiId Next If dw ShouFei2 RowCount 0 Then ll ShouFeiXmid dw ShouFei2 GetItemNumber dw ShouFei2 RowCount SHOUFEIXMID if IsNull ll ShoUFeiXmId or ll ShouFeiXmId 0 Then dw ShouFei2 DeleteRow dw ShouFei2 RowCOunt End If 皖南医学院本科生毕业设计 论文 针对小型医疗机构的门诊收费系统的设计与实 现 第 26 页 共 31 页 dw ShouFei2 AcceptText If dw ShouFei2 Update 0 Then Commit Using SQLCA MessageBox 提示 保存