会计信息系统课程设计报告

1、南华大学 会计信息系统课程设计报告 一、概述根据会计信息系统课程开发设计的要求，我们参加了学院组织的为期一周的 会计信息系统课程设计实践。在这个过程中我更加深入的了解到了会计信息系统 这门课程。根据系统生命周期法，完成了系统的系统分析任务和设计任务。以下就是我的课程设计报告。二、会计信息系统的开发21世纪是信息化的时代，经济的信息化关键是经济的信息化，而信息化建 设中的90%勺信息来源于会计信息，会计信息绝大多数是由会计信息系统提供 的。随着计算机和信息技术的广泛应用，会计工作经历了从手工到会计信息化这 一发展过程。会计信息系统的建设将为经营管理、控制决策和经营运行提供充足、 实时、全方位的信

2、息。会计信息系统是一个面向企业价值的信息系统，是从对企业价值运动进行反 应和监督的角度提出信息处理和管理需求的信息系统。 它是利用信息技术队会计 数据进行采集、储存和处理，完成会计核算任务，并提供会计管理、分析、决策 所需的辅助信息J勺系统。在ER叫境下，会计信息系统不是一个独立的子系统， 其大部分功能已经融入ERP系统，会计工作中常规的、可程序化的任务都将由各 个功能模块和会计功能模块自动处理，同时软件系统还会帮助会计人员完成许多 内部控制等管理任务。信息系统开发的目标是以较少的投资在较短时向获得一个使用、高效、可靠、易维护的系统。软件工程就是研究如何运用科学的方法和手段去达到这个目标。 会

3、计信息系统的开发是指研制和建立一个经济有效的会计信息系统。具开发的目标是改善和提高企业的经济管理现代化水平； 提高会计信息来源的准确性；为企 业及上级提供准确及时和全面的各种财务报表；加快财会计划和计算机辅助财务 决策工作，促使会计决策科学化，以提高企业经济效益。三、会计信息系统的系统分析系统分析阶段的基本任务是：系统分析员与用户在一起，充分了解用户的要 求，并把双方的理解用系统说明书表达出来。 统分析是研制信息系统最重要的阶 段，也是最困难的阶段。系统分析要回答新系统“做什么”这个关键性的问题。 只有明确了问题，才有可能解决问题；否则，方向不明，无的放矢。系统分析的 主要任务是将在系统详细调

4、查中所得到的文档资料集中在一起，对组织内部整体管理状况和信息处理过程进行分析。它侧重于从业务全过程的角度进行分析。分 析的主要内容是：业务和数据的流程是否通畅，是否合理，数据、业务过程和实 现管理功能之间的关系，原有系统管理模式改革和新系统管理方法的实现是否具 有可行性等。(1)、会计信息系统的可行性研究。目的在于以最小的代价在尽可能短时间 内解决问题。1、对系统开发进行可行性分析。系统分析的第一步就是要论证系统开发的 可能性，做出可行性分析报告。2、详细调查现行系统。系统分析的第二步就是对新会计信息系统的基础一 现行会计信息系统进行详细的调查，搞清现行会计信息系统的边界、组织机构、 人员分工

5、、业务流程、各种帐、证、表的格式、种类即处理过程。3、描述现行系统。在进行详细系统调查的基础上，用规定的图表、文字描 述线性系统，得出现行会计信息系统的逻辑模型。4、分析用户的要求，改进现行模型，形成新系统逻辑模型。对现行会计信 息系统的逻辑模型进行分析，根据计算机的特点，改进旧模型中不合理之处，增 设新的功能，得出新系统的逻辑模型，包括建立新系统的数据流图，规定新系统 的数据存储策略、输入输出格式、运行环境和系统的性能。(2)、会计信息系统的需求分析。需求分析是生命周期模型中的关键步骤。 需求 分析的主要任务：“理解”和“表达”。1、对现有系统的详细调查和描述：包括 收集原系统的各种单据、账

6、簿、报表等的样本，了解原有系统的组织结构、信息 流程、信息量、信息处理步骤和结果、资源利用现状、管理方式以及系统的内外 部环境，导出原有系统的物理模型，基本符号及实例描述。2、识别原有系统的逻辑模型。3、建立新系统白逻辑模型。4、需求分析的明确表达：撰写规格说明书。四、会计信息系统的系统设计会计信息系统具有对信息的加工和传递功能。对财务信息的加工是通过会计 的活动而实现。系统设计也叫物理设计。系统设计是解决“怎么做”的问题，即 根据系统的逻辑模型进行物理设计，包括系统配置设计、模块结构设计、数据及 文件设计、代码设计、人机界面设计、内部控制设计、算法设计、系统安全设计。 系统设计的目标是保证实

7、现系统功能的前提下尽量提高系统的工作质量、运行效率、可靠性和可维护性。五、会计信息系统设计的意义随着信息时代的到来，企业竞争日益加剧，这就要求企业对市场的反映更 及时、更准确。为了及时把握市场，企业越来越需要管理信息，这已成为企业成 败的关键，核算型系统提供信息的滞后性远不能满足现代企业对信息的需求，因此管理型系统的产生即是必然。管理型会计信息系统是一个以计算机和信息处理 技术为手段，以管理会计的模型为基本方法，对企业中的内部物流及外部变化信 息进行收集、传递、存储、加工、维护和使用的人机系统。它能解析企业的历史 数据并能预测未来，为企业管理中的结构化、半结构化和非结构化的决策问题提 供信息支

8、持，并利用系统反馈的信息帮助企业管理人员控制和管理企业的行为， 以实现加强经营管理，提高经济效益的目的。管理型系统主要侧重于资金、成本、 销售收入、利润的管理，用于实现对企业销售收入、税金、利润的实现、提留、 上交的管理和控制，充分发挥会计信息系统的管理和控制职能。管理型财务软件 以财务管理的效果反映企业的管理整体水平。 企业发展以企业盈利和现金流入为 基础，通过财务分析和财务预测得出的财务指标， 能准确的计算出企业的盈利能 力，并由此反映企业管理的整体水平。从而加强对企业的管理，优化管理结构， 实现效益最大化。效果展示图目录一、 登陆界面设计二、表文件展示1、摘要库2、科目代码库3、凭证库三

9、、数据库展示四、程序设计（一）、凭证设计1、凭证格式设计2、凭证录入设计3、凭证查询设计（二）、科目代码设计1、科目代码查询设计2、科目代码汇总设计（三）、日记账设计1、现金日记账2、银行日记账（四）、报表设计1、资产负债表格设计2、资产负债程序设计3、利润表格式设计4、利润表程序设计登陆界面设计、表文件展示1、摘要库2、科目代码库3、凭证库作艮行存熟；：80Q.DQ“骐停朦一二匚而：期二12/02/12 :001ie/wFe' 1«kelEAH/fe UL2/M/12： 112/05/12 !0D4nriBiBHHBiHHririni'irinei1/05/12 ；

10、QQ4ran :忖；(/oca 600.00：o oora凭证麻Eq I Fch. IPrljc I Ef I Kndn IKmc12/01/2012京帆F)系羯旧显示M Zfe(T)程序(P)表&T(W)如前HJ» MitrOMfi Vi&ual FoxPro凭证库铠加B一帆数据定!凭证库1记录：1/弘ExcIuee v«W峡收收收付一一 F1 4 $ 00.0000国1国Pl昌I囚结I3l嘲趣I +1 “靖I |KraHKft»J回蜃I曜1阊jH酸I Jj”短明僧靛二匚二二二工i00 00；E艮在/愚一,ioMoif而:刘婿本|： LOOQ叩Q

11、D| lOfflQ.DO!，1 r，r，h if nt bi ra e h， r rn hi r ra ui hi e in bi ra in h， r* rn 1 I ra in hi e ia !上 e hi t1i r e m h:怛行存敷! I imoo on16/12 ：006房而5!1«侍比题诃声损益！ 2S00.00；12/06/12 j逼 谯 005应星讦折回!3500. OOJO.DD二二;【二；" """ """*十二二工""二"二=12/08/12006血.006

12、6711营北外支出2500.001e/08/12006;忖0061901待处理购户损益2500.DO1/09/12007007侬生存两品imao.oD1/09/12gd(HT0012221应麦相雷iToa.oo0.0D12/09/12DOT福23D2应倾局Ol 0011700.0012/1Q/I2oce收0001002银行存增11TO0.000.0012/1U/I2o®而000曲蜒青Q> 0011700 0012/11/LZcm付0091601碓期23400.000 001Z/11/I2m"府«009IW2服行存盆ii.ijb23加口 001Z/12/12n

13、i:靖nn蕨11限辆隹san,叩n nn工药由位OJOCIOww管明前iebo.0012/12/120ICoib区11布，虹善曲muu i ramviBranaHBiama./»!,产，/由 Af iid ,i P' 1 1鼻 MA弼其他IEJ到建®.添加.如匚.邂虹二移去。jd桂痫三、数据库展示Microsoft Visual FoxPro四、程序设计（一）、凭证设计1、凭证格式设计程序码:set talk off clear n=11IIa1="a2="|II"a3="|I I I I"a4="|I I

14、 I I"10,10 say al do whil n<=18 n,10 say a2n+1,10 say a3 n=n+2 endd19,10 say a220,10 say a4宋体",205,38 say "记账凭证"font9,12 say "凭证类别：”9,30 say "日期:"9,46 say "凭证号;"9,66 say "附件张数：”11,17 say "摘要"11,31 say "会计科目"11,49 say "借方金额

15、"11,68 say "贷方金额"19,17 say "合计"21,12 say "记账："+space(12)+" 审核:"+space(12)+” 出纳:"+space(12)+” 制单:"2、凭证录入设计程序码：set talk offdo e:20109920422 欧阳一帆凭证格式设计.prgzy1=spac(3)zy2=spac(3)km1=spac(20)km2=spac(20)dm1=spac(4)je1=0dm2=spac(4)je2=0pzlx1="&qu

16、ot;rq1=spac(8) pzh1=spac(5) fjzs="" xg="y" jx="y" do whil jx="y" do whil xg="y" 9,21 get pzlxl 9,36 get rq1 9,60 get pzh1 9,80 get fjzs readuse e:20109920422 欧阳一帆摘要库 13,15 get zy1readloca for zy1=zynr 13,15 say zy1 zy2=zy1use use e:20109920422 欧阳一帆 科

17、目代码库 13,35 get dm113,50 get je1 readloca for dm1=kmdm if foun()13,35 say kmmc km1=kmmc13,50 say je1 endi15,15 get zy215,35 get dm215,70 get je2 readloca for dm2=kmdm if foun()15,35 say kmmc km2=kmmc15,70 say je2 endiuse25,10 say"是否彳改"get xg read if xg="y" loopelseexitendiendduse

18、e:20109920422 欧阳一帆凭证库appe blanrepl kmmcwith km1,kmdm with dm1,zy with zy1,jfje with je1,pzlx with pzlx1,rq with rq1,pzh with pzh1appe blanrepl kmmcwith km2,kmdm with dm2,zy with zy2,dfje with je2,pzlx with pzlx1,rq with rq1,pzh with pzh1use26,10 say "是否继续输入第二张凭证"get jxreadif jx="y&quo

19、t;do e:20109920422 欧阳一帆凭证格式.prgxg="y"9,80 get pzh19,21 get pzlx19,36 get rq19,60 get fjzsloopelseexitendiendduse e:20109920422 欧阳一帆凭证库listuseset talk onreturn3、凭证查询设计程序码：set talk off clearuse e:20109920422欧阳一帆凭证库.dbfrq1=spac(8)pzh1=spac(3)pzlx1=spac(2)zynr1=space(20)1,4 say "请输入凭证日期：&

20、quot;get rq13,4 say "请输入凭证号："get pzh15,4 say "请输入凭证类型："get pzlx1 readifallt(DTOC(rq)尸allt(dtoc(rq1).and.allt(pzh尸allt(pzh1).and.allt(pzlx尸allt(pzl x1)9,19 say pzlx19,40 say rq19,68 say pzh113,15 say zy13,45 say kmmc13,76 say jfjeskip15,15 say zy15,45 say kmmc15,98 say dfjeelsemes

21、sagebox （"没有符合条件的凭证"） endifset talk onreturn（二）科目代码设计1、科目代码查询设计程序码：set talk offuse "e:20109920422 欧阳一帆科目代码库.dbf"dm=space（4）do while .t.cleardo while .t.10,10 say"请输入科目代码"get dmreada=messageb（"请确认输入的科目代码",4）if a=6locate for kmdm=dmexitendifenddif eof（）15,15 say

22、 "对不起，你输入的代码不存在"else20,20 say kmmcendia=messageb（"是否继续查看",4）if a=7exitendienddset talk onretu2、科目代码汇总设计程序码:set talk offcleara=0b=0ye=0kmdm=space(8)select 1use e:20109920422 欧阳一帆凭证库.dbfselect 2use e:20109920422 欧阳一帆 科目汇总表.dbfdo while !eof()kmdm1=kmdmselect 1sum jfje to a for kmdm=

23、kmdm1sum dfje to b for kmdm =kmdm1select 2repla bqjf with a,bqdf with bye=qcjf+bqjf-qcdf-bqdfif ye>=0repla qmjf with yeelserepla qmdf with ye*(-1)endifskipenddolistj1=0d1=0sum bqjf to j1sum bqdf to d1if j1=d1messagebox("试算平衡")elsemessagebox("试算不平衡，请检查!")endifuseselect 1useset

24、talk on（三）日记账设计1、现金日记账程序码：set talk offclearq1=spac(10)zy1=spac(4)pzh1=spac(3)jfje1=0dfje1=0ye1=45401.25kmdm=spac(4)sele 1use e:20109920422 欧阳一帆凭证库sele 2use e:20109920422 欧阳一帆 现金日记账sele 1do whil!eof()if subs(kmdm,1,4)="1001"rq1=rqzy1=zypzh1=pzhjfje1=jfjedfje1=dfjesele 2ye1=yeskip 1 dele res

25、t pack appe blanrepl rq with rq1,zy with zy1, pzh with pzh1,jfje with jfje1,dfje with dfje1,ye with ye1+jfje1-dfje1endisele 1 skip enddusesele 2a=0b=0sum jfje to asum dfje to b appe blan repl rq with A2012/12/13,zy with zy1 ,pzh with pzh1,jfje with a ,dfje with b ,ye with yel+jfjel-dfjel list use se

26、t talk on retu2、银行日记账园室;下日记低甲阳s«t t-tlk cffl422I1郃日一机与用行日记M. P"卜土11口樽 冷 1 5 T 9 Hn n- rt- -u IX V*-14 1A -1- 1A £fiaa-UQWUOOOOOO o o o- 1 1- JJ 1- .1 Baaaaaogu。|文件旧褊韩El逝M格式生工fl业程序(P)宏口”即即时 口国W & :：,甚南飞|川门I |比|因丽内段榔三宜囱 咻制幅I t|记碧眼 1 12/03/12Z 12/C2/IE 34 12/05/125 12/10/12B 12/11/12

27、 7 12/13：/B】卬1写/|£9 32/15/1210 12/1S/I£II 12/17/1212 12/15/IE.TT.TE OlDO i.DO3QDOOO 000.00 ilTM.DOOi.DO cl onO.QOO.ffi&67023. S360cLm5664Z3.33r、小台同口第i0 8晓W的10000 m65&123.830.006CS123.83234£10,00644723. S3qfiOD CO6<OI123. S35000 COB3123.i53.门向事皿0印电c (10)iyJ=5pic (4)pihl=spa.

28、i： (3)j£j.ij|=Odfj«l=Oyd=56TaZ3 的皿仁二机(4)sele 1USE £201巡2口侬目郎0一现独证库£41 a 2UM. u：即LCMWM22后;ja-帆4垠行日班,ala 1,I计 计新建叨.A添加®.酶道格式zJ丽酬®文相|英|代科其他| u程序码：set talk offclearq1=spac(10)zy1=spac(4)pzh1=spac(3)jfje1=0dfje1=0ye1=567023.83kmdm=spac(4)sele 1use e:20109920422 欧阳一帆凭证库sele 2

29、use e:20109920422 欧阳一帆 银行日记账 sele 1do whil!eof()if subs(kmdm,1,4)="1002"rq1=rqzy1=zypzh1=pzhjfje1=jfjedfje1=dfjesele 2ye1=yeskip 1dele restpackappe blanrepl rq with rq1,zy with zy1,pzh with pzh1,jfje with jfje1,dfje with dfje1,ye with ye1+jfje1-dfje1 endisele 1 skip endd use sele 2 a=0 b=0

30、 sum jfje to a sum dfje to b appe blanrepl rq withA2012/12/15,zywith zy1,jfje with a ,dfje with b ,ye withye1+jfje1-dfje1 list use set talk on retu（四）报表设计1、资产负债表格式设计程序码:set talk offclean=3a1=""a2="|IIII"a3="|IIIIII"3,8 say aln=4do while n<=34n,8 say a2n+1,8 say a3n=n

31、+2endd0,58 say "资产负债表"font " 宋体",162,12 say "编制单位"2,60 say "年 月日"2,100 say "单位：元"4,20 say "资 产"4,40 say "期初余额"4,70 say "期末余额"4,90say "负债与股东权益"4,125 say "期初余额"4,145say "期末余额"6,10 say "流动

32、资产"6,90 say "流动负债"8,12 say "货币资金"10,12 say "预付帐款"12,12 say "应收账款"14,12 say "存货"16,10 say "待摊费用"20,10 say "非流动资产"20,12 say "长期股权投资"22,12 say "固定资产"24,12 SAY ”固定资产原值"26,12 SAY"减：累计折旧"34,14 say

33、 "资产总计"8,90say "短期借款"10,90 say "应付帐款"12,90say "其他应付款"14,90 SAY"应付工资"16,90 SAY"应交税金"18,90 say "应付股利"20,90 say "非流动负债”22,90 say "长期彳t款"24,90 say "所有者权益"26,90 say "实收资本"28,90say "资本公积"30,9

34、0say "盈余公积"32,90 say "未分配利润"34,90say "负债及股东权益合计2、资金负债表程序设计程序码：set talk offcleardo e:20109920422 欧阳一帆资产负债表格式hs=space(2)kmdm1=space(4)select 1use e:20109920422 欧阳一帆 科目汇总表.dbfselect 2use e:20109920422 欧阳一帆资产负债表.dbfselect 1sum qcjf to al for kmdm="1001”.or.kmdm="1002”.

35、or.kmdm="1012sum qcjf to a2 for kmdm="1123"sum qcjf to a3 for kmdm="1122"sum qcjf to a4 for kmdm="1405”.or.kmdm="1403"sum qcjf to a5 for kmdm="1801"sum qcjf to a6 for kmdm="1601"sum qcdf to a7 for kmdm="1602"x1=a1+a2+a3+a4+a5+a6-a

36、7sum qcdf to a8 FOR kmdm="2001"sum qcdf to a9 for kmdm="2202"sum qcdf to a10 for kmdm="2241"sum qcdf to a11 for kmdm="2211"sum qcdf to a12 for kmdm="2221"sum qcdf to a13 for kmdm="4001"sum qcjf to a14 for kmdm="410401"sum qcdf to

37、a15 for kmdm="2232"sum qcdf to a16 for kmdm="4101"X2=a8+a9+a10+a11+a12+a13-a14+a15+a16sum qmjf to bl for kmdm="1001".or.kmdm="1002".or.kmdm="1012sum qmjf to b2 for kmdm="1123"sum qmjf to b3 for kmdm="1122"sum qmjf to b4 for kmdm="

38、1405”.or.kmdm="1403"sum qmjf to b5 for kmdm="1801"sum qmjf to b6 for kmdm="1601"sum qmdf to b7 for kmdm="1602"y1=b1+b2+b3+b4+b5+b6-b7sum qmdf to b8 for kmdm="2001"sum qmdf to b9 for kmdm="2202"sum qmdf to b10 for kmdm="2241"sum qm

39、df to b11 for kmdm="2211"sum qmdf to b12 for kmdm="2221"sum qmdf to b13 for kmdm="4001"sum qmjf to b14 for kmdm="410401"sum qmdf to b15 for kmdm="2232"sum qmdf to b16 for kmdm="4101"y2=b7+b8+b9+b10+b11+b12+b13-b14+b15+b16select 2packrepl qc

40、s with a1 FOR XM =" 货币资金"repl qcs with a2 FOR XM="预付账款"repl qcs with a3FOR XM ="应收账款"repl qcs with a4FOR XM ="存货"repl qcs with a5FOR XM ="待摊费用"repl qcs with a6FOR XM ="固定资产原值"repl qcs with a7FOR XM ="累计折旧"repl qcs with x1FOR XM =&

41、quot;资产合计"repl qms with b1FOR XM ="货币资金"repl qms with b2FOR XM ="预付款"repl qms with b3 FOR XM ="应收账款"repl qms with b4FOR XM ="存货"repl qms with b5FOR XM ="待摊费用"repl qms with b6FOR XM ="固定资产原值"repl qms with b7FOR XM ="累计折旧"repl

42、qms with y1FOR XM ="资产合计"短期借款"应付账款”其他应付款"应付工资"应交税金"实收资本"未分配利润”负债及股东权益合计短期借款"应付账款”其他应付款"应付工资"应交税金"实收资本"未分配利润”负债及股东权益合计repl qcs with a8 FOR XM =" repl qcs with a9 FOR XM =" repl qcs with a10 FOR XM =" repl qcs with all FOR XM =

43、" repl qcs with a12 FOR XM =" repl qcs with a13 FOR XM =" repl qcs with a14 FOR XM =" repl qcs with x2 FOR XM =" repl qms with b8 FOR XM =" repl qms with b9 FOR XM =" repl qms with b10 FOR XM = repl qms with b11 FOR XM = repl qms with b12 FOR XM = repl qms with b13

44、 FOR XM = repl qms with b14 FOR XM = repl qms with y2 FOR XM =" 8,40 say a1 10,40 say a2 12,40 say a3 14,40 say a4 16,40 say a5 24,40 say a6 26,40 SAY a7 34,34 say x1 8,125 say a8 10,125say a9 12,125 say a10 14,125 say a11 16,125 say a12 18,125 say a15 28,128 say a13 30,128 say a14 32,128 say a

45、16 34,128 say x2 8,70 say b1 10,70 say b2 12,70 say b3 14,70 say b4 16,70 say b5 24,70 say b6 26,70 SAY b7 34,70 say y1 8,145 say b8 10,145 say b912,145 say b1014,145 say b1116,145 say b1218,145 say b1528,145 say b1330,145 say b1432,145 say b1634,145say y2if y1=y2 or x1=x2messagebox（"资产负债表平衡！请退

46、出！"）elsemessagebox（"资产负债表不平衡！请检查!"） endifselect 1useset talk onretu3、利润表格式设计程序码：set talk offclearn=3a1="'a2="|"a3="|"3,8 say aln=4do while n<=34n,8 say a2n+1,8 say a3n=n+2endd0,50 say "禾1J润表"font" 宋体",162,12 say"编制单位"2,50 s

47、ay "年 月 日"2,80 say "单位：元"4,20 say "项目"4,55 say "本月数"6,12 say " 一、营业收入"8,14 say "减：营业成本"10,16 say "营业税金及附加"12,16 say "销售费用"14,16 say "管理费用"16,16 say "财务费用"18,16 say "资产减值损失"20,14 say "力口

48、：公允价值变动收益22,16 say "投资收益"24,12 say "二、营业利润"26,14 say "力口 ：营业外收入"28,14 say "减：营业外支出"30,12 say "三、禾U润总额"32,16 say "减：所得税费用"34,12 say "四、净利润"4、利润表程序设计程序码:set talk offcleardo e:20109920422 欧阳一帆利润表格式store 0 to a,b,c,d,e,f,g,h,i,j,k,l,b1,b2,b3