会计信息系统课程设计报告28666.docx

南华大学会计信息系统课课程设计报告告一、概述根据会计信息系系统课程开发发设计的要求求，我们参加加了学院组织织的为期一周周的会计信息息系统课程设设计实践。在在这个过程中中我更加深入入的了解到了了会计信息系系统这门课程程。根据系统统生命周期法法，完成了系系统的系统分分析任务和设设计任务。以以下就是我的的课程设计报报告。二、会计信息系系统的开发21世纪是信息息化的时代，经经济的信息化化关键是经济济的信息化，而而信息化建设设中的90%的信息来源源于会计信息息，会计信息息绝大多数是是由会计信息息系统提供的的。随着计算算机和信息技技术的广泛应应用，会计工工作经历了从从手工到会计计信息化这一一发展过程。会会计信息系统统的建设将为为经营管理、控控制决策和经经营运行提供供充足、实时时、全方位的的信息。会计信息系统是是一个面向企企业价值的信信息系统，是是从对企业价价值运动进行行反应和监督督的角度提出出信息处理和和管理需求的的信息系统。它它是利用信息息技术队会计计数据进行采采集、储存和和处理，完成成会计核算任任务，并提供供会计管理、分分析、决策所所需的辅助信信息的系统。在ERP环境下，会计信息系统不是一个独立的子系统，其大部分功能已经融入ERP系统，会计工作中常规的、可程序化的任务都将由各个功能模块和会计功能模块自动处理，同时软件系统还会帮助会计人员完成许多内部控制等管理任务。信息系统开发的的目标是以较较少的投资在在较短时向获获得一个使用用、高效、可可靠、易维护护的系统。软软件工程就是是研究如何运运用科学的方方法和手段去去达到这个目目标。会计信信息系统的开开发是指研制制和建立一个个经济有效的的会计信息系系统。其开发发的目 标是改善和和提高企业的的经济管理现现代化水平；提高会计信信息来源的准准确性；为企企业及上级提提供准确及时时和全面的各各种财务报表表；加快财会会计划和计算算机辅助财务务决策工作，促促使会计决策策科学化，以以提高企业经经济效益。三、会计信息系系统的系统分分析系统分析阶段的的基本任务是是：系统分析析员与用户在在一起，充分分了解用户的的要求，并把把双方的理解解用系统说明明书表达出来来。统分析是是研制信息系系统最重要的的阶段，也是是最困难的阶阶段。系统分分析要回答新新系统“做什么”这个关键性性的问题。只只有明确了问问题，才有可可能解决问题题；否则，方方向不明，无无的放矢。系系统分析的主主要任务是将将在系统详细细调查中所得得到的文档资资料集中在一一起，对组织织内部整体管管理状况和信信息处理过程程进行分析。它它侧重于从业业务全过程的的角度进行分分析。分析的的主要内容是是：业务和数数据的流程是是否通畅，是是否合理，数数据、业务过过程和实现管管理功能之间间的关系，原原有系统管理理模式改革和和新系统管理理方法的实现现是否具有可可行性等。（1）、会计信信息系统的可可行性研究。目目的在于以最最小的代价在在尽可能短时时间内解决问问题。1、对系统开发发进行可行性性分析。系统统分析的第一一步就是要论论证系统开发发的可能性，做做出可行性分分析报告。2、详细调查现现行系统。系系统分析的第第二步就是对对新会计信息息系统的基础础现行会计计信息系统进进行详细的调调查，搞清现现行会计信息息系统的边界界、组织机构构、人员分工工、业务流程程、各种帐、证证、表的格式式、种类即处处理过程。3、描述现行系系统。在进行行详细系统调调查的基础上上，用规定的的图表、文字字描述线性系系统，得出现现行会计信息息系统的逻辑辑模型。4、分析用户的的要求，改进进现行模型，形形成新系统逻逻辑模型。对对现行会计信信息系统的逻逻辑模型进行行分析，根据据计算机的特特点，改进旧旧模型中不合合理之处，增增设新的功能能，得出新系系统的逻辑模模型，包括建建立新系统的的数据流图，规规定新系统的的数据存储策策略、输入输输出格式、运运行环境和系系统的性能。（2）、会计信信息系统的需需求分析。需需求分析是生生命周期模型型中的关键步步骤。需求分分析的主要任任务：“理解”和“表达”。1、对现现有系统的详详细调查和描描述：包括收收集原系统的的各种单据、账账簿、报表等等的样本，了了解原有系统统的组织结构构、信息流程程、信息量、信信息处理步骤骤和结果、资资源利用现状状、管理方式式以及系统的的内外部环境境，导出原有有系统的物理理模型，基本本符号及实例例描述。2、识识别原有系统统的逻辑模型型。3、建立立新系统的逻逻辑模型。44、需求分析析的明确表达达：撰写规格格说明书。四、会计信息系系统的系统设设计会计信息系统具具有对信息的的加工和传递递功能。对财财务信息的加加工是通过会会计的活动而而实现。系统统设计也叫物物理设计。系系统设计是解解决“怎么做”的问题，即即根据系统的的逻辑模型进进行物理设计计，包括系统统配置设计、模模块结构设计计、数据及文文件设计、代代码设计、人人机界面设计计、内部控制制设计、算法法设计、系统统安全设计。系系统设计的目目标是保证实实现系统功能能的前提下尽尽量提高系统统的工作质量量、运行效率率、可靠性和和可维护性。五、会计信息系系统设计的意意义 随着着信息时代的的到来，企业业竞争日益加加剧，这就要要求企业对市市场的反映更更及时、更准准确。为了及及时把握市场场，企业越来来越需要管理理信息，这已已成为企业成成败的关键，核核算型系统提提供信息的滞滞后性远不能能满足现代企企业对信息的的需求，因此此管理型系统统的产生即是是必然。管理理型会计信息息系统是一个个以计算机和和信息处理技技术为手段，以以管理会计的的模型为基本本方法，对企企业中的内部部物流及外部部变化信息进进行收集、传传递、存储、加加工、维护和和使用的人机机系统。它能解析企业业的历史数据据并能预测未未来，为企业业管理中的结结构化、半结结构化和非结结构化的决策策问题提供信信息支持，并并利用系统反反馈的信息帮帮助企业管理理人员控制和和管理企业的的行为，以实实现加强经营营管理，提高高经济效益的的目的。管理理型系统主要要侧重于资金金、成本、销销售收入、利利润的管理，用用于实现对企企业销售收入入、税金、利利润的实现、提提留、上交的的管理和控制制，充分发挥挥会计信息系系统的管理和和控制职能。管管理型财务软软件以财务管管理的效果反反映企业的管管理整体水平平。企业发展展以企业盈利利和现金流入入为基础，通通过财务分析析和财务预测测得出的财务务指标，能准准确的计算出出企业的盈利利能力，并由由此反映企业业管理的整体体水平。从而而加强对企业业的管理，优优化管理结构构，实现效益益最大化。效果展示图目录录一、 登陆界面设计二、 表文件展示1、 摘要库2、 科目代码库3、 凭证库三、 数据库展示四、 程序设计（一）、凭证设设计1、凭证格式设设计2、凭证录入设设计3、凭证查询设设计（二）、科目代代码设计1、科目代码查查询设计2、科目代码汇汇总设计（三）、日记账账设计1、现金日记账账2、银行日记账账（四）、报表设设计1、资产负债表表格设计2、资产负债程程序设计3、利润表格式式设计4、利润表程序序设计一、 登陆界面设计二、表文件展示示1、 摘要库2、 科目代码库3、 凭证库三、数据库展示示四、 程序设计（一）、凭证设设计1、凭证格式设设计程序码：set tallk offfclearn=11a1=" _""a2="| | | | |" a3="|_|_|_|_|"a4="|_|_|_|_|"10,10 say aa1do whill n<=118n,10 ssay a22n+1,100 say a3n=n+2endd19,10 say aa220,10 say aa45,38 ssay "记记账凭证" fonnt "宋体体",209,12 ssay "凭凭证类别:"9,30 ssay "日日期:"9,46 ssay "凭凭证号;"9,66 ssay "附附件张数:"11,17 say ""摘要"11,31 say ""会计科目"11,49 say ""借方金额"11,68 say ""贷方金额"19,17 say ""合计"21,12 say ""记账:"+sspace(12)+""审核:"+sspace(12)+""出纳:"+sppace(112)+"制制单:"2、凭证录入设设计程序码：set tallk offfdo e:22010999204222欧阳一帆凭证格式设设计.prggzy1=spaac(3)zy2=spaac(3)km1=spaac(20)km2=spaac(20)dm1=spaac(4)je1=0dm2=spaac(4)je2=0pzlx1="" "rq1=spaac(8)pzh1=sppac(5)fjzs=" "xg="y"jx="y"do whill jx=""y"do whill xg=""y"9,21 gget pzzlx19,36 gget rqq19,60 gget pzzh19,80 gget fjjzsreaduse e:2010999204222欧阳一帆帆摘要库13,15 get zzy1readloca foor zy11=zynrr13,15 say zzy1zy2=zy11useuse e:2010999204222欧阳一帆帆科目代码码库13,35 get ddm113,50 get jje1readloca foor dm11=kmdmmif founn()13,35 say kkmmckm1=kmmmc13,50 say jje1endi15,15 get zzy215,35 get ddm215,70 get jje2readloca foor dm22=kmdmmif founn()15,35 say kkmmckm2=kmmmc15,70 say jje2endiuse25,10 say"是是否修改" get xxgreadif xg=""y"loopelseexitendiendduse e:2010999204222欧阳一帆帆凭证库appe bllanrepl kmmmc wiith kmm1,kmddm witth dm11,zy wwith zzy1,jffje wiith jee1,pzllx witth pzllx1,rqq withh rq1,pzh wwith ppzh1appe bllanrepl kmmmc wiith kmm2,kmddm witth dm22,zy wwith zzy2,dffje wiith jee2,pzllx witth pzllx1,rqq withh rq1,pzh wwith ppzh1use26,10 say ""是否继续输输入第二张凭凭证" geet jxreadif jx=""y"do e:22010999204222欧阳一帆凭证格式.prgxg="y"9,80 gget pzzh19,21 gget pzzlx19,36 gget rqq19,60 gget fjjzsloopelseexitendiendduse e:2010999204222欧阳一帆帆凭证库listuseset tallk onreturn3、凭证查询设设计程序码：set tallk offf clear use e:2010999204222欧阳一帆帆凭证库.dbfrq1=spaac(8)pzh1=sppac(3)pzlx1=sspac(22)zynr1=sspace(20)1,4 saay "请输输入凭证日期期:"gett rq13,4 saay "请输输入凭证号:"get pzh15,4 saay "请输输入凭证类型型:"gett pzlxx1read if alltt(DTOCC(rq)=alltt(dtocc(rq1).andd.alltt(pzh)=alltt(pzh11).andd.alltt(pzlxx)=alllt(pzllx1)9,19 ssay pzzlx19,40 ssay rqq19,68 ssay pzzh113,15 say zzy 13,45 say kkmmc13,76 say jjfje skip 15,15 say zzy 15,45 say kkmmc15,98 say ddfje else messageebox ("没有符合合条件的凭证证")endifset tallk on return（二）科目代码码设计1、科目代码查查询设计程序码：set tallk offfuse "e:2010099204422欧阳一一帆科目代代码库.dbbf"dm=spacce(4)do whille .t.clear do whille .t.10,10 say"请请输入科目代代码" geet dmreada=messaageb(""请确认输入入的科目代码码",4)if a=6locate for kkmdm=ddmexitendifenddif eof()15,15 say ""对不起 ,你输入的代代码不存在""else20,20 say kkmmcendia=messaageb(""是否继续查查看",4)if a=7exitendienddset tallk onretu2、科目代码汇汇总设计程序码：set tallk offfcleara=0b=0ye=0kmdm=sppace(88)select 1use e:22010999204222欧阳一帆凭证库.ddbf select 2use e:2010999204222欧阳一帆帆科目汇总总表.dbffdo whille !eoof()kmdm1=kkmdmselect 1sum jfjje to a forr kmdmm=kmdmm1sum dfjje to b forr kmdmm =kmddm1select 2repla bbqjf wwith aa,bqdff withh bye=qcjff+bqjff-qcdff-bqdffif ye>=0repla qqmjf wwith yyeelserepla qqmdf wwith yye*(-11)endifskipenddolistj1=0d1=0sum bqjjf to j1sum bqddf to d1if j1=dd1messageebox(""试算平衡"")elsemessageebox(""试算不平衡衡,请检查!")endifuseselect 1useset tallk on（三）日记账设设计1、现金日记账账程序码：sett talkk offclearq1=spaac(10)zy1=spaac(4)pzh1=sppac(3)jfje1=00dfje1=00ye1=454401.255kmdm=sppac(4)sele 1use e:2010999204222欧阳一帆帆凭证库sele 2use e:2010999204222欧阳一帆帆现金日记记账sele 1do whill!eof()if subss(kmdmm,1,4)="10001"rq1=rqzy1=zypzh1=pzzhjfje1=jjfjedfje1=ddfjesele 2ye1=yeskip 1dele reestpackappe bllanrepl rqq withh rq1,zy wiith zyy1, pzzh witth pzhh1,jfjje witth jfjje1,dffje wiith dffje1,yye witth ye11+jfjee1-dfjje1endisele 1skipenddusesele 2a=0b=0sum jfjje to asum dfjje to bappe bllanrepl rqq withh 20012/122/13,zy wiith zyy1 ,pzzh witth pzhh1,jfjje witth a ,dfje with b ,yee withh ye1+jfje11-dfjee1listuseset tallk onretu2、银行日记账账程序码：set tallk offfclearq1=spaac(10)zy1=spaac(4)pzh1=sppac(3)jfje1=00dfje1=00ye1=5677023.883kmdm=sppac(4)sele 1use e:2010999204222欧阳一帆帆凭证库sele 2use e:2010999204222欧阳一帆帆银行日记记账sele 1do whill!eof()if subss(kmdmm,1,4)="10002"rq1=rqzy1=zypzh1=pzzhjfje1=jjfjedfje1=ddfjesele 2ye1=yeskip 1dele reestpackappe bllanrepl rqq withh rq1,zy wiith zyy1,pzhh withh pzh11,jfjee withh jfjee1,dfjje witth dfjje1,yee withh ye1+jfje11-dfjee1endisele 1skipenddusesele 2a=0b=0sum jfjje to asum dfjje to bappe bllanrepl rqq withh 20012/122/15,zy wiith zyy1,jfjje witth a ,dfje with b ,yee withh ye1+jfje11-dfjee1listuseset tallk onretu（四）报表设计计1、资产负债表表格式设计程序码：set tallk offf clean=3a1="_"a2="| | | | | | |""a3="|_|_|_|_|_|_|""3,8 saay a1n=4do whille n<=34n,8 saay a2n+1,8 say aa3n=n+2endd0,58 ssay "资资产负债表"" fontt "宋体"",162,12 ssay ""编制单位""2,60 ssay "年年 月 日"2,100 say ""单位： 元元"4,20 ssay "资资 产"4,40 ssay "期期初余额"4,70 ssay "期期末余额"4,90saay "负债债与股东权益益"4,125 say ""期初余额""4,145ssay "期期末余额"6,10 ssay "流流动资产"6,90 ssay "流流动负债"8,12 ssay "货货币资金"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 ""资产总计""8,90saay "短期期借款"10,90 say ""应付帐款""12,90ssay "其其他应付款""14,90 SAY ""应付工资""16,90 SAY ""应交税金""18,90 say ""应付股利""20,90 say ""非流动负债债"22,90 say ""长期借款""24,90 say ""所有者权益益"26,90 say ""实收资本""28,90ssay "资资本公积"30,90ssay "盈盈余公积"32,90 say ""未分配利润润"34,90ssay "负负债及股东权权益合计"2、资金负债表表程序设计程序码:set tallk offfcleardo e:22010999204222欧阳一帆资产负债表表格式hs=spacce(2)kmdm1=sspace(4)select 1use e:2010999204222欧阳一帆帆科目汇总总表.dbffselect 2use e:2010999204222欧阳一帆帆资产负债债表.dbff select 1sum qcjjf to a1 foor kmddm="10001".oor.kmddm="10002".oor.kmddm="10012"sum qcjjf to a2 foor kmddm="11123"sum qcjjf to a3 foor kmddm="11122"sum qcjjf to a4 foor kmddm="14405".oor.kmddm="14403"sum qcjjf to a5 foor kmddm="18801"sum qcjjf to a6 foor kmddm="16601"sum qcddf to a7 foor kmddm="16602"x1=a1+aa2+a3+a4+a55+a6-aa7sum qcddf to a8 FOOR kmddm="20001"sum qcddf to a9 foor kmddm="22202"sum qcddf to a10 ffor kmmdm="22241"sum qcddf to a11 ffor kmmdm="22211" sum qcddf to a12 ffor kmmdm="22221"sum qcddf to a13 ffor kmmdm="44001"sum qcjjf to a14 ffor kmmdm="44104011"sum qcddf to a15 ffor kmmdm="22232"sum qcddf to a16 ffor kmmdm="44101"x2=a8+aa9+a100+a11+a12+aa13-a114+a155+a16sum qmjjf to b1 foor kmddm="10001".oor.kmddm="10002".oor.kmddm="10012"sum qmjjf to b2 foor kmddm="11123"sum qmjjf to b3 foor kmddm="11122"sum qmjjf to b4 foor kmddm="14405".oor.kmddm="14403"sum qmjjf to b5 foor kmddm="18801"sum qmjjf to b6 foor kmddm="16601"sum qmddf to b7 foor kmddm="16602"y1=b1+bb2+b3+b4+b55+b6-bb7sum qmddf to b8 foor kmddm="20001"sum qmddf to b9 foor kmddm="22202"sum qmddf to b10 ffor kmmdm="22241"sum qmddf to b11 ffor kmmdm="22211"sum qmddf to b12 ffor kmmdm="22221"sum qmddf to b13 ffor kmmdm="44001"sum qmjjf to b14 ffor kmmdm="44104011"sum qmddf to b15 ffor kmmdm="22232"sum qmddf to b16 ffor kmmdm="44101"y2=b7+bb8+b9+b10+bb11+b112+b133-b14+b15+bb16select 2packrepl qccs witth a1 FOR XXM ="货货币资金"repl qccs witth a2 FOR XXM="预付付账款"repl qccs witth a3 FOR XXM ="应应收账款"repl qccs witth a4 FOR XXM ="存存货"repl qccs witth a5 FOR XXM ="待待摊费用"repl qccs witth a6 FOR XXM ="固固定资产原值值"repl qccs witth a7 FOR XXM ="累累计折旧"repl qccs witth x1 FOR XXM ="资资产合计"repl qmms witth b1 FOR XXM ="货货币资金"repl qmms witth b2 FOR XXM ="预预付款"repl qmms witth b3 FOR XM =""应收账款""repl qmms witth b4 FOR XXM ="存存货"repl qmms witth b5 FOR XXM ="待待摊费用"repl qmms witth b6 FOR XXM ="固固定资产原值值"repl qmms witth b7 FOR XXM ="累累计折旧"repl qmms witth y1 FOR XXM ="资资产合计"repl qccs witth a8 FOR XXM ="短短期借款"repl qccs witth a9 FOR XXM ="应应付账款"repl qccs witth a100 FOR XM =""其他应付款款"repl qccs witth a111 FOR XM =""应付工资""repl qccs witth a122 FOR XM =""应交税金""repl qccs witth a133 FOR XM =""实收资本""repl qccs witth a144 FOR XM =""未分配利润润"repl qccs witth x2 FOR XM =""负债及股东东权益合计""repl qmms witth b8 FOR XM =""短期借款""repl qmms witth b9 FOR XXM ="应应付账款"repl qmms witth b100 FOR XM =""其他应付款款" repl qmms witth b111 FOR XM =""应付工资""repl qmms witth b122 FOR XM =""应交税金""repl qmms witth b133 FOR XM =""实收资本""repl qmms witth b144 FOR XM =""未分配利润润"repl qmms witth y2 FOR XXM ="负负债及股东权权益合计"8,40 ssay a1110,40 say aa212,40 say aa3 14,40 say aa416,40 say aa524,40 say aa626,40 SAY a734,34 say xx18,125 say aa810,1255say aa912,1255 say a1014,1255 say a1116,1255 say a1218,1255 say a1528,1288 say a1330,1288 say a1432,1288 say a1634,1288 say x28,70 ssay b1110,70 say bb2 12,70 say bb314,70 say bb4 16,70 say bb524,70 say bb626,70 SAY bb734,70 say yy18,145 say bb810,1455 say b912,1455 say b1014,1455 say b1116,1455 say b1218,1455 say b1528,1455 say b1330,1455 say b1432,1455 say b1634,1455say yy2if y1=yy2 or x1=x22messageebox(""资产负债表表平衡!请退退出!")elsemessageebox(""资产负债表表不平衡!请请检查!")endif select 1use set tallk on retu3、利润表格式式设计程序码：set tallk offfclearn=3a1="_"a2="| | |""a3="|_|_|""3,8 saay a1n=4do whille n<=34n,8 saay a2n+1,8 say aa3n=n+2endd0,50 ssay "利利润表"foont"宋体体",162,12 ssay"编制制单位"2,50 ssay "年年 月 日"2,80 ssay "单单位: 元 "4,20 ssay "项项目"4,55 ssay "本本月数"6,12 ssay "一一、营业收入入"8,14 ssay "减减: 营业成成本"10,16 say ""营业税金及及附加"12,16 say ""销售费用""14,16 say ""管理费用""16,16 say ""财务费用""18,16 say ""资产减值损损失"20,14 say ""加:公允价价值变动收益益"22,16 say ""投资收益""24,12 say ""二、营业利利润"26,14 say ""加:营业外外收入"28,14 say ""减: 营业业外支出"30,12 say "