- 1、本文档共8页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
资产负债表数据处理之设计与实现
[摘要]本文以VF(VisualFoxpro)为数据库管理系统,分析与探讨了资产负
债表的设计与实现的基本原理,并提供了相应的程序代码。
[关键词]内置公式设计;函数与程序设计;资产负债表;数据处理
资产负债表(BalanceSheet)是表示企业在一定日期(通常为各会计期末)财务
状况(即资产、负债和业主权益的状况)的主要会计报表。资产负债表利用会计平
衡原则,将合乎会计原则的资产、负债、股东权益等科目分为“资产”和“负债及股
东权益”两大区块,在经过分录、转账、试算、调整等会计程序后,以特定日期的静
态企业情况为基准,浓缩成一张报表。本文以VF(VisualFoxpro)为数据库系统,分
析和说明了资产负债表的编制方法和实现过程。文中所用程序代码已通过上机验
证。
一、数据表结构与内置公式设计
1.zz.dbf(总账)的结构为:
n(c,4);y(c,2);kmbm(c,4);kmmc(c,12);qcj(n,12,2);qcd(n,12,2);
bqj(n,12,2);bqd(n,12,2);qmj(n,12,2);qmd(n,12,2)。
各字段分别对应年、月、科目编码、科目名称、期初借、期初贷、本期借、
本期贷、期末借、期末贷。
2.zcfzb.dbf(资产负债表)的结构为:
zc(c,22);hc(c,4);ncsgs(c,50);ncs(n,12,2);qmsgs(c,50);qms(n,12,2);
qy(c,22);hc1(c,4);ncsgs1(c,50);ncs1(n,12,2);qmsgs1(c,50);qms1(n,12,2)。
各字段分别对应资产、行次、年初数公式、年初数、期末数公式、期末数、
权益、权益行次、权益年初数公式、权益年初数、权益期末数公式、权益期末数。
3.资产负债表内置公式见表1。它是数据处理程序能够自动实现数据计算的
基础,需要事先设计好并放入ZCFZB.DBF中。要注意,公式中所使用的科目代码
一定要与必威体育精装版企业会计准则中的科目编号一致,并且ZZ.DBF科目中代码一定
也要与必威体育精装版企业会计准则中的科目编号一致。
二、函数设计
为了方便地实现数据自动计算,需要先编制3个函数,分别用于计算会计科目
的期初余额、期末余额以及资产负债表表内求和。
*qc()计算会计科目期初余额函数
parakmdm,n
sele1
usezz
locaallforkmbm=kmdm
ifqcj-qcd=0
da=qcj-qcd
else
da=qcd-qcj
endif
use
retuda
*qm()计算会计科目期末余额函数
parakmdm
sele1
usezz
locaallforkmbm=kmdm
ifqmj-qmd=0
da=qmj-qmd
else
da=qmd-qmj
endif
use
retuda
*msum()资产负债表表内求和函数
paras
sele2
t1=val(subs(s,1,2))
t2=subs(s,3,1)
t3=val(subs(s,4,2))
ift2=„_‟
ifp=1
sumncston11forrecn()=t1.and.recn()=t1.and.recn()=t1.and.recn()=t1.and.
recn()=t3
endi
endi
ift2=„+‟
ifp=1
sumncston11forrecn()=t1.or.recn()=t3
endi
ifp=2
sumqmston11forrecn()=t1.or.recn()=t3
endi
ifp=3
sumn
文档评论(0)