vf软件设计报告汽车修理管理系统

中国地质大学(武汉)Visual foxpro 课程设计报告系统名称：汽车修理管理系统指导老师：梁 庆 中学生姓名：蔡馨 目 录一、“汽车修理管理系统”开发 （一）系统综述3 （二）数据需求3 （三）功能需求分析42、 应用程序设计及组成的功能模块代码 （一）总体设计5（二）系统各模块的设计及代码说明5（三）程序试运行153、 系统效果实现 程序运行的效果154、 课程设计感想 感想181、 汽车修理管理系统的开发（一）系统综述系统开发的背景：某汽修厂根据业务需要，建立一个可以完成“对汽修有关的各类数据进行输入、修改与查询；编制季度零件订货计划；打印汽修发票”的系统。系统开发目的：汽车修理管理系统的目的是为企业提供一个计算机化的管理平台，实践企业内部科学有效的管理，促进企业管理信息化，规范化，将能使管理人员从繁琐的杂务工作中解脱出来，真正从事管理工作。（二）数据需求修车登记表编号：5001 日期：97/01/02修理项目点火线圈汽车牌号A型号S130生产厂南方汽车厂车主姓名李符地址岭分路18号电话汽车修理单登记单编号：5005 汽车牌号：A 修理项目大修送修日期97/06/28零件号数量252修理小时98.0零件入库单 日期：零件号零件名成本数量价格最低库存订货量验收人：零件出库单编号： 日期：零件号数量第一季度零件订货计划零件号零件名库存量最低库存订货量离合器342修理汽车发票日期：99/07/顾客姓名施治秋地址汽车牌号修理项目送修日期备注零件费修理费总金额（三）功能需求分析汽车修理厂的具体功能需求如下：（1）能对汽车修理有关数据进行输入、修改和查询（2）编制季度零件订货计划（3）打印修理汽车发票用户提出了系统开发的要求后，软件开发应通过调研归纳出目标系统的数据需求和功能需求。 根据用户提供的数据并基于认真仔细的调查研究，结合系统目标，现将该系统的功能需求归纳为以下四个方面：(1)数据登记登记功能用于把各种手填单据中的数据及时登记到系统将要定义的表中，还要求能进行修改。这些单据包括修车登记单、汽车修理单、零件库存表、领料单和修理工登记表。(2)查询能查询登记单、修理单、汽车、车主、修理工、零件库存的有关数据。(3)编制月度零件订货计划编制零件订货计划需要找出要订货的零件，订货条件为：零件库存量最低库存量。订货量可由用户输入或修改。(4)打印发票发票中除包含顾客、汽车及修理项目等数据外，还要计算出修车费。修车费包括修理费和零件费，按下列公式计算：修理费=3*修理工时*修理工小时工资零件费=（零件价格*耗用零件数量）总计=零件费+修理费2、 应用程序设计及组成的功能模块代码（一）总体设计按照功能分类是总体设计中常用的方法，系统的总体结构可用层次图（如下）。这种图自上而下进行分层：第一层为系统层，通常对应主程序；第二层为子系统层，一般起分类控制作用，但是当该层没有下一层次时也可直接用来表达功能；第三层为功能层；第四层为操作层。汽车修理管理系统登记零件管理查询打印修车登记零件管理修理工管理零件订货计划零件入库零件出库发票（二）系统各模块设计及代码说明1.系统菜单设计修车登记：命令“DO FORM XCDJ”汽车修理：命令“DO FORM QCXL”零件订货计划：命令“DO FORM LJDH”打印发票：命令“DO FORM DYFP”退出：命令“CLEAR EVENT”2.初始用户界面设计初始用户界面一般由应用系统封面和配有系统菜单的应用程序主窗口组成。系统主文件（qcxl.prg)代码：set talk offset defa to c:qcxlclose allset view to sjhj.vuepublic xldh,zljfxldh=space(4)do form fmkeybctrl+f4modi wind screen titl汽车修理管理系统cleado qcxlcd.mprread event quit3.功能模块设计4.“修车登记”表单（scdj.scx）用于输入、修改和添加修车登记单。功能：可以将多个表的输入等功能集于一身，是屏幕显示与修车登记单格式一致，方便操作；能提供翻页和寻页来寻找修车登记单；增页按钮用于新的修车登记单，登记单编号自动加一；若输入的汽车牌号在QC.DBF中已有，则汽车和车主的数据会自动填入表格；设有专门按钮，临时维护汽车和车主的数据。（1）建立表单：向命令窗口输入命令MODIFY FORM xcdj，使出现标题为xcdj.scx的表单设计器窗口。（2）Forml的属性设置：Caption属性设置为“修车登记”；AutoCenter属性设置为.T.（3）创建各标签和文本框Txt牌号文本框的vaild事件代码：sele qcloca for 牌号=xld.牌号if not found() insert into qc(牌号) values(xld.牌号)EndifTXT车主名文本框的VALID事件代码如下：sele czloca for 车主名=xld.车主名if not found() insert into cz(车主名) values(qc.车主名)EndifCOMMANDGROUP1的CLICK事件代码如下：sele xlddo case case this.value=1 if recn()1 skip-1 endif case this.value=3 go top case this.value=4 go bott case this.value=5 do form srxldh case this.value=6 zy=messagebox(是要赠页吗?,1+48256,确认增加修理单) if zy=1 go bott insert into xld(编号) values(str(val(编号)+1,4) endif case this.value=7 sy=messagebox(是要删页吗?,1+48+256,确认删除修理单) if sy=1 delete pack endif case this.value=8 sele qc brow titl汽车修改+spac(20)+单击行首可打删除标记,退出就删去 pack case this.value=9 sele cz brow titl车主修改+spac(20)+单击行首可打删除标记,退出就删去 pack case this.value=10 thisform.realeaseendcThisform.refresh寻页按钮的GOTFOCUS事件代码如下：sele xldjlh=recn()loca for 编号=trim(xldh)if not found() wait window无次编号! go jlhendifthisform.refresh2.2.4“输入修理单号”表单（srxldh.scx）Text1文本框的LostFocus事件代码编写如下：xldh=thisform.text1.value COMMAND1命令按钮的CLICK的事件代码编写如下：thisform.release5“输入修理单号”表单（SRXLDH.SCX）（1）TEXT1文本框的Lostfocus事件代码Xldh=THISFORM.TEXT1.VALUE（2）Command1的Click事件代码THISFORM.RELEASE6.“汽车修理”表单功能：输入及修改修理小时、完工日期和修理工工号，并且同时显示修车登记单的主要信息及零件用量。（1）建立表单：向命令窗口输入命令MODIFY FORM qcxl，使出现“表单设计器”窗口（2）Forml 的属性设置：将Caption属性设置为“汽车修理.修理情况”。（3）在表单上创建如下图所示的标签和文本框。其中关于xld表的编号、送修日期、修理项目和牌号字段的文本框，text1text8等文本框的readonly属性都设为“.T.”。（4）在表单上创建combol组合框，并设置以下属性。Rowsourcetype： 6Rowsource： xlg.工号，姓名Columncount： 2Controlsource： xld.工号Boundcolumn： 1FORM1的REFRESH事件代码编写如下：thisform.text1.Value=thisform.text2.Value=thisform.text3.Value=thisform.text4.Value=thisform.text5.Value=0thisform.text6.Value=0thisform.text7.Value=0thisform.text8.Value=0SELECT ljylLOCATE FOR 编号=xld.编号IF FOUND() thisform.text1.Value=零件号 thisform.text5.Value=数量ENDIFCONTINUEIF NOT EOF() thisform.text2.Value=零件号 thisform.text6.Value=数量ENDIFCONTINUEIF NOT EOF() thisform.text3.Value=零件号 thisform.text7.Value=数量ENDIFCONTINUEIF NOT EOF() thisform.text4.Value=零件号 thisform.text8.Value=数量ENDIF创建命令按钮组：在如上图表单底部居中处创建一个包含下页、上页到确定等6个命令按钮的命令按钮组，其对象名为commandgroup1 。COMMANDGRUOP1命令按钮的CLICK的事件代码编写如下：SELECT xldDO case CASE this.Value=1 IF RECNO()1 skip-1 ENDIF CASE this.Value=3 GO top CASE this.Value=4 GO bott CASE this.Value=5 DO FORM srxldh CASE this.Value=6 thisform.Release ENDCASE Thisform.refresh7.“零件订货表单”表单（LJDH.SCX）功能：在表单上设置一个列表共选定季度，确定季度后能显示LJKC表中库存量最低库存的零件信息及订货量，订货量可当场修改。属性设置： 表 “零件订货计划”属性设置对象名属性属性值说明Form1Caption月度订货计划Label1Caption请选月度（双击有效）List1ControlSourceyd数据绑定到变量属性ydlist1的init事件代码编写如下：this.additem(1)this.additem(2)this.additem(3)this.additem(4)LIST1的DBLCLICK事件代码如下：SELECT ljkcCOUNT FOR 库存量最低库存 TO jlsIF jls=0 MESSAGEBOX(库存量均不小于最低库存,第+jd+季度不需订货)ELSE SET FILTER TO 库存量最低库存 BROWSE FIELDS 零件号:R,库存量:R,最低库存:R,订货量; TITLE 第+jd+季度零件订货计划 SET FILTER TO endi8.“打印发票”表单（DYFP.SCX）TEXT1的LostFocus事件代码如下：xldh=thisform.text1.ValueCOMMAND1的CLICK事件代码如下：SELECT xldLOCATE FOR 编号=TRIM(xldh)IF NOT FOUND() WAIT window无此编号！ ELSE SELECT ljyl SUM 数量*ljkc.价格 FOR 编号=TRIM(xldh) AND 零件号=ljkc.零件号 TO zljf REPO FORM fp prev thisform.ReleaseEndif9.“发票”报表（FP.FRX）创建报表变量ljp（零件费）和xlf（修理费）：选定“报表”菜单的“变量”选项 在“报表变量”对话框的“变量”列表中输入ljf 在“要存储的值”与“初始值”文本框中均输入zljf。在报表设计器窗口中创建如下图所示表达式控件，它的数据环境是xld、qc和cz 3 个表。 （三）程序试运行 选定“开始”菜单中“设置”选项的“任务栏和开始菜单”命令选定“任务栏和开始菜单属性”对话框的“高级”选项卡选定“添加”按钮在“轻键入项目的位置：”文本框中输入“C：qcxlqcxl”选定“下一步”在“选择程序文件夹”对话框中，认同默认文件夹“程序”，选定“下一步”按钮在“键入该快捷的名称：”文本框中输入：汽车修理管理系统选定“完成”按钮返回“任务栏和开始菜单属性”对话框选定“确定”按钮，“汽车修理管理系统”程序项已建立在“开始”菜单“程序”子菜单中。 程序运行方法：选定“开始”菜单中“程序”选项的“汽车修理管理系统”命令，即显示汽车修理管理系统封面。3、 系统效果实现 1. 程序运行封面：出现系统封面后，双击鼠标右键，便进入拥有菜单的窗口。（菜单窗口）2. 修理登记单单击“登记”栏，选择“修车登计”，用户可根据自身需要进行操作。下页：显示下一页上页：显示上一页首页：显示第一页末页：显示最后一页寻页：点