会计信息系统报告Word文档格式.docx

1、各种系统的基本操作，如剪切、复制、窗口间切换等。1.3数据流图：记账凭证凭证输入凭证审核日常处理记账结账输出账簿及报表1.4.1系统分析任务1.系统分析的基本任务是得到一个会计信息系统的逻辑模型。系统分析是整个系统建设的关键阶段，它阐明了各功能单位之间的相互联系，保证新系统有整体性和优良的结构，是系统设计的基础，且系统分析工作难度较大，它要求主持该项工作的人员具有熟悉计算机技术、熟悉财会业务和协调的能力。2.采用结构化系统分析方法，采用“自顶向下，逐层分解，化大为小，分而治之”的思想将系统功能由粗到细，逐步分解。3.模块划分的原则：（1）模块涉及操作相对集中，即一个模块只模仿某一方面的功能，以

2、提高系统的可用性；（2）各模块相对独立，降低模块间的耦合程度，因为耦合程度越低，模块间的相互影响就越小，说明系统分解得越好；1.4.2系统设计的要求1.系统设计应遵循系统的可靠性，系统的实用性，系统的运行效率，系统的适用性和系统的经济效益的原则；2.在系统处理方式上选择批处理方式，共享程度高，一致性好；3.代码设计遵循惟一性，标准化，通用性，稳定性，可扩充性和简单性等。二.登录界面及主菜单设计 2.1.登陆界面设计（1）在项目中打开登陆界面示意图：（2）登陆界面设计示意图：2.2登录程序2.2.1表单中登录按钮command1的程序设计（1）程序：n=0a=thisform.text1.val

3、ueb=thisform.text2.valueif a=20124920801 and b=789990thisform.label13.caption=欢迎使用本系统！do c:会计信息系统-郑静金主菜单设计.prgelsen=n+1学号错误，请重新输入！thisform.text1.value=thisform.text2.value=thisform.text1.setfocusif n=3对不起，您无权使用本系统！thisform.text1.enabled=.f.thisform.text2.enabled=.f.mand1.enabled=.f.endif（2）运行的效果示意图：

4、2.2.2退出按钮command2的程序设计thisform.release（2）运行效果示意图（退回到原来界面）2.3.1程序：set talk offclearset sysmenu todefine pad _pad1 of _msysmenu prompt 凭证处理 color scheme 3define pad _pad2 of _msysmenu prompt 账簿管理define pad _pad3 of _msysmenu prompt 会计报表define pad _pad4 of _msysmenu prompt 退出系统on pad _pad1 of _msysmenu

5、 activate popup 凭证处理on pad _pad2 of _msysmenu activate popup 账簿管理on pad _pad3 of _msysmenu activate popup 会计报表on pad _pad4 of _msysmenu activate popup 退出系统define popup 凭证处理 margin relative shadow color scheme 4define bar 1 of 凭证处理 prompt 科目代码查询define bar 2 of 凭证处理 prompt 凭证录入define bar 3 of 凭证处理 pro

6、mpt 凭证修改define bar 4 of 凭证处理 prompt 凭证查询on selection bar 1 of 凭证处理 do c:会计信息系统-郑静金科目代码查询.prgon selection bar 2 of 凭证处理 do c:会计信息系统-郑静金凭证录入.prgon selection bar 3 of 凭证处理 do c:会计信息系统-郑静金凭证修改.prgon selection bar 4 of 凭证处理 do c:会计信息系统-郑静金凭证查询.prgdefine popup 账簿管理 margin relative shadow color scheme 4def

7、ine bar 1 of 账簿管理 prompt 科目汇总表define bar 2 of 账簿管理 prompt 现金日记账define bar 3 of 账簿管理 prompt 银行日记账define bar 4 of 账簿管理 prompt 总分类账on selection bar 1 of 账簿管理 do c:会计信息系统-郑静金科目汇总表输出.prgon selection bar 2 of 账簿管理 do c:会计信息系统-郑静金现金日记账输出.prgon selection bar 3 of 账簿管理 do c:会计信息系统-郑静金银行日记账输出.prgon selection

8、bar 4 of 账簿管理 do c:会计信息系统-郑静金总分类账输出.prgdefine popup 会计报表 margin relative shadow color scheme 4define bar 1 of 会计报表 prompt 资产负债表define bar 2 of 会计报表 prompt 利润表on selection bar 1 of 会计报表 do c:会计信息系统-郑静金资产负债表输出.prgon selection bar 2 of 会计报表 do c:会计信息系统-郑静金利润表输出.prgdefine popup 退出系统 margin relative shad

9、ow color scheme 4define bar 1 of 退出系统 prompt 退出on selection bar 1 of 退出系统 do c:会计信息系统-郑静金退出系统设计.prg2.3.2程序运行效果示意图：2.4.1程序：set sysmenu to defaultset talk onreturn2.4.2运行程序的效果示意图（退出程序）三系统基本设置3.1数据库和数据表（完成效果图如下）3.2.科目代码库（完成效果图如下：）3.3摘要库（完成效果图如下：四凭证处理4.1凭证格式设计4.1.1程序：n=13a1= _a2=| | | | |a3=|_|_|_|_|a4=

10、12,10 say a1do while n=26n,10 say a2n+1,10 say a3n=n+2enddo27,10 say a228,10 say a47,41 say 记账凭证 font 宋体,2011,12 say 凭证类别：11,39 say 日期：11,58 say 凭证号：11,82 say 附件张数：13,25 say 摘要13,48 say 会计科目13,68 say 借方金额13,86 say 贷方金额27,25 say 合计29,10 say 记账：+space（16）+审核：+space（14）+出纳：制单：4.1.2程序运行效果示意图：4.2.科目代码查询设

11、计4.2.1程序：a=6clea use c:会计信息系统-郑静金科目代码库.dbfdo while a=6cleakmdm1=space（6）9,20 say 请输入科目代码：get kmdm1readlocate for kmdm=kmdm1if !found（）messagebox （代码不正确,请重新输入else 10,37 say kmmcendi a=messagebox（是否继续查询下一个?,4）useset talk on 4.2.2程序运行效果示意图：4.3.凭证录入设计功能说明：1）具有可输入多借多贷分录的功能，并可继续输入下一张凭证。2）含多种逻辑纠错功能，可限制凭证类型

12、，保证输入的摘要、科目代码和金额的有效性，可检查借贷方金额是否平衡并可做相应的修改。4.3.1程序：close alldo while .t.会计信息系统-郑静金凭证格式.prgpzlx1=space（2）fjzs1=pzh1=space（3）store 0 to je1,je2,jfje1,dfje1rq1=space（10）zy1=space（3）zy2=space（20）kmdm2=space（6）kmmc1=space（20）kmmc2=space（20）11,22 get pzlx1do while pzlx1收.and.pzlx1付转messagebox（凭证类型错误,请重新输入!

13、11,44 get rq111,65 get pzh111,92 get fjzs1m=6a=15do while m=6会计信息系统-郑静金摘要库.dbfa,12 get zy1locate for zydm=zy1do while zydmzy1找不到符合条件的摘要，请重新输入enddzy2=zynra,12 say zy2a,48 get kmdm1do while kmdmkmdm1输入的科目代码有误，请重新输入kmmc1=kmmca,48 say kmmc1a,68 get je1a,86 get je2do while je1=0.and.je2=0金额不能为零会计信息系统-郑静金

14、凭证库.dbfappend blankrepl pzrq with rq1,pzh with pzh1,pzlx with pzlx1,zy with zy2,kmdm with kmdm1,kmmc with kmmc1,jfje with je1,dfje with je2m=messagebox（是否输入下一行分录a=a+2sum jfje to jfje1 for pzh=pzh1sum dfje to dfje1 for pzh=pzh127,68 say jfje127,86 say dfje1do while jfje1replace kmmc with kmmc1,bqjf w

15、ith bqjf1,bqdf with bqdf1,fx with 借, ye with ye1case ye1贷, ye with ye1*（-1）case ye1=0平endcasej1=0d1=0sum bqjf to j1sum bqdf to d1replace kmmc with bqjf with j1,bqdf with d15.2.2程序运行的效果示意图5.3现金日记账输出程序设计5.3.1程序：stor 0 to jfje1,dfje1,ye1zy1=space（20）sele 1Use c :sele 2会计信息系统-郑静金现金日记账.dbfif substr（kmdm,1,4）=1001rq1=pzrqpzh1=pzhjfje1=jfjedfje1=dfjezy1=zyye1=yeskip delete restpackrepl rq with rq1,pzh with pzh1,zy with zy1,sr with jfje1,zc with dfje1,ye with ye1+jfje1-dfje1zsr=0zzc=0store 0 to zsr,zzcsum sr to zsrsum zc to zzcappe blanrepl rq with 2014/04/30,zy with 本月小计,sr with zsr,