第一篇:信息系统规划报告
小型医院信息管理系统
(规划)系统背景意义介绍………………………………………………………………1 1.1 课题背景.............................................................1 1.2 国内外研究现状.......................................................1 1.3 本课题研究的意义.....................................................2 2 关键技术介绍.............................................................2 2.1 开发工具及运行环境...................................................2 2.1.1 总体开发工具及环境...............................................2 2.1.2 开发工具简介.....................................................2 2.2 系统需求分析.........................................................3 2.3 系统功能结构设计.....................................................3 2.4 数据库设计与实现.....................................................5 3
对现有系统的分析…………………………………………………………………………5 3.1系统的可行性研究…………………………………………………………………………… 4
小结…………………………………………………………………………………………6
1.1系统背景及意义
1.1 系统背景
随着科学的不断进步,计算机应用已经遍布整个社会的每个角落。人们的身体健康也在不断受到重视。因此,医院进行现代化管理就变得尤为重要。目前社会正处于健保发展方兴未艾的时代,各医疗院所莫不兢兢业业地改善本身的体制或管理方式,以因应健保越来越严格的规范。小型医院信息管理系统是适应时代发展的需要,提高管理的效率而开发设计的。
1.2 国内外研究现状
一个完整的医院信息管理系统应该既包括医院管理信息系统,又包括临床医疗信息系统,国外研究机构在力求实现医院信息管理系统的完整性。临床信息管理系统在数据处理的实时性要求、相应速度、安全保密等方面一般要比管理信息系统有更苛刻的要求。而医院管理信息系统的计算机技术较为单纯和简单,也由于医院管理信息系统以处理文字和数字类数据为主,较少设计声音、图象、多媒体数据的动态传递等复杂要求,实现起来容易的多。1.3 研究的意义
本系统通过对病人信息管理系统方案的设计和实施,提出一种对病人在就诊过程中产生的信息进行数字化管理的技术,为门诊建立起信息高速公路,促使医院门诊逐步形成方便、科学、合理的管理模式。从根本上改变传统的依靠文件等信息的传递方式,实现无纸化办公,简化就诊手续,加快信息流通速度,提高治疗效率,基本实现医院系统的数字化管理。同时,本系统对病人既往病史以及用药记录存档,既便于医生更加准确的对当前病人的诊断,同时也有利于医生对各种病例进行分析研究。病历模板的套餐制更具灵活性。关键技术介绍
2.1 开发工具及运行环境
2.1.1 总体开发工具及环境
本系统采用的软件开发工具及环境如下: 操作系统:WINDOWSXP 编程工具:PowerBuilder9.0 数据库:ACCESS 2.1.2 开发工具简介
PowerBuilder是一个图形化的应用程序开发环境。使用PowerBuilder开发的应用软件由窗口构成,窗口中不仅可以包含按钮、下拉列表框及单选按纽等标准的Windows控件,还可以有PowerBuilder提供的特殊控件。这些特殊控件可以使应用软件更容易使用,使应用软件的开发效率更高。
例如,数据窗口就是PowerBuilder提供的一个集成度很高的控件,使用该控件可以很方便地从数据库中提取数据,很简单地检索数据,提供图形化的数据显示方式,创建统计功能非常强大的数据统计表。由于数据窗口对数据的操作是通过事务进行的,所以对数据的操作有很强的可靠性。这些都为开发功能强大的数据库应用软件提供了可靠的保证。
商业化的软件开发要求有很好的移植性。PowerBuilder既可以跨平台开发,也可以发行跨平台软件。例如,在Windows 95下开发的程序,可以不修改源程序而形成UNIX下的执行文件或Macintosh下的执行文件。在开发小组中,不同成员可以使用不同的开发环境,但由于PowerBuilder的支持,在不同的开发环境下看到的共享PowerBuilder对象是相同的,所以仍可以同时开发同一个应用程序。
随着软件技术的不断发展,PowerBuilder 9.0及时地强化了开发功能,并提供了一些配套的开发工具,成为一种易于使用的、可伸缩的并经实践证明的快速集成开发环境。它在给用户提供一条转移到下一代平台的途径的同时,使用户仍能够保护和扩展现有的技术和应用上的投资。
2.2 系统需求分析
病人在就诊过程中,基本的业务流程如图1所示:
病人挂号医生诊断(初诊)化验检查医生诊断费用管理图1 业务流程图
通过对病人就诊流程及管理的调查和了解,初步确定了该系统的基本需求情况:
1.在病人就诊之前,必须进行挂号,包括病人的最基本信息,挂号费用,预存费等。
2.在病人进行挂号的同时,可以自动为病人分配病历号,作为病人在就诊过程中的唯一标识。
3.在病人就诊时,医生可以对病人基本信息(包括简要病史等等)进行登记。4.对病人每次就医的主诉,病历,处方进行输入,并可以进行查询和维护。5.各种化验检查信息的输入、查询和维护,并可以进行异常提醒。6.对病人的预付款进行管理,并且当预付金额不够时可以提醒补交预付款。7.对病人就诊过程中的各种费用进行管理。8.可以打印病人预付款单据和费用凭单。
9.医生可以查询病人治疗情况、化验检查结果,以便跟踪病人病情发展情况,同时也有助于医生对各种病例进行分析研究。
2.3 系统功能结构设计 本系统划分为7个功能模块,系统功能模块图如图2所示。
图2 系统功能模块
各模块如下:
1.员工管理:主要包括员工登陆,修改密码,判别用户级别功能。2.病人管理:主要包括病人的基本信息登记。
主要包括对病人基本信息的录入、查询和维护等操作。病人基本信息的录入窗口可以从就诊窗口进入,系统可以记忆当前就诊病人病历号以及当前录入员的姓名。
3.就诊管理:主要包括对病人此次就诊病情的录入,过往病史的查询及检查和化验结果进行录入。
4.模板管理:主要医生针对各种典型病种所开具的主诉、病历、处方录入、查询。
5.化验检查管理:主要包括对病人每次所做化验和检查的结果进行录入、查询和维护。
6.费用管理:主要包括预付款管理和费用管理。
预付款管理:主要包括对预付金额进行录入、查询和维护等操作。并且可以根据支出情况进行费用统计、查询余额和缺钱警示。 费用支出管理:主要包括对病人药费、检查、化验等支出进行录入、查询和维护等操作。
7.报表打印:根据需要生成各种报表,并且打印出来。
2.4 数据库设计与实现
在仔细调查医院就诊管理过程的基础上,得到系统所要处理的数据流程图,如图3所示。
挂号表病人信息表病人挂号诊断申请报告化验检查费用管理费用费用表化验检查表
图3 数据流图
本系统根据上面的设计规划出的实体有4个:病人、医生、化验检查员、药品。下面为本系统实体之间关系的E-R图,如图4所示。
图4 实体关系E-R图
对现有系统的分析
现在某医院使用的是一个传统的手工模式,它存在着很多弊端,开发新系统可以避免或减少现有系统的限制与不足。
1)现有系统采用的传统的手工方式;
2)传统的手工方式的工作量很大,譬如护士每天反复手工抄写、停止、执行、整理医嘱,记账室每天对上百号病人手工记账等等;
3)现有系统的费用开支,主要是人力、空间、支持性服务、材料等各项开支; 4)现有系统的主要问题和局限性,如处理时间缓慢、响应不及时、数据储存能力不足、处理功能不够等。
3.1 系统的可行性分析
性能、功能可行性:本系统运行稳定、重要的数据都有安全措施,系统比较经济实用,能满足大医院的要求,也很适合小医院花少量钱,本系统功能模块遍及医院各个部门,界面友好,操作方便。
价格上的可行性:我们抱着质量第一、服务第一的宗旨,在保证最基本的开发成本和利润的前提下,以最实惠的价格向用户提供满意的系统和服务。
服务上的可行性:系统设计、开发采用最先进的开发工具,能有效的保证运行后稳定、安全、可靠;系统有很详细的维护手册,维护比较方便,不需要维护大量的硬件,消耗品只有打印纸等少量物品。
系统设计界面能够很直观的看清楚,简单易用。开发这个系统带来的效益,如:
管理信息服务的改进:实现病人信息全院流通,实现网络化信息共享
实现计算机划价、收费、发药、对药和药品价格的动态管理,堵塞了药品、药费的大量流失;
数据处理的准确性和速度都能够提高;
医院管理和生产能力也会提高;
对各部门进行了制约和监督,对病人费用管理增加了透明度,解决了出院病人查费难的问题,杜绝了住院病人逃漏费的现象和医生开搭车药的问题;
提高了医院员工的素质,改善医院的管理,提高医院的知名度,从而提高医院的经济效益和社会效益。
综上所述,开发小型医院信息系统在服务、价格、功能以及性能都是可行的。4 小结
本文所介绍的小型医院信息管理系统旨在改善某小型医院的信息管理,改变医院的信息处理基本还停留在手工方式的状况,降低劳动强度,提高工作效率。本系统不仅适用于医院的行政管理业务,也适用于具体的就诊事务业务。本系统可以使医务人员空出更多的精力和时间服务于病人,同时保证病人和医院的经济利益,从而使医院能够以少的投入获得更好的社会效益与经济效益。
本系统是利用PowerBuilder并结合医院病人管理制度,严格按照软件生命周期来设计的一个信息管理系统。实现了一个包括就诊管理、模板处理、数据统计等模块在内的小型医院信息管理系统。
第二篇:信息系统规划、建设管理制度
信息系统规划、建设管理制度
第一章 总 则
第一条 为加强某某单位信息系统规划、建设阶段项目管理,规范信息系统规划、建设管理流程,及时提供满足管理和业务需求的应用系统,特制定本制度。
第二条 本制度适用于某某单位信息系统规划、建设管理工作。
第二章 职 责
第三条 某某单位办公室职责:
负责受理各处室提交的信息系统需求的申请进行审核; 负责对各处室提交的信息系统需求进行需求分析,同时需要进行安全分析,主持需求规格说明书、概要设计、演示版的审核;负责质量控制,组织信息系统验收和正式上线使用;负责软件开发过程中的整体协调工作。
负责对新建的信息系统、设备、配套设施进行监督及管理。
第三章 工作程序 第四条 提出需求:
各处室提出开发的应用软件的需求,具体包括:时间要求、功能要求、权限控制、安全要求和业务流程。
第五条
受理:
某某单位办公室在接到各处室的要求后,立即着手安排各项准备工作,制定任务计划,包括人力资源的考虑和时间要求的考虑,寻找软件开发商进行协商,向信息系统开发商提出开发要求。
第六条
需求分析:
信息系统开发商在接到开发要求后,与某某单位办公室共同进行需求分析。
第七条
需求审核:
某某单位办公室组织各处室信息系统开发商共同进行需求规格说明书的审核,信息系统开发商提供审核所需的材料和需求规格说明书,负责技术问题的解释。各处室应认真审核需求规格说书所描述的内容是否符合业务和管理要求,如果不符合要求某某单位办公室和信息系统开发商重新进行需求分析,直到审核通过为止,各处室签字认可。
第八条
概要设计:
信息系统开发商对审核通过后的需求按软件建设标准开始进行概要设计。
第九条 概要设计审核: 某某单位办公室组织需求部门对信息系统开发商的概要设计进行审核,包括:是否符合各处室提出的业务和管理要求,是否符合软件建设标准的要求,结构是否合理。审核未通过,信息系统开发商重新进行概要设计。
第十条 演示版建设:
信息系统开发商对概要设计通过后的需求进行演示版的建设,完成所有界面设计、业务流程和功能规划。
第十一条
演示版的审核:
某某单位办公室组织各处室信息系统开发商共同进行演示版的审核,业务部门要对界面、业务流程和功能划分进行确认,如未达到各处室的要求,重新进行演示版的建设,直到审核通过为止,由各处室签字认可。
第十二条 详细设计和代码编制:
信息系统开发商对演示版审核通过后的应用开始进行详细设计和代码编写,并按软件建设标准文档模版补充和完善详细设计说明书。
信息系统开发商对代码编写完的应用产品编写安装维护手册、升级安装手册、用户操作手册、测试用例报告,并进行多种方式的测试,包括:开发人员自身的测试、测试人员的测试,测试环境的测试。测试的内容不仅需要包含功能需求,也需要包含业务系统的安全需求,测试人员在测试完成后应编制测试报告,如果出现BUG或者不满足安全需求,要求填写BUG记录表,开发人员修订程序代码,直到测试完全通过。
第十三条
安装部署试运行:
某某单位办公室根据安排通知信息系统开发商开始安装部署试运行时间。由某某单位办公室组织各处室进行安装部署试运行工作,并由各处室负责用户测试工作。
第十四条
试运行审核:
某某单位办公室组织各处室试运行进行审核,审查测试用例、报告测试报告以及相关的技术文档,对程序中的关键点和安全需求按照测试用例报告进行严格测试,各处室应配合某某单位办公室对应用系统进行试用,验证系统功能是否满足业务和管理要求,如果试用过程中发现不符合业务和管理要求,应认真填写问题反馈意见。如果各处室反馈意见表明试运行不合格,某某单位办公室将要求信息系统开发商重新进行代码编写和测试,直到试运行通过。
第十五条 信息系统验收:
某某单位办公室组织各处室对信息系统开发商提交的应用系统进行验收,主要根据试运行用户测试结果和合同中规定的验收文档和其他要求进行验收工作,某某单位办公室负责严格检查技术文档,各处室负责严格检查业务操作文档,并各自出具验收报告,由某某单位办公室汇总项目验收报告后报项目领导小组。若验收不合格,由某某单位办公室 与信息系统开发商重新商定验收时间,择日进行,直到验收通过。
第十六条
系统上线:
在系统正式投产使用前,某某单位办公室负责对系统的基础架构平台进行安全检测与评估,安全检测的范围包含但不仅限于:操作系统、数据库、网络、信息系统功能隐患、结构合理性、源代码缺陷、服务能力(压力测试)。某某单位办公室确认该系统满足信息安全基线要求后,系统才可以正式的上线使用。
第十七条 记录归档:
某某单位办公室在项目结束后将所有记录根据档案管理的要求进行归档工作。
第四章
附 则
第十八条 本制度由某某单位负责解释。第十九条 本制度自发布之日起生效执行。
第三篇:公司“十二五”规划(信息系统部份)
公司“十二五”规划
(信息系统部份)
前言
十二五规划(2011-2015年)对公司的发展具有重大意义,“五年计划”是公司经济发展计划一部份,是对公司经济的发展确认航行目标与方向,如何把脉公司未来五年经济发展走向。
信息系统是由计算机硬件、网络和通讯设备、计算机软件、信息资源、信息用户和规章制度组成的以处理信息流为目的的人机一体化系统,是一个公司经营管理、发展计划重要组成部份,在公司任何部门都离不开信息系统;下面我们将信息系统分两部份规划: 电脑、网络安全管理部份:加强网络安全管理,提高公司自动化办公程度,提高信息网络安全,降低公司运营成本,充分发挥信息网络对公司发展的重大作用,以下是对公司的电脑、网络安全管理今后发展的几点构想,具体有如下设想:
一、公司电脑、电话、外设产品日常维护工作
1.主要工作仍是对个人使用电脑的软、硬件维护与基本的安全防治,尽快更深层的熟悉电脑系统,操作系统,及病毒的发展趋势,以防止和解决目前或将来要发生的各种软硬件故障,和病毒感染事故,保证办公系统的安全稳定运行。整理统计公司电脑、电话、外设产品数量及相关属性数据,以表格形式存档。
/ 7
2.办公电脑使用统一的、经过安全测试的系统及办公应用软件,安装、设置统一的杀毒软件、防火墙等安全防护软件;尽量做到统一化管理,便于快捷有效管理。
3.建立一个大型文件存储服务器,为公司后期大量的业务单据、数据、研发资料等进行实时备份;以方便办公人员共享、修改、查阅相关资料;每三个月对公司所有办公电脑资料进行数据备份,以防数据丢失带来工作上的负面影响。对于个人的关键性数据资料、邮件进行路径转移备份,使这些数据远离危险故障点,避免意外丢失;每半年做一次全公司各部门数据断电存储(光盘刻录备份,移动存储备份)等;重要数据做定期备份管理。
二、网络安全管理
1.病毒防治:了解最新病毒发展和防治的趋势,尽最大能力预防公司内部网络不会出现大规模病毒传染,发现一台及时处理,并排除可能已传播的电脑及外设存储。
2.不定期检查个人使用电脑的安全性;升级安装安全更新补丁和病毒防治软件和提醒其定期对U盘进行杀毒,尽少避免U盘传播路由器及交换机的维护管理,加强路由器、防火墙规则设置,优化外网接口,使公司外网稳定高效工作。3.征对公司目前网络运作情况进行征对性的升级和维护,以便各有效、稳定的长期运作;整理网络布局文件和相关网络设备配置记录文件,配置备份等,保证新人上岗,或其他IT
/ 7
成员对照文件即可识别作业,文件加密存储放不外传。4.集团网站建设:集团网站主要是由经营管理中心牵头,文化公司技术支持,在今后的工作主要包括(本公司网站内容维护、更新,及提供最新公司动态给集团网站建设小组以便于及时的更新集团网站本公司模块相关信息数据)。5.在公司未来业务大量拓展后,业务人员出差后需进公司办公系统工作时,升级公司路由器及主三层交换机,提供一个可靠、稳定、安全的外网办公平台。
6.根据目前网络普及情势公司后期将可能有大量网络产品生产;为提高生产线生产效率有必要实现网络信号覆盖厂区内所有角落,并自行调节网络带宽至生产车间的相关计划及设备。
三、信息网络学习、培训
1.在未来五年内尽可能多参加国家相关网络安全、数据库、信息化建设方面培训知识,不断提升自身能力,建设好信息化系统。
2.后期架设文件存储器后,制定各类与公司现有的和经后要使用到的软、硬件外设产品、网络、日常信息办公问题处理等方面知识培训,有效避免问题率、争取人人会处理基本问题,高效解决问题。
3.由各部门精英发起关于信息化相关交流学习培训,将自己在信息系统某方面特长,或日常工作中中发现快捷、高效的工
/ 7
作方式,通过交流会相互学习。
四、公司信息网络制度管理
建立和完善公司计算机、外设产品、电话系统、网络安全各项规章制度,各部门按章办事,使之成为一种良好工作习惯。信息系统集成部份:让企业实现信息化、系统化,向现代制造企业信息化建设发展;目前规划是完善OA、ERP系统SOP流程、岗位说明书,完善ERP各岗位操作手册;整理收集各岗位考核题材,对新入职ERP员工进行理论、实践、日常工作表现综合考核,对所有ERP成员定期考核;学习HR系统、MRP模块相关知识。未来5年规划目标是让企业全面进入信息系统化,以下是对信息系统集成规划:
一、OA系统与HR系统
1.更深层的熟悉OA系统,及时了解OA系统发展趋势,日益完善公司OA系统流程,充分发挥出OA系统的功能,避免现在出现的部分流程还在走纸质单据人工跑流程这样即不利于节约成本也浪费时间,实现公司科学的管理和决策,增强企业的竞争能力,保持竞争优势,使企业的发展形成良性循环;促进企业不断壮大。
2.HR系统作为公司信息化建设的主要组成部分,现由于集团 HR系统中部分模块还没有完善,正在加紧时间开发,十二五期间实现HR系统的正常运行及HR系统与ERP系统的资料共享。并努力推行HR系统、考勤系统以及餐次管理系统一体化,深化与完善企业管理。
/ 7
二、ERP系统与MRP模块
1.ERP系统下步规划完善SOP流程、岗位说明书,发放各部门后,由各部门依照流程、岗位说明制定完善各ERP岗位操作手册,统一收集确认完善成郴州华录ERP操作手册存档并发放各部门文件管理员。
2.深入学习ERP相关模块知识,充分利用好ERP系统工具,让ERP系统更好的完善内控体系,为公司减少库存积压、降低成本。
3.MRP模块学习与上线准备,MRP模块是ERP系统重要模块,我曾在09年工作总结中写到:要真正让ERP系统为企业带来经济效益,那就是尽快上MRP,网上说到MRP相关信息:(据美国生产与库存管理协会(APICS)统计,使用一个MRP II/ERP系统,能使企业库存下降30%~50%,库存投资减少1.4~1.5倍,库存周转率提高50%;延期交货减少80%,采购提前期缩短50%,停工待料减少60%,制造成本降低12%,管理水平提高,管理人员减少10%,生产能力提高10%~15%),这些数据信息告诉我们MRP能为企来带很好的经济效益;在09年我曾邮件向集团经营管理中心申请MRP上线请求,至今经营管理中心因各种因素未能应给郴州华录安排上MRP;我们ERP系统上线一年多,现各岗位操作员基本稳定熟练,SOP流程书制定为ERP系统实施定制了很好的流程体系文件,加上我们正在完善ERP操作手
/ 7
册、培训学习、岗位考核系列文件的出台,我们ERP系统已经走进稳定发展路线,我们具备MRP上线能力,我们也急切期待MRP上线。
三、企业全面进入信息系统化
我们已上系统有:
企业资源计划(Enterprise Resource Planning,简称ERP),办公自动化(Office Automation,简称OA),人力资源管理(human resource,简称HR),视觉识别系统(Visual Identity,简称VI),售饭机系统,指纹考勤系统。
这些系统推行不断在完善企业信息化,但我们还需加倍推进适用于我公司相关信息系统,以下是我们规划未来五年需推行的信息系统:
3.1网站系统:提升企业形象公司具有网络沟通能力实现电子商务功能,可以全面详细地介绍公司及公司产品,可以与客户保持密切联系,可以与潜在客户建立商业联系,可以降低通信费用,可以利用网站及时得到客户的反馈信息。3.2产品研发:主要包括有[计算机辅助设计(CAD),计算机辅助工程分析(CAE)计算机辅助工艺规划(CAPP),产品数据管理(PDM)虚拟产品开发(VPD);希望在未来5年内结合这些系统,希望研发自主创新的专利产品,同时针对目
/ 7
前产品工艺变更频繁以系统信息化来完善管理。
3.3生产制造:计算机辅助质量管理(CAQ),计算机辅助质量管理系统贯穿生产的全过程,产前、产中、产后质量管理,更好的来控制产品质量。
3.4企业商务:电子商务系统(EC),供应商关系管理(SRM),客户关系管理(CRM);希望5年内公司实现电子商务平台,有效管理供应商、客户关系。
管理部财务会计科: XXXX
二〇一〇年十一月四日
/ 7
第四篇:信息系统情况报告
信息系统安全检查的自查报告
一、自查情况
(一)安全制度落实情况
1、成立了安全小组。明确了信息安全的主管领导和具体负责管护人员,安全小组为管理机构。
2、建立了信息安全责任制。主管领导负总责,具体管理人负主责。
3、制定了计算机及网络的保密管理制度。镇网站的信息管护人员负责保密管理,密码管理,且规定严禁外泄。
(二)安全防范措施落实情况
1、涉密计算机经过了保密技术检查,并安装了防火墙。同时配置安装了专业杀毒软件,加强了在防篡改、防病毒、防攻击、防瘫痪、防泄密等方面有效性。
2、涉密计算机都由专人保管负责。同时,涉密计算机相互共享之间设有严格的身份认证和访问控制。
3、网络终端没有违规上国际互联网及其他的信息网的现象,没有安装无线网络等。
4、安装了针对移动存储设备的专业杀毒软件。
(三)应急响应机制建设情况
1、制定了初步应急预案,并随着信息化程度的深入,结合我镇实际,处于不断完善阶段。
2、坚持和涉密计算机系统定点维修单位联系机关计算机维修事宜,并商定其给予镇应急技术以最大程度的支持。
3、严格文件的收发,完善了清点、修理、编号、签收制度,并要求信息管理员每天下班前进行系统备份。
(四)信息技术产品和服务国产化情况
1、终端计算机的保密系统和防火墙、杀毒软件等,皆为国产产品。
2、公文处理软件具体使用金山软件的WPS系统。
3、工资系统、年报系统等皆为市政府、市委统一指定产品系统。
(五)安全教育培训情况
1、派专人参加了县政府组织的网络系统安全知识培训,并专门负责我镇的网络安全管理和信息安全工作。
2、组织了一次对基本的信息安全常识的学习活动。
二、自查中发现的不足和整改意见
根据《通知》中的具体要求,在自查过程中我们也发现了一些不足,同时结合我镇实际,今后要在以下几个方面进行整改。
1、安全意识不够。要继续加强对机关干部的安全意识教育,提高做好安全工作的主动性和自觉性。
2、设备维护、更新及时。要加大对线路、系统等的及时维护和保养,同时,针对信息技术的飞快发展的特点,要加大更新力度。
3、安全工作的水平还有待提高。对信息安全的管护还处于初级水平,提高安全工作的现代化水平,有利于我们进一步加强对计算机信息系统安全的防范和保密工作。
4、工作机制有待完善。创新安全工作机制,是信息工作新形势的必然要求,这有利于提高机关网络信息工作的运行效率,有利于办公秩序的进一步规范。
第五篇:会计信息系统报告
目录
一、会计信息系统课程设计概述„„„„„„„„„„„„„„„
1.1基本概述 1.2系统模块划分 1.3数据流图
1.4系统分析、设计任务的要求
二、登录界面及主菜单设计
2.1.登陆界面设计 2.2登录程序
2.3主菜单的程序设计 2.4.退出系统程序设计
三、系统基本设置
3.1数据库和数据表„„„„„„„„„„„„„„„„„„ 3.2科目代码库设计„„„„„„„„„„„„„„„„„„ 3.3摘要库设计„„„„„„„„„„„„„„„„„„„„
四、凭证处理
4.1.凭证格式设计„„„„„„„„„„„„„„„„„„„ 4.2科目代码查询
4.3凭证录入设计„„„„„„„„„„„„„„„„„„„„ 4.4凭证查询设计„„„„„„„„„„„„„„„„„„ 4.5 凭证修改设计
五、各类汇总表及账簿设计
4.1科目汇总表设计„„„„„„„„„„„„„„„„„„„
4.2总分类账设计
4.3现金日记账输出设计„„„„„„„„„„„„„„„„„„
会计信息系统
4.4银行日记账输出设计„„„„„„„„„„„„„„„
六、报表输出设计
6.1利润表输出设计„„„„„„„„„„„„„„„„„
6.2资产负债表输出设计
会计信息系统一、会计信息系统课程设计概述
1.1基本概述
根据《会计信息系统》大纲及课程开设的要求,我于2015年6月22日至6月26日参加了学院为期一周的会计信息系统课程设计实习。在实习过程中,我根据系统生命周期法,课程设计分为计划、开发、运行及维护四个阶段,我相继完成了系统分析任务、系统设计任务,从最初的系统设置,凭证格式设计、录入、处理到各类汇总表、账簿的输出。会计课程设计让我学到了很多东西,由此编制了此次会计信息系统课程设计报告。
1.2系统模块划分
账务处理系统包含六大模块:
1)系统初始设置模块:包含数据库和数据表的建立、科目代码库的建立与摘要库的建立及各账簿初始余额的输入。
2)登录设计模块:包含登陆界面的设计、相关代码设计及主菜单程序设计等。3)凭证处理模块:包含凭证格式设计、科目代码查询、凭证录入、凭证修改、凭证查询等程序设计及输出。
4)汇总表及账簿模块:包含科目汇总表设计、总分类账、现金日记账、总分类账程序设计及输出。
5)报表输出模块:包含资产负债表、利润表的程序设计及输出。
6)系统规律模块:各种系统的基本操作,如剪切、复制、窗口间切换等。
1.3数据流图:
记账凭证——凭证输入——凭证审核——日常处理——记账结账——输出账簿及报表
1.4系统分析、设计任务的要求 1.4.1系统分析任务
1.系统分析的基本任务是得到一个会计信息系统的逻辑模型。系统分析是整个
会计信息系统
系统建设的关键阶段,它阐明了各功能单位之间的相互联系,保证新系统有整体性和优良的结构,是系统设计的基础,且系统分析工作难度较大,它要求主持该项工作的人员具有熟悉计算机技术、熟悉财会业务和协调的能力。2.采用结构化系统分析方法,采用“自顶向下,逐层分解,化大为小,分而治之”的思想将系统功能由粗到细,逐步分解。3.模块划分的原则:
(1)模块涉及操作相对集中,即一个模块只模仿某一方面的功能,以提高系统的可用性;
(2)各模块相对独立,降低模块间的耦合程度,因为耦合程度越低,模块间的相互影响就越小,说明系统分解得越好;
1.4.2系统设计的要求
1.系统设计应遵循系统的可靠性,系统的实用性,系统的运行效率,系统的适用性和系统的经济效益的原则;
2.在系统处理方式上选择批处理方式,共享程度高,一致性好;
3.代码设计遵循惟一性,标准化,通用性,稳定性,可扩充性和简单性等。4
会计信息系统
二.登录界面及主菜单设计
2.1.登陆界面设计
(1)在项目中打开登陆界面示意图:
(2)登陆界面设计示意图:
2.2登录程序
会计信息系统
2.2.1表单中登录按钮command1的程序设计
(1)程序:
n=0 a=thisform.text1.value b=thisform.text2.value if a=“20124920801” and b=“789990” thisform.label13.caption=“欢迎使用本系统!” do c:会计信息系统-郑静金主菜单设计.prg else n=n+1 thisform.label13.caption=“学号错误,请重新输入!” thisform.text1.value=“" thisform.text2.value=”“ thisform.text1.setfocus if n=3 thisform.label13.caption=”对不起,您无权使用本系统!“ thisform.text1.enabled=.f.thisform.text2.enabled=.f.thisform.command1.enabled=.f.endif endif(2)运行的效果示意图:
会计信息系统
2.2.2退出按钮command2的程序设计(1)程序:
thisform.release
(2)运行效果示意图(退回到原来界面)
2.3主菜单的程序设计
2.3.1程序:
set talk off clear set sysmenu to define pad _pad1 of _msysmenu prompt ”凭证处理“ color scheme 3 define pad _pad2 of _msysmenu prompt ”账簿管理“ color scheme 3 define pad _pad3 of _msysmenu prompt ”会计报表“ color scheme 3 define pad _pad4 of _msysmenu prompt ”退出系统“ color scheme 3
会计信息系统
on pad _pad1 of _msysmenu activate popup 凭证处理 on pad _pad2 of _msysmenu activate popup 账簿管理 on pad _pad3 of _msysmenu activate popup 会计报表 on pad _pad4 of _msysmenu activate popup 退出系统
define popup 凭证处理 margin relative shadow color scheme 4 define bar 1 of 凭证处理 prompt ”科目代码查询“ define bar 2 of 凭证处理 prompt ”凭证录入“ define bar 3 of 凭证处理 prompt ”凭证修改“ define bar 4 of 凭证处理 prompt ”凭证查询“ on selection bar 1 of 凭证处理 do c:会计信息系统-郑静金科目代码查询.prg on selection bar 2 of 凭证处理 do c:会计信息系统-郑静金凭证录入.prg on selection bar 3 of 凭证处理 do c:会计信息系统-郑静金凭证修改.prg on selection bar 4 of 凭证处理 do c:会计信息系统-郑静金凭证查询.prg define popup 账簿管理 margin relative shadow color scheme 4 define bar 1 of 账簿管理 prompt ”科目汇总表“ define bar 2 of 账簿管理 prompt ”现金日记账“ define bar 3 of 账簿管理 prompt ”银行日记账“ define bar 4 of 账簿管理 prompt ”总分类账“ on selection bar 1 of 账簿管理 do c:会计信息系统-郑静金科目汇总表输出.prg on selection bar 2 of 账簿管理 do c:会计信息系统-郑静金现金日记账输出.prg on selection bar 3 of 账簿管理 do c:会计信息系统-郑静金银行日记账输出.prg on selection bar 4 of 账簿管理 do c:会计信息系统-郑静金总分类账输出.prg define popup 会计报表 margin relative shadow color scheme 4 define bar 1 of 会计报表 prompt ”资产负债表“ define bar 2 of 会计报表 prompt ”利润表“ on selection bar 1 of 会计报表 do c:会计信息系统-郑静金资产负债表输出.prg on selection bar 2 of 会计报表 do c:会计信息系统-郑静金利润表输出.prg define popup 退出系统 margin relative shadow color scheme 4 define bar 1 of 退出系统 prompt ”退出“ on selection bar 1 of 退出系统 do c:会计信息系统-郑静金退出系统设计.prg
2.3.2程序运行效果示意图:
会计信息系统
2.4.退出系统程序设计
2.4.1程序:
set talk off clear set sysmenu to default set talk on return
2.4.2运行程序的效果示意图(退出程序)
会计信息系统
三.系统基本设置
3.1数据库和数据表(完成效果图如下)
会计信息系统
3.2.科目代码库(完成效果图如下:)
会计信息系统
3.3摘要库(完成效果图如下:)
四.凭证处理4.1凭证格式设计
4.1.1程序:
set talk off clear n=13 a1=” ____________________________________________________________________“ a2=”| | | | |“ a3=”|_____________________|______________|________________|______________|“ a4=”|_____________________|______________|________________|______________|“ @12,10 say a1 12
会计信息系统
do while n<=26 @n,10 say a2 @n+1,10 say a3 n=n+2 enddo @27,10 say a2 @28,10 say a4 @7,41 say ”记账凭证“ font ”宋体“,20 @11,12 say ”凭证类别:“ @11,39 say ”日期:“ @11,58 say ”凭证号:“ @11,82 say ”附件张数:“ @13,25 say ”摘要“ @13,48 say ”会计科目“ @13,68 say ”借方金额“ @13,86 say ”贷方金额“ @27,25 say ”合计“ @29,10 say ”记账:“+space(16)+”审核:“+space(14)+”出纳:“+space(14)+”制单:“ 4.1.2程序运行效果示意图:
4.2.科目代码查询设计
会计信息系统
4.2.1程序:
set talk off a=6 clea use c:会计信息系统-郑静金科目代码库.dbf do while a=6 clea kmdm1=space(6)@9,20 say ”请输入科目代码:“get kmdm1 read locate for kmdm=kmdm1 if!found()messagebox(”代码不正确,请重新输入“)else @10,37 say kmmc endi a=messagebox(”是否继续查询下一个?“,4)enddo use set talk on return 4.2.2程序运行效果示意图:
4.3.凭证录入设计
会计信息系统
功能说明:1)具有可输入多借多贷分录的功能,并可继续输入下一张凭证。
2)含多种逻辑纠错功能,可限制凭证类型,保证输入的摘要、科目代码和金额的有效性,可检查借贷方金额是否平衡并可做相应的修改。4.3.1程序:
set talk off close all clear do while.t.do c:会计信息系统-郑静金凭证格式.prg pzlx1=space(2)fjzs1=”“ pzh1=space(3)store 0 to je1,je2,jfje1,dfje1 rq1=space(10)zy1=space(3)zy2=space(20)kmdm1=space(6)kmdm2=space(6)kmmc1=space(20)kmmc2=space(20)@11,22 get pzlx1 read do while pzlx1<>”收“.and.pzlx1<>”付“.and.pzlx1<>”转“ messagebox(”凭证类型错误,请重新输入!“)@11,22 get pzlx1 read enddo @11,44 get rq1 @11,65 get pzh1 @11,92 get fjzs1 read m=6 a=15 do while m=6 use c:会计信息系统-郑静金摘要库.dbf @a,12 get zy1 read locate for zydm=zy1 do while zydm<>zy1
会计信息系统
messagebox(”找不到符合条件的摘要,请重新输入“)@a,12 get zy1 read locate for zydm=zy1 endd zy2=zynr @a,12 say zy2 use use c:会计信息系统-郑静金科目代码库.dbf @a,48 get kmdm1 read locate for kmdm=kmdm1 do while kmdm<>kmdm1 messagebox(”输入的科目代码有误,请重新输入“)@a,48 get kmdm1 read locate for kmdm=kmdm1 endd kmmc1=kmmc @a,48 say kmmc1 @a,68 get je1 @a,86 get je2 read do while je1=0.and.je2=0 messagebox(”金额不能为零“)@a,68 get je1 @a,86 get je2 read endd use c:会计信息系统-郑静金凭证库.dbf append blank repl pzrq with rq1,pzh with pzh1,pzlx with pzlx1,zy with zy2,kmdm with kmdm1,kmmc with kmmc1,jfje with je1,dfje with je2 use m=messagebox(”是否输入下一行分录“,4)a=a+2 enddo use c:会计信息系统-郑静金凭证库.dbf sum jfje to jfje1 for pzh=pzh1 sum dfje to dfje1 for pzh=pzh1 @27,68 say jfje1 @27,86 say dfje1 do while jfje1<>dfje1 16
会计信息系统
messagebox(”借贷不平衡,输入金额有误“)do c:会计信息系统-郑静金凭证修改 endd use xz=”“ @32,25 say ”是否输入下一张(y/n)“ get xz read if xz=”y“ or xz=”Y“ loop else exit endi endd use c:会计信息系统-郑静金凭证库.dbf display use set talk on return
4.3.2运行效果示意图:
1)当输入完一行分录时的示意图:
会计信息系统
2)当输入完一笔业务时可继续输入下一张的示意图:
3)当输入多借多贷的分录时的完成示意图:
会计信息系统
4)运行时借贷方金额不相等情况下的示意图
会计信息系统
5)待25笔凭证按上述步骤录入完成之后,打开数据库中的凭证库,显示如下:
会计信息系统
4.4.凭证查询设计
4.4.1程序:
set talk off clear use c:会计信息系统-郑静金凭证库.dbf pzrq1=space(10)pzh1=space(4)pzlx1=space(2)@4,4 say ”请输入凭证日期:“ get pzrq1 @6,4 say ”请输入凭证号码:“ get pzh1 @8,4 say ”请输入凭证类型:“ get pzlx1 Read locate for pzrq=pzrq1 and pzh=pzh1 and pzlx=pzlx1 if found()=.t.disp skip
会计信息系统
disp else messagebox(”查询不到符合条件的凭证“)endi set talk on return
4.4.2程序运行效果示意图
1)当查询到相应凭证时的运行效果示意图
2)当输入的凭证查询不到时的运行效果示意图:
会计信息系统
4.5.凭证修改设计
4.5.1程序:
set talk off clear use c:会计信息系统-郑静金凭证库.dbf pzrq1=space(10)pzh1=space(3)@2,4 say ”请输入凭证日期:“ get pzrq1 @4,4 say ”请输入凭证号: “ get pzh1 Read locate for allt(pzrq)=allt(pzrq1)and allt(pzh)=allt(pzh1)if found()disp edit else messagebox(”没有找到符合条件的凭证“)endif set talk on return 4.5.2运行程序的效果示意图:
会计信息系统
1)当输入要查询的凭证时的界面示意图:
2)对查询到的凭证进行修改时的界面示意图:
会计信息系统
五.各类汇总表与账簿设计
5.1科目汇总表设计
5.1.1程序:
set talk off clear store 0 to jfje1,dfje1,ye select 1 use c:会计信息系统-郑静金凭证库.dbf select 2 use c:会计信息系统-郑静金科目汇总表.dbf @1,60 say ”科目汇总表“ font ”宋体“,14 go top do while!eof()kmdm1=kmdm select 1 sum jfje to jfje1 for kmdm=kmdm1 sum dfje to dfje1 for kmdm=kmdm1 select 2 replace bqjf with jfje1,bqdf with dfje1 skip enddo display a1=0 b1=0 sum bqjf to a1 sum bqdf to b1 locate for kmmc=”合计“ replace bqjf with a1,bqdf with b1 list if bqjf=bqdf messagebox(”太棒了,恭喜您,试算平衡!“)else messagebox(”试算不平衡,请您仔细检查!“)endi use select 1 use select 2 set talk on
会计信息系统
return
5.1.2运行程序时的效果示意图:
5.2.总分类账输出设计
5.2.1程序:
会计信息系统
set talk off clear kmdm1=space(4)kmmc1=space(10)bqjf1=0 bqdf1=0 select 1 use c:会计信息系统-郑静金科目汇总表.dbf select 2 use c:会计信息系统-郑静金总分类账.dbf go top do while!eof()kmdm1=kmdm select 1 locate for kmdm=kmdm1 if found()=.t.kmmc1=kmmc bqjf1=bqjf bqdf1=bqdf endi select 2 @1,60 say ”总分类账“ font ”宋体“,14 ye1=qcjf+bqjf1-qcdf-bqdf1 do case ye1 case ye1>0 replace kmmc with kmmc1,bqjf with bqjf1,bqdf with bqdf1,fx with ”借“, ye with ye1 case ye1<0 replace kmmc with kmmc1,bqjf with bqjf1,bqdf with bqdf1,fx with ”贷“, ye with ye1*(-1)case ye1=0 replace kmmc with kmmc1,bqjf with bqjf1,bqdf with bqdf1,fx with ”平“, ye with ye1 endcase skip enddo list j1=0 d1=0 sum bqjf to j1 sum bqdf to d1 replace kmmc with ”合计“ bqjf with j1,bqdf with d1 display use select 1
会计信息系统
use select 2 set talk on return
5.2.2程序运行的效果示意图
5.3现金日记账输出程序设计
5.3.1程序:
set talk off clea stor 0 to jfje1,dfje1,ye1 rq1=space(10)pzh1=space(3)28
会计信息系统
zy1=space(20)sele 1 Use c :会计信息系统-郑静金凭证库.dbf sele 2 use c:会计信息系统-郑静金现金日记账.dbf sele 1 do while!eof()if substr(kmdm,1,4)=”1001“ rq1=pzrq pzh1=pzh jfje1=jfje dfje1=dfje zy1=zy sele 2 ye1=ye skip delete rest pack append blank repl rq with rq1,pzh with pzh1,zy with zy1,sr with jfje1,zc with dfje1,ye with ye1+jfje1-dfje1 endi sele 1 skip endd use sele 2 zsr=0 zzc=0 store 0 to zsr,zzc sum sr to zsr sum zc to zzc appe blan repl rq with ”2014/04/30“,zy with ”本月小计“,sr with zsr,zc with zzc,ye with ye1+jfje1-dfje1 @1,48 say ”现金日记账“ font ”宋体“,14 list use set talk on return
5.3.2程序运行的效果示意图
会计信息系统
5.4银行日记账输出程序设计
5.4.1程序:
set talk off clea stor 0 to jfje1,dfje,ye1 rq1=space(10)pzh1=space(3)use sele 1 use c:会计信息系统-郑静金凭证库.dbf sele 2 use c:会计信息系统-郑静金银行日记账.dbf sele 1 do while!eof()if subs(kmdm,1,4)=”1002“ rq1=pzrq pzh1=pzh jfje1=jfje dfje1=dfje zy1=zy sele 2 ye1=ye skip dele rest 30
会计信息系统
pack appe blan repl rq with rq1,pzh with pzh1,zy with zy1,jfje with jfje1,dfje with dfje1,ye with ye1+jfje1-dfje1 endi sele 1 skip endd use sele 2 a=0 b=0 sum jfje to a sum dfje to b appe blan repl rq with ”2014/04/30“,zy with ”本月小计“,jfje with a,dfje with b,ye with ye1+jfje1-dfje1 @1,48 say ”银行日记账“ font ”宋体“,14 list use set talk on return
5.4.2程序运行的效果示意图
会计信息系统
六、报表输出设计
6.1利润表输出设计
6.1.1程序:
set talk off clear store 0 to bqdf1,bqdf2,bqdf3,bqdf4,bqdf5,bqdf6,bqdf7,a1,a2,a3,a4 select 1 use c:会计信息系统-郑静金科目汇总表 select 2 use c:会计信息系统-郑静金利润表 select 1 do while!eof()if kmdm=”6001“ bqdf1=bqdf skip bqdf2=bqdf skip bqdf3=bqdf skip bqdf4=bqdf skip bqdf5=bqdf skip bqdf6=bqdf skip bqdf7=bqdf a1=bqdf1-bqdf3 a2=a1+bqdf2-bqdf4-bqdf5-bqdf6-bqdf7 a3=a2 a4=a3 select 2 replace bqje with bqdf1 for hc=”1“ replace bqje with bqdf3 for hc=”2“ replace bqje with a1 for hc=”4“ replace bqje with bqdf2 for hc=”5“ replace bqje with bqdf4 for hc=”7“ replace bqje with bqdf6 for hc=”8“ replace bqje with bqdf7 for hc=”9“ 32
会计信息系统
replace bqje with bqdf5 for hc=”10“ replace bqje with a2 for hc=”11“ replace bqje with 0 for hc=”12“ replace bqje with 0 for hc=”13“ replace bqje with a3 for hc=”14“ replace bqje with 0 for hc=”15“ replace bqje with a4 for hc=”16“ @1,60 say ”利润表“ font ”宋体“,14 list exit else skip endi endd use select 1 set talk on return
6.1.2程序的运行效果示意图
会计信息系统
6.2.资产负债表输出设计
6.2.1程序:
set talk off clear store 0 to a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17 store 0 to b0,b1,b2,b3,b4,b5,b6,b7,b8,b9,b10 select 1 use c:会计信息系统-郑静金总分类账 select 2 use c:会计信息系统-郑静金资产负债表 select 3 select 1 do while!eof()if kmdm=”1001“ a1=ye skip a2=ye skip a3=ye skip a4=ye skip a5=ye skip a6=ye skip a7=ye skip a8=ye skip a9=ye skip a10=ye skip a11=ye skip a12=ye skip a13=ye skip a14=ye 34
会计信息系统
skip a15=ye skip a16=ye skip a17=ye else skip endi endd b0=a1+a2 b1=a5+a6+a7+a17 b2=b0+b1+a3+a4+0 b3=a8-a9 b4=b2+b3 b5=a10+a11+a12+a13 b6=a14+a16 b7=b5+b6 select 2 sum qcye2 to b8 for hc2=”2“ b9=b8+b5 b10=b9+b6 repla qmye1 with b0 for hc1=”2“ repla qmye1 with a3 for hc1=”3“ repla qmye1 with a4 for hc1=”4“ repla qmye1 with b1 for hc1=”5“ repla qmye1 with 0 for hc1=”6“ repla qmye1 with b2 for hc1=”7“ repla qmye1 with a8 for hc1=”9“ repla qmye1 with a9 for hc1=”10“ repla qmye1 with b3 for hc1=”11“ repla qmye1 with b3 for hc1=”12“ repla qmye1 with b4 for hc1=”17“ repla qmye2 with b8 for hc2=”2“ repla qmye2 with a10 for hc2=”3“ repla qmye2 with a11 for hc2=”4“ repla qmye2 with a12 for hc2=”5“ repla qmye2 with a13 for hc2=”6“ repla qmye2 with b9 for hc2=”7“ repla qmye2 with 0 for hc2=”9“ repla qmye2 with 0 for hc2=”10“ repla qmye2 with b9 for hc2=”11“ repla qmye2 with a14 for hc2=”13“
会计信息系统
repla qmye2 with 0 for hc2=”14“ repla qmye2 with a16 for hc2=”15“ repla qmye2 with b6 for hc2=”16“ repla qmye2 with b10 for hc2=”17“ list if b4=b10 messagebox(”资产负债表平衡!请退出!“)else messagebox(”资产负债表不平衡!请检查“)endif use select 1 use select 2 @1,60 say ”资产负债表“ font ”宋体",14 use set talk on return
6.2.2程序运行的效果示意图:
会计信息系统