票据管理系统.doc

本科毕业论文（设计）模板电子商务系统分析与设计20112012学年第1学期大作业题目： 中小型企业票据管理系统 学生姓名： 学 号： 专 业： 班 级： 完成日期： 2011 年 12 月 28日中小型企业票据管理系统摘 要中小型企业财务工作中对涉及到的各类票据报销单、记帐凭证、现金支票以及进帐单等对象管理工作时复杂、繁琐和沉重的。传统的财务人员往往采用手工票据管理的方式来整理这些票据，不仅工作效率低下、而且常常发生票据遗失、录入数据错误和更改繁琐的现实情况。本文针对中小型企业日常财务报销工作中涉及到的各类票据报销单、记帐凭证、现金支票以及进帐单等对象管理工作的复杂和繁琐的现实，设计开发了一套科学合理的票据管理系统。票据管理系统能够高效的、准确的完成这些繁重的票据管理工作，极大地方便了财务人员对票据的管理工作，因此开发一个适合中小型企业使用的票据管理系统是一个非常有实际意义的工作。此管理系统的设计开发使用Delphi开发的基于Access数据库，方便实用，目适合一些中小型企业的财务票据管理。关键字：票据 报销单 对帐单IVManagement of Finance Bills System For a Small and medium enterpriseAbstractSMEs（a small and medium enterprise） involved in financial work in all kinds of claims bills, vouchers, checks and cash management Voucher Dan and other objects when the complex, cumbersome and heavy. Traditional financial officers often use manual paper management methods to organize these notes, not only inefficiency, and often missing notes occur, cumbersome data entry errors, and change the reality. This daily financial reimbursement for SMEs working in the various bills related to claims, vouchers, checks and cash management Voucher Dan and other objects of complicated and complex reality, design and development of a scientific and rational management system notes . Notes Management System can be efficient and accurate completion of the management of these heavy instruments, greatly facilitate the financial management staff notes, so the development of a small and medium businesses to use notes management system is a very meaningful work. This management system design and development using the Delphi development based on Access database, convenient and practical, head for small and medium enterprises of the financial instrument management.Key words: Bills Claims Statement 目 录摘 要IAbstractII序言1一、绪 论1（一）目的1（二）意义1二、系统的需求分析2（一）系统基本功能21.方便快捷录入财务数据：22.快速、方便地核对数据：23.数据的保存操作：24.查询、修改、删除等操作：2（二）功能模块设计31.差旅费报销系统32.费用报销系统43.记帐凭证系统44.现金支票系统55.进帐单系统6三、系统总体设计7（一）系统总体架构7（二）系统的性能要求7（三）票据管理系统业务流程7四、系统的详细设计8（一）编程语言81编程语言介绍82系统中使用到的控件介绍9（二）数据库设计101.数据库命名标准与规范102.数据库逻辑设计103.数据库物理结构设计104.设计约束115.设计策略12（三）代码设计121系统核心模块122系统核心模块详解13（四）具体设计过程141差旅费报销单设计142主页面设计15五、系统实施16（一）系统的物理配置161.硬件配制162.软件配置16（二）票据录入的程序流16（三）系统测试161.系统测试的目的162.系统测试的原则163.系统测试用例17参考文献19序言随着经济贸易的全球化和信息化时代的到来，计算机在各行各业都得到越来越广泛的的应用，信息化逐渐取代传统化，企业管理进入了电子化时代，现代企业的管理软件系统也必不可少的成为了企业电子化管理的基本条件。 在激烈的现代化贸易市场，企业掌握了快捷、方便的管理手段，企业就节省了大量的管理成本。企业要走在了时代的前列，其市场占有率，不但要在成本、价格上下功夫，而且必须大量管理工作上下大功夫。某些企业在壮大的过程中忽视了科学的管理带给企业经济效益这个重要因子，给企业的经营发展带来了很大的问题。所以说，合理的管理系统已经成为现代企业管理中的一个重要部分。 如何有效、高效的完成票据管理这项看似乎简单、实则复杂的工作呢。显然采用软件系统逐渐取代落后的手工票据管理方式在实际应用中使用来实现辅助办公是高效率完成这项工作的有效方法之一，因此开发一个适合中小型企业使用的票据管理系统是一个非常有实际意义的工作1。一、绪 论（一）目的本项目的目的在于通过开发出一个合理科学的票据管理系统来实现对中小型企业日常工作中多种类票据科学管理为目的功能，以极大地降低中小型企业财务人员的工作量和工作压力，有效的加速了对票据的管理效果，以便更多的为企业节省管理成本。（二）意义票据的管理是公司财务工作中最为常见的工作，同时也是繁杂、烦琐的工作。在工作量越来越大，而又不断要求提高工作效率的实际工作中，传统的手工票据管理工作方式已经远远不能适应工作需要。如何有效、高效的完成这项看似乎简单、实则复杂的工作呢。显然采用软件系统来实现辅助办公是高效率完成这项工作的有效方法之一，虽然通用的票据管理系统不乏存在，但是和实际工作都存在一定差距，并不能很好地在实际应用中使用。因此开发一个适合中小型企业使用的票据管理系统是一个非常有实际意义的工作。本文正是针对现实中中小型企业财务票据管理的现状，从实用角度介绍了一个使用Delphi2开发的基于Access数据库3的票据管理系统。这个管理系统会针对以前财务系统所存在的问题，根据我们公司实际使用情况进行开发。主要从实用性为目的进行设计，目的是设计一个适合中小型企业使用的财务票据管理系统。二、系统的需求分析（一）系统基本功能从日常财务管理角度来讲，财务票据管理主要实现对常见财务票据的填写、保存、查询、修改、打印等工作，如差旅费报销单、费用报销单、记帐凭证、现金支票以及进帐单等；从管理系统本身适用性来讲，财务票据管理主要是针对中小型企业或单位实现对数据的管理；从高效性来讲，财务票据管理主要从安全性、存储速度、操作方便程度来实现。因此，从实际工作出发，以日常管理为依据、以高效性为最终目标，对票据管理系统的功能提出了如下要求：1.方便快捷录入财务数据：票据类型应包含常见财务票据，如差旅费报销单、费用报销单、记帐凭证、现金支票以及进帐单等；不同票据类型也应该根据实际情况设计相应的操作界面，并包含相应的详细记录，如在差旅费报销单中应该有出差人、报销日期、票据编号、出差事由、出差起止日期、单据张数、单独金额等详细记录，在费用报销单中应该有费用项目、类别、金额、报销金额总计等，在记帐凭证中应该有总帐科目、明细科目、借方、贷方等，在现金支票中应该有付款行名称、收款人、出票人帐号等；2.快速、方便地核对数据：界面设计要求方便查阅和其他操作；相关的小类数据要求实现自动叠加，以减少财务人员的工作量。3.数据的保存操作：界面要求设保存和新键按钮，以实现对现有数据的保存和接下来新数据的方便录入；在点击新键按钮后，要求实现对现有界面的清空。4.查询、修改、删除等操作：实现对数据的查询，这个功能至关重要，所谓的财务管理即是要做到对数据的保存，并方便在日后的工作中能找出历史数据进行核对，这就要求在系统内能实现快速、方便地对数据库进行写入和调用；实现对数据的修改，在已经进行了错误录入的情况下，要求实现对数据的修改，而实现这一功能的前提，即是实现对数据的查询；实现对数据的删除，考虑到此软件的使用者是中小型企业的财务管理人员，并不能要求他们能熟练实现对数据库的操作，故要求在系统内加入对系统数据的删除功能。（二）功能模块设计票据管理系统作为财务票据管理系统的主要实现部分，主要包括对差旅费报销单、费用报销单、记帐凭证、现金支票以及进帐单数据的录入、保存、打印、查询、修改、删除等操作。1. 差旅费报销系统设定年份查询差旅费报销系统设定月份删除由文件装入保存保存为文本新建打印填写数据预览新建图1 差旅费报销系统结构图1）、差旅费报销系统查询差旅费报销系统的查询，作为模块的功能放在首要位置，实现对历史数据的查找，方便财务管理。在此功能中设定年份、月份以缩小查找范围，更快地找到指定目标。2）、差旅费报销系统删除在查询出相应数据后，单击选中要删除的记录，点击“删除”即可删除。3）、差旅费报销系统新建在点新建进入填写界面后，可直接录入，也可以由文件装入，也可以把填写的数据保存为文本，直接填写后，可以选择保存、打印、预览、新建。2. 费用报销系统 设定年份费用报销系统设定月份预览打印保存新建填写数据删除查询新建图2 费用报销系统结构图1）、费用报销系统查询费用报销系统的查询，作为模块的功能放在首要位置，实现对历史数据的查找，方便财务管理。在此功能中设定年份、月份以缩小查找范围，更快地找到指定目标。2)、费用报销系统删除在查询出数据后，单击选中后即可删除。3)、费用系统新建保存设定年份新建新建删除填写数据设定月份查询预览打印在点新建进入填写界面后，直接填写后，可以选择保存、打印、预览、新建。在费用栏里填写入数字信息后，财务人员不用手动计算总和，系统会自动计算并显示在金额总计里。3. 记帐凭证系统记账凭证系统图3 记帐凭证系统结构图1)、记帐凭证系统查询费用报销系统的查询，作为模块的功能放在首要位置，实现对历史数据的查找，方便财务管理。在此功能中设定年份、月份以缩小查找范围，更快地找到指定目标。2)、记帐凭证系统删除在查询出数据后，单击选中后即可删除。3)、记帐凭证新建在点新建进入填写界面后，直接填写后，可以选择保存、打印、预览、新建。在费用栏里填写入数字信息后，财务人员不用手动计算总和，系统会自动计算并显示在金额总计里。4.现金支票系统新建删除填写数据设定月份预览查询设定年份打印保存新建现金支票系统图4 现金支票系统结构图1)、现金支票系统查询现金支票系统的查询，作为模块的功能放在首要位置，实现对历史数据的查找，方便财务管理。在此功能中设定年份、月份以缩小查找范围，更快地找到指定目标。2)、现金支票系统删除在查询出数据后，单击选中后即可删除。3)、现金支票新建在点新建进入填写界面后，直接填写后，可以选择保存、打印、预览、新建。在费用栏里填写入数字信息后，财务人员不用手动计算总和，系统会自动计算并显示在金额总计里。预览打印保存新建新建删除查询填写数据设定月份设定年份5.进帐单系统进账单系统图5 进帐单系统结构图1)、进帐单系统查询进帐单系统的查询，作为模块的功能放在首要位置，实现对历史数据的查找，方便财务管理。在此功能中设定年份、月份以缩小查找范围，更快地找到指定目标。2)、进帐单系统删除在查询出数据后，单击选中后即可删除。3)、进帐单新建在点新建进入填写界面后，直接填写后，可以选择保存、打印、预览、新建。在费用栏里填写入数字信息后，财务人员不用手动计算总和，系统会自动计算并显示在金额总计里。三、系统总体设计（一）系统总体架构中小型企业票据管理系统由文件装入差旅费报销系统打印费用报销系统查询保存费用登记记账凭证系统修改现金支票系统删除现金支票系统图6 中小型企业票据管理系统主要功能模块示意图（二）系统的性能要求整个票据管理系统包括五大部分：差旅费报销系统、费用报销系统、记帐凭证系统、现金支票系统和进帐单系统。而每个系统都是先进行详细信息登记，然后进行保存，在保存后可以对登记信息进行打印、查询、修改、删除等操作。而在进行登记的时候，能够从系统外加入相关数据。表3-1 系统功能性要求功能序号功能名称功能说明1差旅费报销单管理包含差旅费报销单信息的登记、修改等2费用报销单管理包含费用报销单信息的登记、修改等3记帐凭证管理包含记帐凭证信息的登记、修改等4现金支票管理包含现金支票信息的登记、修改等5进帐单管理包含进帐单信息的登记、修改等6数据查询包含数据查询（三）票据管理系统业务流程财务票据管理系统业务流程设计思想如下：报销人向财务人员提交相关数据，要求详细而准确；财务人员对提交的财务数据选择相应的系统进行录入，然后保存，如果是系统外数据，可以选择“由文件装入”；在对数据进行录入后，需要查询历史数据后，重新进入系统，先设定好查询条件，如票据类型、年、月等，实现对历史数据的查询；在查询到相关数据后，若要对查看详细信息，双击列表，在弹出的对话框中查看详细信息；若要对数据进行修改，在查询出历史记录后，在表格内对相关数据进行改动，然后保存，当提示“保存成功”后，数据修改成功；若要对数据进行删除，先查询出列表，然后选中单条记录，点击“删除”键。若要对相关数据进行打印，进入相关数据界面后，点击打印，并要求能在打印时对打印进行相关设置。四、系统的详细设计（一）编程语言1编程语言介绍本系统采用的编程语言是Borland Delphi7.0。Delphi：Delphi是Borland公司研制的新一代可视化开发工具，可在Windows环境下使用。它拥有一个可视化的集成开发环境(IDE)，采用面向对象的编程语言ObjectPascal和基于部件的开发结构框架。Delphi它提供了500多个可供使用的构件，利用这些部件，开发人员可以快速地构造出应用系统。开发人员也可以根据自己的需要修改部件或用Delphi本身编写自己的部件。主要特点如下： (1)直接编译生成可执行代码，编译速度快。由于Delphi编译器采用了条件编译和选择链接技术，使用它生成的执行文件更加精炼，运行速度更快。在处理速度和存取服务器方面，Delphi的性能远远高于其他同类产品。(2)支持将存取规则分别交给客户机或服务器处理的两种方案，而且允许开发人员建立一个简单的部件或部件集合，封装起所有的规则，并独立于服务器和客户机，所有的数据转移通过这些部件来完成。这样，大大减少了对服务器的请求和网络上的数据传输量，提高了应用处理的速度。(3)提供了许多快速方便的开发方法，使开发人员能用尽可能少的重复性工作完成各种不同的应用。利用项目模板和专家生成器可以很快建立项目的构架，然后根据用户的实际需要逐步完善。(4)具有可重用性和可扩展性。开发人员不必再对诸如标签、按钮及对话框等Windows的常见部件进行编程。Delphi包含许多可以重复使用的部件，允许用户控制Windows的开发效果。(5)具有强大的数据存取功能。它的数据处理工具BDE(BorlandDatabaseEngine)是一个标准的中介软件层，可以用来处理当前流行的数据格式，如xBase、Paradox等，也可以通过BDE的SQLLink直接与Sybase、SQLServer、Informix、Oracle等大型数据库连接。 Delphi既可用于开发系统软件，也适合于应用软件的开发。(6)拥有强大的网络开发能力，能够快速的开发B/S应用，它内置的IntraWeb和ExpressWeb使得对于网络的开发效率超过了其他任何的开发工具。(7)Delphi使用独特的VCL类库，使得编写出的程序显得条理清晰，VCL是现在最优秀的类库，它使得Delphi在软件开发行业处于一个绝对领先的地位。用户可以按自己的需要，任意的构建、扩充、甚至是删减VCL，以满足不同的需要2系统中使用到的控件介绍1）、Tdatabase部件为应用程序提供了对单个数据库的直接连接功能，它对于应用程序连接至远程数据库服务器时，控制数据库事务处理特别重要。其主要属性有：aliasename:指定用于数据库连接的Borland数据库引擎的别名。即在 ODBC中指定的数据源名称。Databasename:指定于数据库部件相关联的数据库名称。即在程序内部引用控件时使用的名称。Loginprompt:指定当建立一个数据库连接时是否显示一个标准注册对话框。当指定为false时，需要在params属性中指定访问数据库的用户名和密码。2）、Tdataset部件数据集部件，编程通过此部件实现各种数据库SQL语言操作。其主要方法有：open：打开数据集。next:移动到下一条数据记录。Close:关闭数据集。3）、Tdatasource部件Tdatasource部件提供了数据集部件与数据感应部件之间的接口，它在数据集和数据控件之间起着管道作用，管道中的信息就是数据集中的数据，而数据控件把通过通过数据源传递过来的数据流在窗体中可视地显示出来，并且允许用户可视地编辑、导航这些数据。任何数据集的数据要想在数据控件中显示和操作，都必须与一个数据源部件建立连接，同样，任何数据控件希望接收和操作数据集中的数据，也需要一个与数据源建立连接。（二）数据库设计1.数据库命名标准与规范表3-2 数据库及各表、视图的命名方法名称类型命名办法约定票据数据库系统数据库字母表基本表汉字或字母查询查询汉字字段字段汉字或字母2.数据库逻辑设计表3-3 数据库逻辑设计名称类型用途名称差旅费报销单基本表用于记录员工出差费用详细情况登记，如车船票，机票，住宿费，出租车费用及出差补助费用等。出差费用报销单基本表用于记录员工出差时购买生活必须品的报销记录，如床单，被褥以及其他工作物品如网络测试仪器，电工工具等。费用记帐凭证基本表用于公司记录借贷情况明细记录记帐现金支票基本表指银行进帐单，用于公司通过银行出帐支票交易的记录，及出帐单的套打。支票进帐单基本表指银行进帐单，用于公司通过银行进帐支票交易的记录，及进帐单的套打。进账单3.数据库物理结构设计系统目前只涉及到六张表格，为适应以后添加更多的表单及情况下，系统能达到易于扩展的目的，以及系统所涉及的表格的各种数据项目的特点，在程序设计时对保存数据及读取的统一处理。在表设计时表中只设计两种字段类型即数字型和字串型，且只有主键使用数字型，其他字段全部使用字串型，尽管实际存放的数据应该是日期，数字或货币型。字段名使用有规律的序号排列，字段名称不表示任何和实际存储的数据的联系。具体表结构及表名如下：表名：出差表名：费用表名：进账单表名：进账表名：支票以上表结构都一样，表3-4 具体结构字段名称类型字段长度备注ID数字字母主键f1文本255f2文本255F3文本255F4文本255F5文本255F6文本255F7文本255文本255F30文本2554.设计约束系统在设计时，从用户使用的角度上讲要达到方便性，因此在输入问题上需要提供以下方便性。1)、能够提供记忆功能：也即用户下次在该输入框输入数据时，以下拉列表的形式提供用户选择最近有限次数的输入数据项。2)、固定文本选择功能：功能类似windows标准下拉框，所不同之处在于用户能够自行维护选择框的内容。3)、用户在录入数据时按照输入顺序在回车之后自动跳转到下一个输入框，而不是借用鼠标或者TAB键移动。4)、在输入框控件上实现数据类型的约束，即输入数字的地方不能输入非数字信息。从系统实现考虑，每个表格的数据保存与读取采用一个通用的保存数据和读取数据函数来解决，这样有利于提高代码可用性和可维护性。各种票据的打印是票据管理软件的最常用功能，本软件的打印控件是本公司其他软件中的打印控件引用过来的。它的功能非常强大，例如能够实现在预览界面调整上下左右边距，拖动整个打印区域，横向、纵向打印，设置各种字体等，还有一个很重要的功能就是套打，它的实现原理就是在预览时能够将实际的扫描进系统的需要套打的票据图片显示出来，给人以实际感觉，然后需要套打的部份则可以在预览界面编辑，或调整位置，设置字体，字体大小等。打印的时候，只打印定义为需要打印的部分。5.设计策略要实现用户输入的要求，必须要自行开发一个控件来实现该功能，该控件封装自Tedit类，其四个功能可以通过为Tedit的hint属性设置为mem(表示记忆框),int（表示输入数字）,money（表示输入的数据为货币型）或为一个文本文件名如“出差人员.txt”来实现。要自动实现通用的保存数据和读取数据功能，需要程序设计时对需要保存数据的控件的名称做约定。例如控件名称即为对应存储表的字段名称。或建立一个控件名和字段的对应关系设置来实现。（三）代码设计1系统核心模块表3-5系统核心模块模块名类型原型或声明模块说明openform子程序procedure openform(s_flag:boolean)打开票据登记界面的方式，是只读状态还是非只读状态。getnewid函数Functiongetnewid(table:string;query1:Tclset):string;往数据库写新的记录时取得的id值auto_sql函数function auto_sql(aform:Tform;atable:string;flag:integer;query1:Tclset;txtrecord:Ttxtrecord):string;自动合成的保存数据的sql语句。read_data子程序procedure read_data(aform:Tform;atable:string;query1:Tclset);读取数据过程。compute_sum函数function compute_sum(aform:Tform;e1,e2,e3,e4,e5,e6,e7,e8,e9,e10:string):string;计算合计项目clearctl子程序procedure clearctl(aform:Tform;c_type:string);新增状态时，清除界面上的某些输入项目。2系统核心模块详解（1）函数 auto sql功能说明：该函数在调用时能够遍列窗体上的TEdit,TDatatime,TMemo等输入性的控件，根据控件的name和实际存储的表字段之间的约定自动生成操纵数据库的语句。如insert语句和update语句。1）变量value_str为Tstringlist,用于为动态生成insert或update语句临时存储输入控件的值， 2）循环遍列控件语句：for i:=0 to aform.ComponentCount-1 do 3）根据控件的Classname属性确定控件的类型。如果控件的ClassName=TEdit，则为标准输入控件。如下为代码片段。if aform.Componentsi.ClassName=TEdit then/ 判断该控件是Tedit类 sqlstr:=sqlstr+aform.Componentsi.Name;/取控件名，该控件名即为其对应的数据库存储字段名 value_str.Add(aform.Componentsi as Tedit).text);/取控件输入框的值，该值即为当前用户输入的值。 1）value_str中值的顺序与insert中的字段顺序一一对应。2）同样可以遍列TDatatime,Tmemo控件，并取得对应字段和值。（2）函数read data功能说明：该过程通过遍列窗体上的Tedit,Tdatatime,Tmemo等输入性的控件，根据控件的name和实际存储的表字段之间的约定自动赋予相应的值到控件上。1）从对应的表选择相应的数据。readsql:=select * from +atable+ where id=+cur_id; 2）通过循环生成字段和值间对应关系。for j:=0 to fields.Count-1 do/ /str_name存储字段名,同时该名称还是窗体上输入控件的名字。 str_name.Add(fields.Fieldsj.FieldName); / str_value存储字段名对应的值, 同时该值是窗体上输入控件的值。 str_value.add(fields.Fieldsj.asstring);3）str_name 和str_value 之间存储的字段名和值是一一对应的关系，因此控件名在str_name中找到的索引也为值在str_value中的索引。对应代码片段为：value_index:=str_name.IndexOf(aform.Componentsi.Name);/控件名在str_name中找到的索引 if value_index-1 then (aform.Componentsi as Tedit).text:=str_value.Stringsvalue_index; /控件值在str_value中的索引（3）函数clearctl功能说明：该函数在新建记录时，清除输入控件上当前值。例如，清除Tedit控件的值代码如下。if aform.Componentsi.ClassName=TEdit then (aform.Componentsi as TEdit).text:=;（四）具体设计过程1差旅费报销单设计1）、首先新建一个Application,将Form1的Caption属性设置为差旅费报销单，然后在此设计面板上加上若干控件，其中包括：TOpenDialog、TButton、TShape、TLabel以及TSpeedButton，在差旅费报销单设计中主要实现的几个功能按钮为“由文件装入”、“保存为文本”、“保存”、“打印”、“预览”、“新建”、“关闭”。其中，“由文件装入”的OnClick事件的处理程序如下， sql.text:=sqlstr; sql.SaveToFile(error.log); try execsql; m_mode:=2; application.MessageBox(保存成功,提示,64); except application.MessageBox(保存失败！,提示,64); end; end;end;“打印”的OnClick事件的处理程序如下，其中的 *.mws文件为本公司自定义报表文件。procedure TFrmChuChai.SpeedButton2Click(Sender: TObject);begin OpenReport(self,差旅报销单.mws,nil,0,true);end;“预览”的OnClick事件的处理程序如下，procedure TFrmChuChai.SpeedButton5Click(Sender: TObject);begin OpenReport(self,差旅报销单.mws,nil,0,false);end;“新建”的OnClick事件的处理程序如下，原理是使用Clear清除现有表格中有的数据，procedure TFrmChuChai.SpeedButton3Click(Sender: TObject);begin clearctl(self,2); m_mode:=1;end;而“关闭”的OnClick事件的处理程序仅仅是调用close来退出当前程序。其他几个表单，如费用报销单、记帐凭证、现金支票以及进帐单的设计与差旅费报销单的设计类似，这里就不在赘述，下面介绍一下主页面的设计：2主页面设计主页面上主要包含了TEdit、T