账务处理与报表MIS的设计与实现ppt课件.ppt

《账务处理与报表MIS的设计与实现ppt课件.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、《管理信息系统》主讲：李国红E-mail:lighong6yahoo7/27/20211《管理信息系统》：李国红主讲6.1账务处理与报表系统设计概述6.2会计科目设置6.3记账凭证输入处理6.4登记现金日记账6.5登记总账6.6损益表数据自动生成及输出6.7账务处理与报表系统的菜单设计6.8MIS操作维护设计与实现6.9MIS用户登录的设计与实现第6章账务处理与报表系统的设计与实现7/27/20212《管理信息系统》：李国红主讲6.1账表MIS概述(1/4)1.账表MIS的任务:（P153）7/27/20213《管理信息系统》：李国红主讲6.1账表MIS概述(2/4)2

2、.账务与报表处理的DFD:（P154）7/27/20214《管理信息系统》：李国红主讲6.1账表MIS概述(3/4)3.账务处理系统的主要功能模块:7/27/20215《管理信息系统》：李国红主讲6.1账表MIS概述(4/4)4.VFP开发环境设置与相关操作VFP系统环境设置主要操作和常用命令、常用函数项目管理器的使用7/27/20216《管理信息系统》：李国红主讲6.2会计科目设置6.2.1科目输入6.2.2科目查询与修改6.2.3科目删除6.2.4记录定位及信息提示框7/27/20217《管理信息系统》：李国红主讲6.2.1科目输入1.科目输入包括设置会计科目和输入

3、期初数。2.建立会计科目表文件kjkm.dbf,表中包括kmbh、kmmc、jdfx、qcye四个字段，数据通过表单界面输入。3.设计表单，含科目编号、科目名称、借贷方向、期初余额等的标签及其文本框。其中期初余额文本框应设置为数值型数据类型的文本框。4.编程。应考虑：科目编号不能为空（位数不低于4）、科目编号不能重复、多于4位的科目必须有上级科目。5.功能演示6.考虑科目输入的基本过程。7.用VFP实现账表MIS的系统初始化。有关命令及函数。转科目输入程序流程7/27/20218《管理信息系统》：李国红主讲Kjkm.dbf数据表的结构返科目输入返查询修改返科目删除7/2

4、7/20219《管理信息系统》：李国红主讲科目输入用户界面7/27/202110《管理信息系统》：李国红主讲上级科目假设假设：从二级科目开始，某科目的代码去掉最后二位即为该科目的上级科目。一级科目：1001、1002、1101、……二级科目：100201、100202、……三级科目：10020191、10020192、……余类推。7/27/202111《管理信息系统》：李国红主讲科目输入的基本过程kmbhkmmcjdfxqcye1001现金12000.001002银行存款11256000.007/27/202112《管理信息系统》：李国红主讲有关命令及函数、属性、方法s

5、etexacton

6、offuselocatefor……appendblankreplace……with……len()alltrim()subs()或left()space()messagebox()found()对象.value对象.setfocus对象.refresh对象.release7/27/202113《管理信息系统》：李国红主讲a=messagebox("真的想退出吗?",4+48,"提示")单击“是”，a=6单击“否”，a=7a=7a=67/27/202114《管理信息系统》：李国红主讲a=messagebox("要提示的信息!",0+48,"提示")a=1

7、转“科目输入”7/27/202115《管理信息系统》：李国红主讲会计科目输入程序流程7/27/202116《管理信息系统》：李国红主讲用VFP实现账表MIS的科目输入——“确定”按钮的Click过程setexactonb=0usekjkmkmbh1=allt(thisform.text1.value)length1=len(allt(thisform.text1.value))iflength1<4b=messagebox("请输入不低于四位的科目编号!",48)thisform.text1.setfocuselselocaforallt(kmbh)=kmbh1……7/

8、27/202117《管理信息系统》：李国红主讲辅助功能——文本框单击被清空Text2、Text3的Click事件This.value=space(0)Text4的Click事件This.value=07/27/202118《管理信息系统》：李国红主讲取消本次输入——“取消”按钮的Click过程thisform.text1.value=spac(0)thisform.text2.value=spac(0)thisform.text3.value=spac(0)thisform.text4.value=0.00thisform.text1.s