三国杀克制小乔技能:xx集团应收应付统计表技术方案

NC v3.0 for Oracle 9i 9.2.0.1
1． 报表需求
表1：应收应付统计表
应收、应付统计表
2004-3-1
期初
本期
本年
项目
单位名称
科目名称
往来名称
项目名称
会计年度
结算信息
开工期初
本年期初
本期期初
本期借方
发生额
本期贷方
发生额
本年借方
累计发生额
本年贷方
累计发生额
开工至今借方
累计发生额
开工至今贷方累计发生额
截止目前余额
项目余额
1
01账套
0001集团
01工程总承包部
应收科目
客户
名称
工程
项目
名称
2004
工程结算信息
2004年初
2004-3
期初
2004-3
借方
2004-3
贷方
2004-1
到2004-3
借方累计
2004-1
到2004-3
贷方累计
项目开始到
2004-3借方
贷方
2004-3
期未数
最终余额
应付科目
供应商名称
表2：库存及费用科目统计表
费用、库存商品
单位
名称
科目
名称
年初
余额
本期借方
发生额
本期贷方
发生额
本年借方
累计发生额
本年贷方
累计发生额
开工至今借方
累计发生额
开工至今贷方
累计发生额
截止目前
余额
2． 需求分析
分析1：由于该统计表涉及数据来源的不同口径的统计，通过NC的自定义直接取数有一定的复杂程度。
分析2：通过不同期间的查询条件， 需要动态计算相关的累计值，并计算截止余额。
分析3：项目总体期初余额，累计发生余额， 及期末余额具有跨年度汇总。
以上因素影响了NC自定义报表及查询引擎查询功能。
3． 技术方案
本方案通过手工创建数据库视图预处理相关数据， 并提供基础数据源表供NC自定义报表和查询引擎调用。
并通过查询引擎的方式完成特定条件的分类计算，及分发布署。
注册查询报表节点。
分配功能权限。
4． 数据准备
涉及NC数据源表：
NC数据表
说明
字段
说明
外键关联
凭证分录
gl_detail
pk_corp
单位主键
-->
pk_voucher
凭证主键
-->
pk_accsubj
科目主键
-->
assid
辅助标识
-->
debitamount
借方
creditamount
贷方
公司目录
bd_corp
pk_corp
单位主键
<--
unitcode
单位编码
unitname
单位名称
凭证主表
gl_voucher
pk_voucher
凭证主键
<--
year
会计年度
period
期间/月份
prepareddate
制单日期
科目表
bd_accsubj
pk_accsubj
科目主键
<--
subjcode
科目编码
subjname
科目名称
balanorient
余额方向
辅助档案
gl_freevalue
freevalueid
辅助标识
<--
valuecode
辅助档案编码
valuename
辅助档案名称
pk_bdinfo
辅助类别主键
-->
辅助类别
bd_bdinfo
checktype
辅助类别主键
<--
bdname
类别名称
5．定义应收应付统计表ORACLE视图脚本
视图1：aaaa_pz_aparitem
归集往来核算项目核算的凭证信息。
create or replace view aaaa_pz_aparitem as
select
a.pk_corp --单位主键
--, a.detailindex , a.assid , a.explanation 凭证其他信息
--, a.pk_detail , a.pk_voucher , a.pk_accsubj 凭证关联主键
, a5.unitcode , a5.unitname --公司编码,公司名称
, a3.subjcode , a3.subjname, a3.balanorient --科目编码,科目名称,余额方向
--, a3.incurflag , a3.balanflag 控制科目余额方向
, a1.CustCode, a1.CustName --往来单位编码, 往来单位名称
, a2.ItemCode, a2.ItemName --施工项目编码, 项目名称
, a6.CashCode, a6.CashName --结算信息编码, 结算名称
, a4.year cyear, a4.period --凭证会计年度, 月份
, a4.prepareddate --凭证制单日期
--, substr(a4.prepareddate,7) YearMonth
, a.debitamount , a.creditamount
--, a.localdebitamount , a.localcreditamount
--用于归集凭证明细数据，40条测试记录
from gl_detail a --凭证分录表
--关联往来辅助档案
, (select b.freevalueid, b.valuecode CustCode , b.valuename CustName
From gl_freevalue b , bd_bdinfo c WHERE c.pk_bdinfo = b.checktype(+)
AND ( c.bdname =‘客户辅助核算‘ Or c.bdname =‘供应商辅助核算‘)) a1
--关联项目核算档案
, (select b.freevalueid, b.valuecode ItemCode, b.valuename ItemName
From gl_freevalue b , bd_bdinfo c WHERE c.pk_bdinfo = b.checktype
AND c.bdname =‘施工项目‘) a2
--关联结算核算档案
, (select b.freevalueid, b.valuecode CashCode, b.valuename CashName
From gl_freevalue b , bd_bdinfo c WHERE c.pk_bdinfo = b.checktype
AND c.bdname =‘结算信息‘) a6
, bd_accsubj a3 --关联科目表
, gl_voucher a4 --关联凭证主表
, bd_corp a5 --关联公司目录表
--设置辅助标识非空, 及关联字段内容,注意关联方式与SQL SERVER的区别
where a.assid is not null
AND a.assid = a1.freevalueid(+)
AND a.assid = a2.freevalueid(+)
AND a.assid = a6.freevalueid(+)
AND a.pk_accsubj = a3.pk_accsubj(+)
AND a.pk_voucher = a4.pk_voucher(+)
AND a.pk_corp = a5.pk_corp(+)
视图2：aaaa_yearmonth
按视图1关联会计期间表形成报表相关要素的全部会计期间数据记录。
create or replace view aaaa_yearmonth as
select
--通过凭证数据表aaaa_pz_aparitem , 进行分组统计
--并关联会计期间表, 形成全部会计期间记录集
--并以此作为主表按条件进行分类统计不同会计期间的金额
a.pk_corp
, a.unitcode, a.unitname
, a.subjcode, a.subjname
, a.custcode, a.custname
, a.itemcode ,a.itemname
, a.cashcode ,a.cashname
, a.balanorient
--将凭证日期处理年度, 并按年度月份进行分组
, SUBSTR(b.begindate,1,4) as cyear, b.month as period
from aaaa_pz_aparitem a
--关联会计期间表
, bd_accperiodmonth b
where substr(b.month,-1,1)!=‘A‘
--因调整期无会计年度,所以过滤掉调整期记录,
group by a.pk_corp
, a.unitcode, a.unitname
, a.subjcode, a.subjname
, a.custcode, a.custname
, a.itemcode ,a.itemname
, a.cashcode ,a.cashname
, a.balanorient
, b.begindate, b.month
--根据凭证数据, 创建基础数据表
--用于分组统计归集凭证数据, 120条测试记录
视图3：aaaa_arap_detail
通过视图2关联视图1形成条件统计表数据记录。
create or replace view aaaa_arap_detail as
select
mt.pk_corp
, mt.unitcode, mt.unitname
, mt.subjcode, mt.subjname
, mt.custcode, mt.custname
, mt.itemcode, mt.itemname
, mt.cashcode, mt.cashname
, mt.cyear, mt.period
, case mt.balanorient
when 1 then nvl(a1.年初借方,0) - nvl(a1.年初贷方,0)
else 0 - nvl(a1.年初借方,0) + nvl(a1.年初贷方,0)
end QCamount
, nvl(a1.年初借方,0) QCJamount
, nvl(a1.年初贷方,0) QCDamount
, nvl(a2.本期借方,0) MonthJamount
, nvl(a2.本期贷方,0) MonthDamount
, nvl(a3.全年借方累计,0) YearJamount
, nvl(a3.全年贷方累计,0) YearDamount
--本年到当前月累计借方
, (select nvl(sum(debitamount),0) from aaaa_pz_aparitem a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
and mt.custcode=a.custcode and mt.itemcode=a.itemcode and mt.cashcode=a.cashcode
) TOmonthJamount
--本年到当前月累计贷方
, (select nvl(sum(creditamount),0) from aaaa_pz_aparitem a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
and mt.custcode=a.custcode and mt.itemcode=a.itemcode and mt.cashcode=a.cashcode
) TOmonthDamount
连接上面：
--本年到当前月余额
, (select case mt.balanorient
when 1 then nvl(a1.年初借方,0) - nvl(a1.年初贷方,0) + nvl(sum(debitamount),0) - nvl(sum(creditamount),0)
else 0 - nvl(a1.年初借方,0) + nvl(a1.年初贷方,0) - nvl(sum(debitamount),0) + nvl(sum(creditamount),0)
end
from aaaa_pz_aparitem a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
and mt.custcode=a.custcode and mt.itemcode=a.itemcode and mt.cashcode=a.cashcode
) TOmonthQMamount
--项目开工到当前月累计借方
, (select nvl(sum(debitamount),0) from aaaa_pz_aparitem a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear>=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
and mt.custcode=a.custcode and mt.itemcode=a.itemcode and mt.cashcode=a.cashcode
) ItemJamount
--项目开工到当前月累计贷方
, (select nvl(sum(creditamount),0) from aaaa_pz_aparitem a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear>=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
and mt.custcode=a.custcode and mt.itemcode=a.itemcode and mt.cashcode=a.cashcode
) ItemDamount
--项目期末余额
, case mt.balanorient
when 1 then nvl(a1.年初借方,0) - nvl(a1.年初贷方,0) + nvl(a3.全年借方累计,0) - nvl(a3.全年贷方累计,0)
else 0 - nvl(a1.年初借方,0) + nvl(a1.年初贷方,0) - nvl(a3.全年借方累计,0) + nvl(a3.全年贷方累计,0)
end QMamount
连接上面：
from AAAA_YEARMONTH mt
--关联年初余额表
left join
(select a.pk_corp, a.unitcode, a.subjcode, a.custcode, a.itemcode, a.cashcode, a.cyear
, sum(debitamount) 年初借方, sum(creditamount) 年初贷方
from aaaa_pz_aparitem a
where a.period=‘00‘
group by a.pk_corp, a.unitcode, a.subjcode, a.custcode, a.itemcode, a.cashcode, a.cyear ) a1
on mt.pk_corp=a1.pk_corp and mt.unitcode=a1.unitcode and mt.subjcode=a1.subjcode
and mt.custcode=a1.custcode and mt.itemcode=a1.itemcode   and mt.cashcode=a1.cashcode
and mt.cyear=a1.cyear
--关联本期发生额表
left join
(select a.pk_corp, a.unitcode, a.subjcode, a.custcode, a.itemcode, a.cashcode, a.cyear, a.period
, sum(debitamount) 本期借方, sum(creditamount) 本期贷方
from aaaa_pz_aparitem a
where a.period!=‘00‘
group by a.pk_corp, a.unitcode, a.subjcode, a.custcode, a.itemcode, a.cashcode, a.cyear, a.period) a2
on mt.pk_corp=a2.pk_corp and mt.unitcode=a2.unitcode and mt.subjcode=a2.subjcode
and mt.custcode=a2.custcode and mt.itemcode=a2.itemcode and mt.cashcode=a2.cashcode
and mt.cyear=a2.cyear and mt.period=a2.period
--关联全年发生额表
left join
(select a.pk_corp, a.unitcode, a.subjcode, a.custcode, a.itemcode, a.cashcode, a.cyear
, sum(debitamount) 全年借方累计, sum(creditamount) 全年贷方累计
from aaaa_pz_aparitem a
where a.period!=‘00‘
group by a.pk_corp, a.unitcode, a.subjcode, a.custcode, a.itemcode, a.cashcode, a.cyear ) a3
on mt.pk_corp=a3.pk_corp and mt.unitcode=a3.unitcode and mt.subjcode=a3.subjcode
and mt.custcode=a3.custcode and mt.itemcode=a3.itemcode and mt.cashcode=a3.cashcode
and mt.cyear=a3.cyear
查询视图内容说明：
应收应付统计表：aaaa_arap_detail内容
pk_corp
单位主键
unitcode
单位编码
unitname
单位名称
subjcode
科目编码
subjname
科目名称
custcode
往来单位编码
custname
往来单位名称
itemcode
施工项目编码
itemname
施工项目名称
cashcode
结算信息编码
cashname
结算信息名称
cyear
会计年度
period
期间/月份
Qcamount
年初余额
QCJamount
年初借方
QCDamount
年初贷方
MonthJamount
本期借方
MonthDamount
本期贷方
YearJamount
全年借方累计
YearDamount
全年贷方累计
TOmonthJamount
本年到当前月累计借方
TOmonthDamount
本年到当前月累计贷方
TOmonthQMamount
本年到当前月余额
ItemJamount
项目开工到当前月累计借方
ItemDamount
项目开工到当前月累计贷方
Qmamount
项目期末余额
说明：应收应付统计表定义将调用此视图。
5． 定义费用及库存科目统计表ORACLE视图脚本
视图1：aaaa_pz_accode
归集科目核算的凭证信息。
create or replace view aaaa_pz_accode as
select a.pk_corp
--, a.pk_detail , a.pk_voucher , a.pk_accsubj 关联主键
, a5.unitcode , a5.unitname --公司编码,名称
, a3.subjcode , a3.subjname --科目编码,名称
, a3.balanorient --科目余额方向
, a4.year cyear --凭证年度
, a4.period --凭证月份/会计期间
, a4.prepareddate --凭证制单日期
--, substr(a4.prepareddate,7) YearMonth
, a.debitamount --凭证借方
, a.creditamount --凭证贷方
--, a.localdebitamount , a.localcreditamount
--用于归集凭证明细数据,40条测试记录
from gl_detail a
--关联科目表
, bd_accsubj a3
--关联凭证表
, gl_voucher a4
--关联公司表
, bd_corp a5
--关联字段内容
where a.pk_accsubj = a3.pk_accsubj(+)
AND a.pk_voucher = a4.pk_voucher(+)
AND a.pk_corp = a5.pk_corp(+)
视图2：aaaa_ym_accode
按视图1关联会计期间表形成科目统计表相关要素的全部会计期间数据记录。
create or replace view aaaa_ym_accode as
select a.pk_corp
, a.unitcode, a.unitname --公司编码,名称
, a.subjcode, a.subjname --科目编码,名称
, a.balanorient --科目余额方向
, SUBSTR(b.begindate,1,4) as cyear --凭证会计年度
, b.month as period --凭证月份
from aaaa_pz_accode a
--关联会计期间表
, bd_accperiodmonth b
--过滤掉会计调整期
where substr(b.month,-1,1)!=‘A‘
group by a.pk_corp
, a.unitcode, a.unitname
, a.subjcode, a.subjname
, a.balanorient
, b.begindate, b.month
--根据凭证数据, 创建基础数据表
--用于分组统计归集凭证数据,120条测试记录
视图3：aaaa_arap_detail
通过视图2关联视图1形成条件统计表数据记录。
create or replace view aaaa_accode_detail as
select mt.pk_corp
, mt.unitcode, mt.unitname --公司编码.名称
, mt.subjcode, mt.subjname --科目编码,名称
, mt.cyear, mt.period      --会计年度,月份
, case mt.balanorient
when 1 then nvl(a1.年初借方,0) - nvl(a1.年初贷方,0)
else 0 - nvl(a1.年初借方,0) + nvl(a1.年初贷方,0)
end QCamount
, nvl(a1.年初借方,0) QCJamount
, nvl(a1.年初贷方,0) QCDamount
, nvl(a2.本期借方,0) MonthJamount
, nvl(a2.本期贷方,0) MonthDamount
, nvl(a3.全年借方累计,0) YearJamount
, nvl(a3.全年贷方累计,0) YearDamount
--本年到今累计借方
, (select nvl(sum(debitamount),0) from aaaa_pz_accode a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
) TOmonthJamount
--本年到今累计贷方
, (select nvl(sum(creditamount),0) from aaaa_pz_accode a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
) TOmonthDamount
--本年到当前月余额
, (select case mt.balanorient
when 1 then nvl(a1.年初借方,0) - nvl(a1.年初贷方,0) + nvl(sum(debitamount),0) - nvl(sum(creditamount),0)
else 0 - nvl(a1.年初借方,0) + nvl(a1.年初贷方,0) - nvl(sum(debitamount),0) + nvl(sum(creditamount),0)
end
from aaaa_pz_accode a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
) TOmonthQMamount
--开工到今累计借方
, (select nvl(sum(debitamount),0) from aaaa_pz_accode a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear>=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
) ItemJamount
连接上面：
--开工到今累计贷方
, (select nvl(sum(creditamount),0) from aaaa_pz_accode a
where a.period!=‘00‘ and a.period <=mt.period and mt.cyear>=a.cyear
and mt.pk_corp=a.pk_corp and mt.unitcode=a.unitcode and mt.subjcode=a.subjcode
) ItemDamount
--本年期末
, case mt.balanorient
when 1 then nvl(a1.年初借方,0) - nvl(a1.年初贷方,0) + nvl(a3.全年借方累计,0) - nvl(a3.全年贷方累计,0)
else 0 - nvl(a1.年初借方,0) + nvl(a1.年初贷方,0) - nvl(a3.全年借方累计,0) + nvl(a3.全年贷方累计,0)
end QMamount
from AAAA_YM_ACCODE mt
--关联年初余额表
left join
(select a.pk_corp, a.unitcode, a.subjcode, a.cyear
, sum(debitamount) 年初借方, sum(creditamount) 年初贷方
from aaaa_pz_accode a
where a.period=‘00‘
group by a.pk_corp, a.unitcode, a.subjcode,   a.cyear ) a1
on mt.pk_corp=a1.pk_corp and mt.unitcode=a1.unitcode and mt.subjcode=a1.subjcode
and mt.cyear=a1.cyear
--关联本期发生额表
left join
(select a.pk_corp, a.unitcode, a.subjcode,   a.cyear, a.period
, sum(debitamount) 本期借方, sum(creditamount) 本期贷方
from aaaa_pz_accode a
where a.period<>‘00‘
group by a.pk_corp, a.unitcode, a.subjcode,   a.cyear, a.period) a2
on mt.pk_corp=a2.pk_corp and mt.unitcode=a2.unitcode and mt.subjcode=a2.subjcode
and mt.cyear=a2.cyear and mt.period=a2.period
--关联全年累计发生额表
left join
(select a.pk_corp, a.unitcode, a.subjcode, a.cyear
, sum(debitamount) 全年借方累计, sum(creditamount) 全年贷方累计
from aaaa_pz_accode a
where a.period<>‘00‘
group by a.pk_corp, a.unitcode, a.subjcode, a.cyear ) a3
on mt.pk_corp=a3.pk_corp and mt.unitcode=a3.unitcode and mt.subjcode=a3.subjcode
and mt.cyear=a3.cyear
查询视图内容说明：
科目统计表：aaaa_accode_detail内容
pk_corp
单位主键
unitcode
单位编码
unitname
单位名称
subjcode
科目编码
subjname
科目名称
cyear
会计年度
period
期间/月份
Qcamount
年初余额
QCJamount
年初借方
QCDamount
年初贷方
MonthJamount
本期借方
MonthDamount
本期贷方
YearJamount
全年借方累计
YearDamount
全年贷方累计
TOmonthJamount
本年到当前月累计借方
TOmonthDamount
本年到当前月累计贷方
TOmonthQMamount
本年到当前月余额
ItemJamount
开工到当前月累计借方
ItemDamount
开工到当前月累计贷方
Qmamount
科目期末余额
说明：费用及库存科目统计表定义将调用此视图。
1． 查询引擎权限分配：
操作：选择客户化，选择自定义查询，选择查询引擎，选择查询引擎权限查询菜单：
 
操作：选择指定用户，选择全部权限，选择保存。
 
注意：请管理员控制此权限；防止报表格式被其他用户修改；
2． 查询引擎管理：
操作：选择客户化，选择自定义查询，选择查询引擎，选择查询引擎管理菜单：
 
操作：选择创建，选择对象：
 
3． 定义报表数据源：
操作：录入编码，名称，选择数据源NC300：选择编辑，选择保存；
 
操作：选择报表对象；选择查询模型，选择SQL手工设计；
 
操作：录入手工SQL语句；连接到ORACLE自定义查询视图aaaa_arap_detail；
 
操作：系统显示视图全部字段；不建议修改别名及显示名；留到具体报表设计时修改；
 
4． 定义报表：
操作：按第3步骤，完成报表对象的定义；
 
操作：选择报表对象；选择查询模型，选择参数；定义报表查询条件；
 
操作：选择增行，录入参数名，显示名，操作符提示；选择数据类型；选择参照枚举项；
录入条件默认值；选择是否必选；
 
操作：选择报表对象；选择查询模型；选择SQL向导设计；
 
操作：选择临时表按钮；
 
操作：选择前面步骤定义好的临时表《项目往来数据源表》；选择确定；
 
操作：选择好临时表确定，显示内容如下：
 
操作：选择下一步；进行数据表连接条件，当年报表来自SQL视图，视图脚本已经完成数据连接，
故在此不需要设置：
 
操作：选择下一步， 进行报表字段定义；选择增加按钮：
 
操作：双击选择数据源表，显示字段列表， 再双击指定字段，该字段内容自动显示到上方；
 
操作：修改字段显示名，为该字段中文名；选择增加， 再定义下一个字段；
 
操作：增加报表全部字段后， 显示结果如下；
 
操作：选择下一步；进行报表筛选条件定义；选择条件类型：待定；
选择表，字段， 比较符， 右操作符；注意右操作符，必须与前面步骤定义的参数匹配；
 
操作：定义全部条件后， 显示结果如下；
 
操作：选择下一步；进行排序字段定义；
选择左边字段， 选择中间的操作符>；将字段选择到右列表；
注意最右侧字段排序先后的按钮，可调整字段排序的先后顺序；
 
操作：选择下一步， 进行交叉属性定义；本报表无交叉定义，不做操作；
 
5.格式设计：
操作：在格式设计下创建一个对应的应收应付统计表文件夹，在该文件夹下创建一个对象单位往来统计表；注意这个格式设计对象的编码是ysyf001
 
操作：选择界面模型中的引用查询后进入下面的页面,将已经做好的查询引擎对象与格式设计建立起关联。
操作： 在上图确认后再选择界面模型中的格式设计后进入下面的页面
 
操作：用鼠标点击表控件后，点击下面空白区域内任一点
 
操作： 双击表对象，在弹出的属性编辑器中绑定数据集
 
保存格式后返回即可。
6.浏览报表内容：
操作：选择报表对象；选择浏览按钮；
 
操作：显示报表条件参数，录入参数，或者选择档案参照；
 
操作：显示科目档案参照窗口；
 
操作：检查条件参数内容；
 
操作：动态显示报表取数进度；
 
操作：显示报表内容；
 
续上表：
 
7.新功能注册：
 
操作：录入功能名称，功能性质：
对应文件名或控件名：nc.ui.pub.querymodel.QueryNodeUI
 
操作：选择增加， 选择功能性质为参数：录入功能名称：pkQryNode
参数值：录入报表格式设计对象定义的编码：例如ysyf001
 
操作：选择增加， 选择功能性质为参数：录入功能名称：dsName 参数值：录入数据源：NC300
 
8.功能节点的权限分配：
请参见NC手册；
9. 最终效果：
双击对应的新功能节点即可执行查询。