Book2 第7章 工业版过帐、反过帐及结转存货成本.docVIP

程序讲解——工业版过帐、反过帐和结转成本 过帐 相关的数据表 GLVch，FAVch， GLAcct，GLCls，GLObj，GLBal，GLQtyBal，GLPnL，FABal*，FACard，ICBill*，ICInvoice*，ICVch*ICPriceList，ICItem，ICQueue*，ICTrack*，ICIdentBal 处理流程 过帐前检查 统计未过帐的凭证、固定资产变动及存货单据张数，若总数为零，则退出过帐过程，否则进入下一步。 处理凭证资料 按照期间、凭证字、凭证号、分录号的顺序逐条处理凭证分录： 若凭证已删除，则作上过帐标记。 检查科目、核算项目的合法性。 根据帐套选项的“凭证过帐前必须审核”，检查凭证是否已经审核。 检查凭证号是否连续。 将分录中的借或贷方发生额登记至GLBal，分三步完成： 登记科目的发生额，必须同时处理原币、原币折合本位币及所有币别三类发生数。 登记核算项目的发生额，必须同时处理原币、原币折合本位币及所有币别三类发生数。 若是非明细科目，则处理其所有上级科目的发生数。 以上三步操作中数据库中数据会发生变化的有GLBal表中的FDebit、FCredit、FYtdDebit、FYtdCredit、FEndBal五个字段。 若科目属于损益类科目（GLAcct中FGroup值大于500），且凭证分录中的FModule字段值不为“GL”，则将分录中的借或贷方发生额登记至GLPnL表中，分两步完成： 登记损益类科目的发生额，必须同时处理原币、原币折合本位币及所有币别三类发生数。 登记核算项目的发生额，必须同时处理原币、原币折合本位币及所有币别三类发生数。 若是非明细科目，则处理其所有上级科目的发生数。 以上三步操作中数据库中数据会发生变化的有GLPnL表中的FAmt、FYtd两个字段。 若科目或核算项目设有数量辅助核算，则更新GLQtyBal表，发生变化的字段有FDebit、FCredit、FYtdDebit、FYtdCredit、FEndQty五个字段。 根据FModule字段值，若该凭证与购货单或销货单相关，则必须设置ICBill、ICInvoice的过帐标记。到此为止，一条凭证分录的过帐过程结束。 检查借方汇总数和贷方汇总数是否相等。 处理固定资产资料 若本次过帐中有计提折旧的凭证，则更新FABal表中FPeriod=0的记录的以下字段值： FYtdDepr=FYtdDepr+FDepr FAccumDepr=FAccumDepr+FDepr FAccumDeprA=FAccumDeprA+FDepr 按照变动类型，逐条处理固定资产变动资料（FAVch）： 若调整原值或累计折旧，则更新FABal表中FPeriod=0的记录的以下字段值： 调增原值时（FAVch.FOrgVal0） FDebitOrg = FDebitOrg + FAVch.FOrgVal FYtdDebitOrg = FYtdDebitOrg + FAVch.FOrgVal FOrgVal=FOrgVal+FAVch.FOrgVal 调减原值时（FAVch.FOrgVal0） FCreditOrg = FCreditOrg – FAVch.FOrgVal FYtdCreditOrg = FYtdCreditOrg – FAVch.FOrgVal FOrgVal=FOrgVal+FAVch.FOrgVal 调增累计折旧时（FAVch.FAccumDepr0） FDebitDepr = FDebitDepr + FAVch.FAccumDepr FYtdDebitDepr = FYtdDebitDepr + FAVch.FAccumDepr FAccumDepr=FAccumDepr+ FAVch.FAccumDepr 调减累计折旧时（FAVch.FAccumDepr0） FCreditDepr = FCreditDepr – FAVch.FAccumDepr FYtdCreditDepr = FYtdCreditDepr – FAVch.FAccumDepr FAccumDepr=FAccumDepr+ FAVch.FaccumDepr 更新FABal表中FPeriod=0的记录以下字段的状态值： 若为新增固定资产 FPost=1 若为减少固定资产 FPost=2 若为其它变动 FGroupID = FAVch.F