知识大全 经典案例 财务管理系统（6）[3]
Posted 资产负债表
篇首语：人之所以有一张嘴，而有两只耳朵，原因是听的要比说的多一倍。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 经典案例 财务管理系统（6）[3]相关的知识，希望对你有一定的参考价值。
如果科目代码不是这样 则该存储过程需要作相应的修改
delete from 资产负债表 where 会计期间 = @kjqj
insert into 资产负债表(会计期间) values(@kjqj)
update 资产负债表 set 现金及现金等价物 = b 金额 from 资产负债表 as a
(select sum(isnull(本期借方余额 ) isnull(本期贷方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 >= and 科目代码 <= )
as b where a 会计期间 = @kjqj
update 资产负债表 set 应收帐款 = b 金额 from 资产负债表 as a
(select sum(isnull(本期借方余额 ) isnull(本期贷方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 >= and 科目代码 <= and 科目代码<> )
as b where a 会计期间 = @kjqj
注意坏帐准备为贷方
update 资产负债表 set 坏帐准备 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 应收帐款净值 = 应收帐款 坏帐准备
update 资产负债表 set 流动资产总计 = 现金及现金等价物 + 应收帐款净值
update 资产负债表 set 固定资产原值 = b 金额 from 资产负债表 as a
(select sum(isnull(本期借方余额 ) isnull(本期贷方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and 科目代码 = )
as b where a 会计期间 = @kjqj
注意累计折旧为贷方
update 资产负债表 set 累计折旧 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and 科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 固定资产总计 = 固定资产原值 累计折旧
update 资产负债表 set 其他资产 = b 金额 from 资产负债表 as a
(select sum(isnull(本期借方余额 ) isnull(本期贷方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 >= and 科目代码 <= and 科目代码<>
and 科目代码 <> )
as b where a 会计期间 = @kjqj
update 资产负债表 set 资产总计 = 流动资产总计 + 固定资产总计 + 其他资产
计算负债及所有者权益
负债类级别都是贷方金额
update 资产负债表 set 应付帐款 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 >= and 科目代码 <= )
as b where a 会计期间 = @kjqj
update 资产负债表 set 预收帐款 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 应付工资 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and 科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 其他负债 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 >= and 科目代码 <= and 科目代码 <> )
as b where a 会计期间 = @kjqj
update 资产负债表 set 负债总计 = 应付帐款 + 预收帐款 + 应付工资 + 其他负债
计算所有者权益
update 资产负债表 set 实收资本 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and 科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 资本公积 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and 科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 赢余公积 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and 科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 未分配利润 = b 金额 from 资产负债表 as a
(select sum(isnull(本期贷方余额 ) isnull(本期借方余额 )) as 金额
from 科目余额表 where 会计期间 = @kjqj and
科目代码 = or 科目代码 = )
as b where a 会计期间 = @kjqj
update 资产负债表 set 所有者权益总计 = 实收资本 + 资本公积 +
赢余公积 + 未分配利润
update 资产负债表 set 负债及所有者权益总计 = 负债总计 + 所有者权益总计
mit
GO
cha138/Article/program/Delphi/201311/24740相关参考
创建存储过程 系统使用了sf_初始化帐户sf_启用帐户sf_凭证过帐sf_期末结帐和sf_计算资产负债表个存储过程实现的功能分别为新建帐套启用帐套凭证过帐确认期末结帐和运算指定会计期间的资产负债
——此文章摘自《Delphi数据库开发经典案例解析》定价￥ 特价￥ 购买>> 根据以上需求分析一个基本的财务管理系统数据库中大致包括多张数
//首记录 procedureTSecSettingToolButtonClick(Sender:TObject); begin datasourceDataSetFirst; end;
//对数据进行统计 procedureTSumAccountsumtable; var counti:integer; valvalvalvalvalval:double; begin
//设置工具栏按钮 procedureTDocuInputSetToolBar(isEnable:bool); begin ifisEnable=truethen begin //将首记
——此文章摘自《Delphi数据库开发经典案例解析》定价￥ 特价￥ 购买>> //显示试算平衡表窗体 procedureTmainNCl
//对分录表进行插入和修改时所执行的操作 procedureTDocuInputOpType(opname:string); var i:integer; inputvaloutputva
//在输入分录表时调用DLL中的表格选择科目名称和号码 procedureTDocuInputStringGridDblClick(Sender:TObject); var showForm
//在初始化时统计工作的完成 procedureTSumAccountforinitial; begin //根据不同的状态设置SQL代码以计算不同的平衡情况 adoqueryClose;
——此文章摘自《Delphi数据库开发经典案例解析》定价￥ 特价￥ 购买>> 基于以上需求分析和数据库分析读者对一个标准的财务管理系统应该