《第6章 账务处理与报表MIS的设计与实现》.ppt

《管理信息系统》：李国红主讲 用VFP开发账务处理与报表MIS 主讲:管理工程系李国红 《管理信息系统》 主 讲：李国红 E-mail: lighong6@ 第6章 账务处理与报表系统的设计与实现 6.1 账务处理与报表系统设计概述 6.2 会计科目设置 6.3 记账凭证输入处理 6.4 登记现金日记账 6.5 登记总账 6.6 损益表数据自动生成及输出 6.7 账务处理与报表系统的菜单设计 6.8 MIS操作维护设计与实现 6.9 MIS用户登录的设计与实现 6.1 账表MIS概述 (1/4) 1. 账表MIS的任务:（P153） 6.1 账表MIS概述 (2/4)  2.账务与报表处理的DFD: （P154） 6.1 账表MIS概述 (3/4) 3. 账务处理系统的主要功能模块: 6.1 账表MIS概述(4/4) 4.VFP开发环境设置与相关操作 VFP系统环境设置 主要操作和常用命令、常用函数 项目管理器的使用 6.2 会计科目设置 6.2.1 科目输入 6.2.2 科目查询与修改 6.2.3 科目删除 6.2.4 记录定位及信息提示框 6.2.1 科目输入 1.科目输入包括设置会计科目和输入期初数。 2.建立会计科目表文件kjkm.dbf,表中包括kmbh、kmmc、jdfx、qcye四个字段，数据通过表单界面输入。 3.设计表单，含科目编号、科目名称、借贷方向、期初余额等的标签及其文本框。其中期初余额文本框应设置为数值型数据类型的文本框。 4.编程。应考虑：科目编号不能为空（位数不低于4）、科目编号不能重复、多于4位的科目必须有上级科目。 5.功能演示 6.考虑科目输入的基本过程。 7.用VFP实现账表MIS的系统初始化。有关命令及函数。 Kjkm.dbf数据表的结构 科目输入用户界面 上级科目假设 假设：从二级科目开始，某科目的代码去掉最后二位即为该科目的上级科目。 一级科目：1001、1002、1101、…… 二级科目：100201、100202、…… 三级科目10020102、…… 余类推。 科目输入的基本过程 有关命令及函数、属性、方法 set exact on | off use locate for …… append blank replace …… with …… len() alltrim() subs() 或 left() space() messagebox() found() 对象.value 对象.setfocus 对象.refresh 对象.release a=messagebox(真的想退出吗?,4+48,提示) 单击“是”，a=6 单击“否”，a=7 a=messagebox(要提示的信息!,0+48,提示) 会计科目输入程序流程 用VFP实现账表MIS的科目输入——“确定”按钮的Click过程 set exact on b=0 use kjkm kmbh1=allt(thisform.text1.value) length1=len(allt(thisform.text1.value)) if length14 b=messagebox(请输入不低于四位的科目编号!,48) thisform.text1.setfocus else loca for allt(kmbh)=kmbh1 …… 辅助功能——文本框单击被清空 Text2、Text3的Click事件 This.value=space(0) Text4的Click事件 This.value=0 取消本次输入——“取消”按钮的Click过程 thisform.text1.value=spac(0) thisform.text2.value=spac(0) thisform.text3.value=spac(0) thisform.text4.value=0.00 thisform.text1.setfocus 退出输入模块——“退出”按钮的Click过程 a=messagebox(真的想退出吗?,4+48,提示) if a=6 thisform.release endif if messagebox(真的想退出吗?,4+48,提示) =6 thisform.release endif 进一步思考的问题 有关a=messagebox(“XXXXXX”,m+48,“提示”) 见(P185-186) (P185-186)b=messagebox(XXXXXXXXXXXX!,m+48,提示) m=0 单击“确定”，b=1 m=1 单击“确定”，b=1 单击“取消”，b=2 (P185-186) b=messagebox(XXXXXXXXXXXX!,m+4