--------------*******商贸版结转新帐套*******---------------
--***********结转之前必须本期结账且无凭证和单据**************--
--vw_cc_Receive--收入表
--vw_cc_Send--支出表
--t_cc_stock_BatchNo
--清除业务余额表和即时库存表
delete t_CC_Bal where fperiod<(SELECT FValue from t_SystemProfile WHERE
delete t_cc_stock where fperiod<(SELECT FValue from t_SystemProfile WHERE
--修改存货初始数据
delete ICInvInitial
go
--delete
--exec sp_UpdateInventory --重算即时库存表
insert into ICInvInitial(FBrNo,fperiod,fstockid,fitemid,fbatchno,fqty,fprice,famount,fbillinterid)
select '',1,fstockid,fitemid,fbatchno,fbegqty,fbegbal/fbegqty,fbegbal,fid from t_cc_bal where fbegqty<>0
update ICInvInitial set fperiod=(select fvalue from t_SystemProfile WHERE
--select * from t_balance
--清除科目余额表
delete t_Balance where fperiod<(SELECT FValue from t_SystemProfile WHERE
go
--清除科目累积数
update t_Balance set fytddebitfor=0,fytdcreditfor=0,fytddebit=0,fytdcredit=0,FBeginBalanceFor=FEndBalanceFor,FBeginBalance =FEndBalance,FDebitFor=0,FCreditFor=0,FDebit=0,FCredit=0
go
--清除损益科目本年实际发生额
delete t_ProfitAndLoss
go
--修改启用期间
update t_SystemProfile set fvalue=(select fvalue from t_SystemProfile WHERE
update t_SystemProfile set fvalue=(select fvalue from t_SystemProfile WHERE
update t_SystemProfile set fvalue=(select fvalue from t_SystemProfile WHERE
update t_SystemProfile set fvalue=(select fvalue from t_SystemProfile WHERE
go
--修改当前年度和期间（为删除凭证做准备）
update t_SystemProfile set fvalue=(select top 1 fperiod from t_Voucher order by
update t_SystemProfile set fvalue=(select top 1 fyear from t_Voucher order by
go
--修改凭证状态（审核，过账状态）
update t_Voucher set fchecked=0,fposted=0,fcheckerid=-1,fposterid=-1
go
--修改客户初始余额
update t_Organization set fcheckamount=0,fprepcheckamount=0, funcheckamount=fcurreceamount , forireceamount=fcurreceamount,funprepcheckamount=fcurprepamount,foriprepamount=fcurprepamount,FToItemId=fitemid
go
--修改供应商初始余额
update t_Supplier set fcheckamount=0,fprepcheckamount=0, funcheckamount=fcurreceamount , forireceamount=fcurreceamount,funprepcheckamount=fcurprepamount,foriprepamount=fcurprepamount,FToItemId=fitemid
go
--清除历史数据
DELETE FROM t_ProfitAndLoss
Go
DELETE FROM t_mutex
Go
delete t_RP_RBill
go
delete t_RP_RBillEntry
go
delete t_RP_ROtherBill
go
delete t_RP_ROtherBillEntry
go
delete T_CC_StockBill
go
delete T_CC_StockBillEntry
go
delete t_RP_PBillEntry
go
delete t_RP_PBill
go
delete t_RP_POtherBill
go
delete t_RP_POtherBillEntry
go
delete t_cg_order
go
delete t_cg_orderEntry
go
delete t_XS_Order
go
delete t_XS_OrderEntry
go
delete T_CC_Templet
go
delete T_CC_TempletEntry
go
delete T_CC_ZZCX
go
delete T_CC_ZZCX_Entry
go
delete T_CC_ZZCX_Entry2
go
delete t_VoucherEntry
go
delete t_Voucher
go
delete t_RP_CheckBill
go
delete t_RP_CheckBillEntry1
go
delete t_RP_CheckBillEntry2
go
delete t_SearchInfo_temp
go
delete t_RP_BankBill
go
-------
--修改当前年度和期间（改回正确的当前期间）
update t_SystemProfile set fvalue=(select fvalue from t_SystemProfile WHERE
update t_SystemProfile set fvalue=(select fvalue from t_SystemProfile WHERE
go
--exec StockINIDataOn
注意先备份帐套数据。
TAG标签：
