财务会计会计信息系统课程设计报告 精品文档格式.docx
《财务会计会计信息系统课程设计报告 精品文档格式.docx》由会员分享,可在线阅读,更多相关《财务会计会计信息系统课程设计报告 精品文档格式.docx(39页珍藏版)》请在冰豆网上搜索。
![财务会计会计信息系统课程设计报告 精品文档格式.docx](https://file1.bdocx.com/fileroot1/2023-2/2/2273f512-7af3-4971-978c-dc3341c7d3e7/2273f512-7af3-4971-978c-dc3341c7d3e71.gif)
2、识别原有系统的逻辑模型。
3、建立新系统的逻辑模型。
4、需求分析的明确表达:
撰写规格说明书。
四、会计信息系统的系统设计
会计信息系统具有对信息的加工和传递功能。
对财务信息的加工是通过会计的活动而实现。
系统设计也叫物理设计。
系统设计是解决“怎么做”的问题,即根据系统的逻辑模型进行物理设计,包括系统配置设计、模块结构设计、数据及文件设计、代码设计、人机界面设计、内部控制设计、算法设计、系统安全设计。
系统设计的目标是保证实现系统功能的前提下尽量提高系统的工作质量、运行效率、可靠性和可维护性。
五、会计信息系统设计的意义
随着信息时代的到来,企业竞争日益加剧,这就要求企业对市场的反映更及时、更准确。
为了及时把握市场,企业越来越需要管理信息,这已成为企业成败的关键,核算型系统提供信息的滞后性远不能满足现代企业对信息的需求,因此管理型系统的产生即是必然。
管理型会计信息系统是一个以计算机和信息处理技术为手段,以管理会计的模型为基本方法,对企业中的内部物流及外部变化信息进行收集、传递、存储、加工、维护和使用的人机系统。
它能解析企业的历史数据并能预测未来,为企业管理中的结构化、半结构化和非结构化的决策问题提供信息支持,并利用系统反馈的信息帮助企业管理人员控制和管理企业的行为,以实现加强经营管理,提高经济效益的目的。
管理型系统主要侧重于资金、成本、销售收入、利润的管理,用于实现对企业销售收入、税金、利润的实现、提留、上交的管理和控制,充分发挥会计信息系统的管理和控制职能。
管理型财务软件以财务管理的效果反映企业的管理整体水平。
企业发展以企业盈利和现金流入为基础,通过财务分析和财务预测得出的财务指标,能准确的计算出企业的盈利能力,并由此反映企业管理的整体水平。
从而加强对企业的管理,优化管理结构,实现效益最大化。
效果展示图目录
一、登陆界面设计
二、表文件展示
1、摘要库
2、科目代码库
3、凭证库
三、数据库展示
四、程序设计
(一)、凭证设计
1、凭证格式设计
2、凭证录入设计
3、凭证查询设计
(二)、科目代码设计
1、科目代码查询设计
2、科目代码汇总设计
(三)、日记账设计
1、现金日记账
2、银行日记账
(四)、报表设计
1、资产负债表格设计
2、资产负债程序设计
3、利润表格式设计
一、4、利润表程序设计
二、
三、登陆界面设计
二、表文件展示
三、数据库展示
四、
五、
六、
七、
八、程序设计
程序码:
settalkoff
clear
n=11
a1="
_______________________________________________________________________"
a2="
|||||"
a3="
|_______________|________________|_________________|____________________|"
a4="
@10,10saya1
dowhiln<
=18
@n,10saya2
@n+1,10saya3
n=n+2
endd
@19,10saya2
@20,10saya4
@5,38say"
记账凭证"
font"
宋体"
20
@9,12say"
凭证类别:
"
@9,30say"
日期:
@9,46say"
凭证号;
@9,66say"
附件张数:
@11,17say"
摘要"
@11,31say"
会计科目"
@11,49say"
借方金额"
@11,68say"
贷方金额"
@19,17say"
合计"
@21,12say"
记账:
+space(12)+"
审核:
出纳:
制单:
doe:
\20XX9920422欧阳一帆\凭证格式设计.prg
zy1=spac(3)
zy2=spac(3)
km1=spac(20)
km2=spac(20)
dm1=spac(4)
je1=0
dm2=spac(4)
je2=0
pzlx1="
rq1=spac(8)
pzh1=spac(5)
fjzs="
xg="
y"
jx="
dowhiljx="
dowhilxg="
@9,21getpzlx1
@9,36getrq1
@9,60getpzh1
@9,80getfjzs
read
usee:
\20XX9920422欧阳一帆\摘要库
@13,15getzy1
locaforzy1=zynr
@13,15sayzy1
zy2=zy1
use
\20XX9920422欧阳一帆\科目代码库
@13,35getdm1
@13,50getje1
locafordm1=kmdm
iffoun()
@13,35saykmmc
km1=kmmc
@13,50sayje1
endi
@15,15getzy2
@15,35getdm2
@15,70getje2
locafordm2=kmdm
@15,35saykmmc
km2=kmmc
@15,70sayje2
@25,10say"
是否修改"
getxg
ifxg="
loop
else
exit
\20XX9920422欧阳一帆\凭证库
appeblan
replkmmcwithkm1,kmdmwithdm1,zywithzy1,jfjewithje1,pzlxwithpzlx1,rqwithrq1,pzhwithpzh1
replkmmcwithkm2,kmdmwithdm2,zywithzy2,dfjewithje2,pzlxwithpzlx1,rqwithrq1,pzhwithpzh1
@26,10say"
是否继续输入第二张凭证"
getjx
ifjx="
\20XX9920422欧阳一帆\凭证格式.prg
@9,80getpzh1
@9,60getfjzs
list
settalkon
return
\20XX9920422欧阳一帆\凭证库.dbf
pzh1=spac(3)
pzlx1=spac
(2)
zynr1=space(20)
@1,4say"
请输入凭证日期:
getrq1
@3,4say"
请输入凭证号:
getpzh1
@5,4say"
请输入凭证类型:
getpzlx1
ifallt(DTOC(rq))=allt(dtoc(rq1)).and.allt(pzh)=allt(pzh1).and.allt(pzlx)=allt(pzlx1)
@9,19saypzlx1
@9,40sayrq1
@9,68saypzh1
@13,15sayzy
@13,45saykmmc
@13,76sayjfje
skip
@15,15sayzy
@15,45saykmmc
@15,98saydfje
messagebox("
没有符合条件的凭证"
)
endif
(二)科目代码设计
use"
e:
\20XX9920422欧阳一帆\科目代码库.dbf"
dm=space(4)
dowhile.t.
@10,10say"
请输入科目代码"
getdm
a=messageb("
请确认输入的科目代码"
4)
ifa=6
locateforkmdm=dm
ifeof()
@15,15say"
对不起,你输入的代码不存在"
@20,20saykmmc
是否继续查看"
ifa=7
retu
a=0
b=0
ye=0
kmdm=space(8)
select1
20XX9920422欧阳一帆\凭证库.dbf
select2
\20XX9920422欧阳一帆\科目汇总表.dbf
dowhile!
eof()
kmdm1=kmdm
sumjfjetoaforkmdm=kmdm1
sumdfjetobforkmdm=kmdm1
replabqjfwitha,bqdfwithb
ye=qcjf+bqjf-qcdf-bqdf
ifye>
=0
replaqmjfwithye
replaqmdfwithye*(-1)
enddo
j1=0
d1=0
sumbqjftoj1
sumbqdftod1
ifj1=d1
试算平衡"
试算不平衡,请检查!
(三)日记账设计
clea
rq1=spac(10)
zy1=spac(4)
jfje1=0
dfje1=0
ye1=45401.25
kmdm=spac(4)
sele1
sele2
\20XX9920422欧阳一帆\现金日记账
dowhil!
ifsubs(kmdm,1,4)="
1001"
rq1=rq
zy1=zy
pzh1=pzh
jfje1=jfje
dfje1=dfje
ye1=ye
skip1
delerest
pack
replrqwithrq1,zywithzy1,pzhwithpzh1,jfjewithjfje1,dfjewithdfje1,yewithye1+jfje1-dfje1
sumjfjetoa
sumdfjetob
replrqwith{^20XX/12/13},zywithzy1,pzhwithpzh1,jfjewitha,dfjewithb,yewithye1+jfje1-dfje1
ye1=567023.83
\20XX9920422欧阳一帆\银行日记账
1002"
replrqwith{^20XX/12/15},zywithzy1,jfjewitha,dfjewithb,yewithye1+jfje1-dfje1
(四)报表设计
1、资产负债表格式设计
n=3
____________________________________________________________________________________________________________________________________________________________"
|||||||"
|_____________________________|______________________|_____________________|_______________________________|_______________________|________________________|"
@3,8saya1
n=4
dowhilen<
=34
@n,8saya2
@n+1,8saya3
@0,58say"
资产负债表"
16
@2,12say"
编制单位"
@2,60say"
年月日"
@2,100say"
单位:
元"
@4,20say"
资产"
@4,40say"
期初余额"
@4,70say"
期末余额"
@4,90say"
负债与股东权益"
@4,125say"
@4,145say"
@6,10say"
流动资产"
@6,90say"
流动负债"
@8,12say"
货币资金"
@10,12say"
预付帐款"
@12,12say"
应收账款"
@14,12say"
存货"
@16,10say"
待摊费用"
@20,10say"
非流动资产"
@20,12say"
长期股权投资"
@22,12say"
固定资产"
@24,12SAY"
固定资产原值"
@26,12SAY"
减:
累计折旧"
@34,14say"
资产总计"
@8,90say"
短期借款"
@10,90say"
应付帐款"
@12,90say"
其他应付款"
@14,90SAY"
应付工资"
@16,90SAY"
应交税金"
@18,90say"
应付股利"
@20,90say"
非流动负债"
@22,90say"
长期借款"
@24,90say"
所有者权益"
@26,90say"
实收资本"
@28,90say"
资本公积"
@30,90say"
盈余公积"
@32,90say"
未分配利润"
@34,90say"
负债及股东权益合计"
2、资金负债表程序设计
程序码:
\20XX9920422欧阳一帆\资产负债表格式
hs=space
(2)
kmdm1=space(4)
select1
\20XX9920422欧阳一帆\资产负债表.dbf
sumqcjftoa1forkmdm="
.or.kmdm="
1012"
sumqcjftoa2forkmdm="
1123"
sumqcjftoa3forkmdm="
1122"
sumqcjftoa4forkmdm="
1405"
1403"
sumqcjftoa5forkmdm="
1801"
sumqcjftoa6forkmdm="
1601"
sumqcdftoa7forkmdm="
1602"
x1=a1+a2+a3+a4+a5+a6-a7
sumqcdftoa8FORkmdm="
2001"
sumqcdftoa9forkmdm="
2202"
sumqcdftoa10forkmdm="
2241"
sumqcdftoa11forkmdm="
2211"
sumqcdftoa12forkmdm="
2221"
sumqcdftoa13forkmdm="
4001"
sumqcjftoa14forkmdm="
410401"
sumqcdftoa15forkmdm="
2232"
sumqcdftoa16forkmdm="
4101"
x2=a8+a9+a10+a11+a12+a13-a14+a15+a16
sumqmjftob1forkmdm="
sumqmjftob2forkmdm="
sumqmjftob3forkmdm="
sumqmjftob4forkmdm="
sumqmjftob5forkmdm="
sumqmjftob6forkmdm="
sumqmdftob7forkmdm="
y1=b1+b2+b3+b4+b5+b6-b7
sumqmdftob8forkmdm="
sumqmdftob9forkmdm="
sumqmdftob10forkmdm="
sumqmdftob11forkmdm="
sumqmdftob12forkmdm="
sumqmdftob13forkmdm="
sumqmjftob14forkmdm="
sumqmdftob15forkmdm="
sumqmdftob16forkmdm="
y2=b7+b8+b9+b10+b11+b12+b13-b14+b15+b16
replqcswitha1FORXM="
replqcswitha2FORXM="
预付账款"
replqcswitha3FORXM="
replqcswitha4FORXM="
replqcswitha5FORXM="
replqcswitha6FORXM="
replqcswitha7FORXM="
replqcswithx1FORXM="
资产合计"
replqmswithb1FORXM="
replqmswithb2FORXM="
预付款"
replqmswithb3FORXM="
replqmswithb4FORXM="
replqmswithb5FORXM="
replqmswithb6FORXM="
replqmswithb7FORXM="
replqmswithy1FORXM="
replqcswitha8FORXM="
replqcswith