商贸标准版7.0的建帐套的时候选小企业会计制度，在录其他应收单，类型是其他应收，生成的凭证后科目是1122应收股利，不是应收帐款

你好，这个问题已经在群中说过，已经新建的账套，需要执行一段代码的。
-------------------------------------------------------插入默认结算帐户---------------------------------------------
declare @Type int
declare @AccountID int
declare @StartYear nvarchar(4)
declare @StartPeriod nvarchar(4)
declare @YearPeriod nvarchar(10)
select @Type=FValue from t_SystemProfile where FKey='AccountType'
select @StartYear=FValue from t_SystemProfile where FKey='StartYear'
select @StartPeriod=FValue from t_SystemProfile where FKey='StartPeriod'
set @YearPeriod=@StartYear+'年'+@StartPeriod+'期'
if @Type=3 or @Type=4
select @AccountID=FAccountID from t_account where FNumber='1122'
else
select @AccountID=FAccountID from t_account where FNumber='1131'
if not exists(select 1 from t_SettleAcct where FNumber='JZ01')
insert t_SettleAcct(FName,FNumber,FAcctID,FFixed,FBeforeEnable,FStartPeriod)
values ('应收账款账户','JZ01',@AccountID,1,1,@YearPeriod)
else
update t_SettleAcct set FAcctID=@AccountID where FName='应收账款账户'
--插入默认不可改应付账款账户
if @Type=3
select @AccountID=FAccountID from t_account where FNumber='2202'
else
select @AccountID=FAccountID from t_account where FNumber='2121'
if not exists(select 1 from t_SettleAcct where FNumber='JZ02')
insert t_SettleAcct(FName,FNumber,FAcctID,FFixed,FBeforeEnable,FStartPeriod)
values ('应付账款账户','JZ02',@AccountID,1,1,@YearPeriod)
else
update t_SettleAcct set FAcctID=@AccountID where FName='应付账款账户'
--插入现金帐户
select @AccountID=FAccountID from t_account where FNumber='1001'
if not exists(select 1 from t_SettleAcct where FNumber='01')
insert t_SettleAcct(FName,FNumber,FAcctID,FBeforeEnable,FStartPeriod)
values ('现金账户','01',@AccountID,1,@YearPeriod)
else
update t_SettleAcct set FAcctID=@AccountID where FName='现金账户'
--插入银行存款
select @AccountID=FAccountID from t_account where FNumber='1002'
if not exists(select 1 from t_SettleAcct where FNumber='02')
insert t_SettleAcct(FName,FNumber,FAcctID,FBeforeEnable,FStartPeriod)
values ('银行账户','02',@AccountID,1,@YearPeriod)
else
update t_SettleAcct set FAcctID=@AccountID where FName='银行账户'
go