账务处理与报表MIS的设计与实现.ppt
《账务处理与报表MIS的设计与实现.ppt》由会员分享,可在线阅读,更多相关《账务处理与报表MIS的设计与实现.ppt(112页珍藏版)》请在三一文库上搜索。
1、管理信息系统,主 讲:李国红 E-mail: ,2019/5/21,管理信息系统:李国红主讲,2,6.1 账务处理与报表系统设计概述 6.2 会计科目设置 6.3 记账凭证输入处理 6.4 登记现金日记账 6.5 登记总账 6.6 损益表数据自动生成及输出 6.7 账务处理与报表系统的菜单设计 6.8 MIS操作维护设计与实现 6.9 MIS用户登录的设计与实现,第6章 账务处理与报表系统的设计与实现,2019/5/21,管理信息系统:李国红主讲,3,6.1 账表MIS概述 (1/4),1. 账表MIS的任务:(P153),2019/5/21,管理信息系统:李国红主讲,4,6.1 账表MIS概
2、述 (2/4) 2.账务与报表处理的DFD: (P154),2019/5/21,管理信息系统:李国红主讲,5,6.1 账表MIS概述 (3/4),3. 账务处理系统的主要功能模块:,2019/5/21,管理信息系统:李国红主讲,6,6.1 账表MIS概述(4/4),4.VFP开发环境设置与相关操作 VFP系统环境设置 主要操作和常用命令、常用函数 项目管理器的使用,2019/5/21,管理信息系统:李国红主讲,7,6.2 会计科目设置,6.2.1 科目输入 6.2.2 科目查询与修改 6.2.3 科目删除 6.2.4 记录定位及信息提示框,2019/5/21,管理信息系统:李国红主讲,8,6.
3、2.1 科目输入,1.科目输入包括设置会计科目和输入期初数。 2.建立会计科目表文件kjkm.dbf,表中包括kmbh、kmmc、jdfx、qcye四个字段,数据通过表单界面输入。 3.设计表单,含科目编号、科目名称、借贷方向、期初余额等的标签及其文本框。其中期初余额文本框应设置为数值型数据类型的文本框。 4.编程。应考虑:科目编号不能为空(位数不低于4)、科目编号不能重复、多于4位的科目必须有上级科目。 5.功能演示 6.考虑科目输入的基本过程。 7.用VFP实现账表MIS的系统初始化。有关命令及函数。,转科目输入程序流程,2019/5/21,管理信息系统:李国红主讲,9,Kjkm.dbf数
4、据表的结构,返科目输入 返查询修改 返科目删除,2019/5/21,管理信息系统:李国红主讲,10,科目输入用户界面,2019/5/21,管理信息系统:李国红主讲,11,上级科目假设,假设:从二级科目开始,某科目的代码去掉最后二位即为该科目的上级科目。 一级科目:1001、1002、1101、 二级科目:100201、100202、 三级科目:10020101、10020102、 余类推。,2019/5/21,管理信息系统:李国红主讲,12,科目输入的基本过程,1002,银行存款,1,1256000.00,2019/5/21,管理信息系统:李国红主讲,13,有关命令及函数、属性、方法,set
5、exact on | off use locate for append blank replace with len() alltrim() subs() 或 left() space() messagebox(),found() 对象.value 对象.setfocus 对象.refresh 对象.release,2019/5/21,管理信息系统:李国红主讲,14,a=messagebox(“真的想退出吗?“,4+48,“提示“),单击“是”,a=6 单击“否”,a=7,a=7,a=6,2019/5/21,管理信息系统:李国红主讲,15,a=messagebox(“要提示的信息!“,0+4
6、8,“提示“),a=1,转“科目输入”,2019/5/21,管理信息系统:李国红主讲,16,会计科目输入程序流程,2019/5/21,管理信息系统:李国红主讲,17,用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 all
7、t(kmbh)=kmbh1 ,2019/5/21,管理信息系统:李国红主讲,18,辅助功能 文本框单击被清空,Text2、Text3的Click事件 This.value=space(0) Text4的Click事件 This.value=0,2019/5/21,管理信息系统:李国红主讲,19,取消本次输入 “取消”按钮的Click过程,thisform.text1.value=spac(0) thisform.text2.value=spac(0) thisform.text3.value=spac(0) thisform.text4.value=0.00 thisform.text1.se
8、tfocus,2019/5/21,管理信息系统:李国红主讲,20,退出输入模块 “退出”按钮的Click过程,a=messagebox(“真的想退出吗?“,4+48,“提示“) if a=6 thisform.release endif,if messagebox(“真的想退出吗?“,4+48,“提示“) =6 thisform.release endif,2019/5/21,管理信息系统:李国红主讲,21,进一步思考的问题,有关a=messagebox(“XXXXXX”,m+48,“提示”) 见(P185-186),2019/5/21,管理信息系统:李国红主讲,22,(P185-186) b
9、=messagebox(“XXXXXXXXXXXX!“,m+48,“提示“),m=0 单击“确定”,b=1 m=1 单击“确定”,b=1 单击“取消”,b=2,2019/5/21,管理信息系统:李国红主讲,23,(P185-186) b=messagebox(“XXXXXXXXXXXX!“,m+48,“提示“),m=2 单击“终止”,b=3 单击“重试”,b=4 单击“忽略”,b=5 m=5 单击“重试”,b=4 单击“取消”,b=2,2019/5/21,管理信息系统:李国红主讲,24,(P185-186) b=messagebox(“XXXXXXXXXXXX?“,m+48,“提示“),m=3
10、 单击“是”,b=6 单击“否”,b=7 单击“取消”,b=2 m=4 单击“是”,b=6 单击“否”,b=7,2019/5/21,管理信息系统:李国红主讲,25,(P185-186) a=messagebox(“XXXXXXXXXXXX“,m+48,“提示“),单击“确定”,a=1 单击“取消”,a=2 单击“终止”,a=3 单击“重试”,a=4 单击“忽略”,a=5 单击“是”,a=6 单击“否”,a=7,2019/5/21,管理信息系统:李国红主讲,26,本节小结,账表MIS的任务及模块结构 账表MIS的系统初始化 kjkm.dbf表文件 输入表单界面 会计科目设置流程 科目设置的VFP
11、实现 进一步思考问题,2019/5/21,管理信息系统:李国红主讲,27,本节结束!,2019/5/21,管理信息系统:李国红主讲,28,上机步骤,在F:盘以自已的学号或姓名建立文件夹。 打开VFP,利用工具,选项将新建文件夹所在目录设置为默认目录。 建表(文件名不要用“表1.dbf”)。 创建表单,输入代码。 运行。 关机。,2019/5/21,管理信息系统:李国红主讲,29,6.2.2 科目查询与修改,1、数据表的结构:同Kjkm.dbf 2、科目查询与修改表单界面设计 3、科目查询与修改功能目标 指定查询条件 查询与修改操作 退出:thisform.release 4、功能的实现,201
12、9/5/21,管理信息系统:李国红主讲,30,查询与修改表单界面,返回,2019/5/21,管理信息系统:李国红主讲,31,指定查询条件,表单的Load与Unload事件 Load:定义Public xiangmu(4),bijiao(7) Combo1与Combo2关联的数据源 RowSourceType:5-数组 RowSource:xiangmu、biaojiao Style:2-下拉列表框 表单的Init事件 Combo1和Combo2的InteractiveChange事件 Text2的数据类型和输入掩码 Text1和Text2的Click事件,2019/5/21,管理信息系统:李国
13、红主讲,32,查询与修改,Cursor1的Filter属性 表单初始运行后,表格中不含数据:.F. Combo2的ControlSource属性 bj:“”、“=” 宏替换&bj.: 、= “查询”按钮的Click事件 表格只读 选择不同项目时对应的不同条件tj Cursor1的filter属性设置为tj 根据Combo1是否“期初余额”,为Text2或Text1设置焦点 刷新表单,2019/5/21,管理信息系统:李国红主讲,33,本节结束,2019/5/21,管理信息系统:李国红主讲,34,6.2.3 科目删除,1、表的结构:同Kjkm.dbf 2、界面设计 3、相关功能 选择列表项 删除
14、功能的实现 实现退出功能 单击Text1,内容被清空 单击Combo1,Text1获得焦点,2019/5/21,管理信息系统:李国红主讲,35,删除科目界面,下拉列表框,Style属性为2,2019/5/21,管理信息系统:李国红主讲,36,列表项,表单的Load过程:public shuzu(4) Combo1下拉列表框对应的数据源类型、数据源以及用于保存所选列表项的变量 RowSourceType:5-数组 RowSource:shuzu ControlSource:xuanxian 表单的Init过程 bo1.listindex=2 thisform.text1.setfocus,201
15、9/5/21,管理信息系统:李国红主讲,37,“删除”按钮的Click事件,do case case xuanxiang=“科目编号“ ziduan=“kmbh“ case xuanxiang=“科目名称“ ziduan=“kmmc“ case xuanxiang=“借贷方向“ ziduan=“jdfx“ case xuanxiang=“期初余额“ ziduan=“qcye“ endcase,2019/5/21,管理信息系统:李国红主讲,38,“删除”按钮的Click事件,use kjkm if ziduan“qcye“ locate for allt(&ziduan)=allt(thisfo
16、rm.text1.value) if found() dele for allt(&ziduan)=allt(thisform.text1.value) pack thisform.text1.value=space(0) else messagebox(“没找到相关记录!“,0+48,“提示“) endif else locate for &ziduan.=val(thisform.text1.value) if found() dele for &ziduan.=val(thisform.text1.value) pack thisform.text1.value=space(0) els
17、e messagebox(“没找到相关记录!“,0+48,“提示“) endif endif use thisform.text1.setfocus,2019/5/21,管理信息系统:李国红主讲,39,利用比较运算符和宏替换的删除设计,2019/5/21,管理信息系统:李国红主讲,40,数据删除以科目删除为例,设计表单 Combo1的设置:RowsourceType:1-值;RowSource:科目编号,科目名称,借贷方向,期初余额;Style:2-下拉列表框 Combo2的设置:RowsourceType:1-值;RowSource:=、,;ControlSource:ysf ;Style:
18、2-下拉列表框 Form1的Init过程代码: Tmbo1.listindex=2 Tmbo2.listindex=3 Thisform.setfocus 删除按钮的Click过程代码 宏替换函数:&变量.,2019/5/21,管理信息系统:李国红主讲,41,use kjkm do case case allt(bo1.value)=“科目编号“ ziduan=“kmbh“ case allt(bo1.value)=“科目名称“ ziduan=“kmmc“ case allt(bo1.value)=“借贷方向“ ziduan=“jdfx“ case allt(bo1.value)=“期初余额“
19、 ziduan=“qcye“ endc if allt(bo1.value)“期初余额“ locate for &ziduan.&ysf.allt(thisform.text1.value) if found() delete for &ziduan.&ysf.allt(thisform.text1.value) pack else,2019/5/21,管理信息系统:李国红主讲,42,messagebox(“无符合条件的记录!“,0+48,“提示“) endif else locate for &ziduan.&ysf.val(thisform.text1.value) if found()
20、delete for &ziduan.&ysf.val(thisform.text1.value) pack else messagebox(“无符合条件的记录!“,0+48,“提示“) endif endif use,2019/5/21,管理信息系统:李国红主讲,43,本节结束,2019/5/21,管理信息系统:李国红主讲,44,6.2.4 记录定位及信息提示框,记录定位功能的实现 首记录、上一条、下一条、末记录 信息提示框的运用与表示 Messagebox(“提示信息”,m+n, “提示”),2019/5/21,管理信息系统:李国红主讲,45,2019/5/21,管理信息系统:李国红主讲,
21、46,6.3 记账凭证输入处理,1.概述 记账凭证是登记账薄的直接依据,分为收款凭证、付款凭证和转账凭证3类,但输入记账凭证采用统一的记账凭证的输入屏幕格式。 输入数据的正确是保证账内数据正确的关键,也是由记账凭证正确生成会计报表、账薄数据的关键。 功能演示 2.功能实现 建立记账凭证表文件jzpzfb.dbf和jzpzzb.dbf。表中的字段包括pzh、rq、fjzs、sh、zd;pzh、zy、km、jd、je等。其中sh字段的值后三位为_#$表示已登账,由程序自动处理;其余字段的值通过表单界面输入。,2019/5/21,管理信息系统:李国红主讲,47,6.3 记账凭证输入处理,设计凭证输入
22、表单。主表的数据在表格中输入,附表的数据在文本框中输入,其中,日期和附件张数文本框应分别设置成日期型和数值型数据的文本框, 借贷和科目通达下拉列表选择输入(科目必须是kjkm.dbf表中存在的科目编号)。 编程。应考虑:必须指定科目、借贷;输入金额不能为0;借贷必须平衡;须输入制单人;各命令按钮在必要的时候变为灰色,需要的时候变成可用状态。 记账凭证输入的基本过程、程序流程。 用VFP实现记账凭证处理。准备工作、命令按钮代码、其他辅助功能。,2019/5/21,管理信息系统:李国红主讲,48,记账凭证数据表的结构,2019/5/21,管理信息系统:李国红主讲,49,记账凭证用户输入表单,201
23、9/5/21,管理信息系统:李国红主讲,50,记账凭证输入基本过程,2019/5/21,管理信息系统:李国红主讲,51,输入记账凭证流程图,转“记账凭证及相关处理”,2019/5/21,管理信息系统:李国红主讲,52,准备工作,建立数据环境 添加kjkm、jzpzfb、jzpzzb、建立表间关系 文本框、表格与数据表建立关联 日期、附件张数文本框设置 日期文本框:日期型,Value属性为 。 附件张数文本框:数值型,掩码为99。 辅助功能的实现 Form1的BufferMode:2-开放式。 命令按钮状态方法程序:buttonstatus1、 buttonstatus2、 buttonstat
24、us3 Form1.load、unload、Init事件 Text6.InteractiveChange事件,2019/5/21,管理信息系统:李国红主讲,53,用VFP实现记账凭证处理 “新增凭证”按钮的Click过程(1/2),if len(allt(thisform.text6.value)0 &如果Text6中输入了凭证号 sele (thisform.dataenvironment.cursor_JZPZFB.alias) &选择jzpzfb工作区 locate for allt(pzh)=allt(thisform.text6.value) &查jzpzfb中有无匹配凭证号 if
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 账务 处理 报表 MIS 设计 实现
链接地址:https://www.31doc.com/p-2812355.html