`
chengyue2007
  • 浏览: 1488432 次
  • 性别: Icon_minigender_1
  • 来自: 大连
社区版块
存档分类
最新评论

实现主从关系Form中汇总行金额/数量

 
阅读更多



 

背景说明:

 

  1. 头块中的Total字段(HEADERS.AMOUNT_TOTAL)汇总行上面Amount(LINES.AMOUNT)
  2. 行中的Amount是Unit Price(lines.unit_price)和Quantity(lines.quantity)的乘积
  3. Unit Price和Quantity的任何更改会导致Amount发生改变,最终影响Total值

实现步骤:

1,创建合计显示字段,即HEADERS.AMOUNT_TOTAL,设置其子类属性为:TEXT_ITEM_DISPLAY_ONLY

2,在合计显示的数据块中,创建合计项目的汇总临时项目,命名规则为:<合计项目名称>_RTOT_DB,NUMBER(38)/DISPLAY_ITEM,即AMOUNT_TOTAL_RTOT_DB/NUMBER(38)/DISPLAY_ITEM

3,在明细块中创建两个统计使用的item,一个<被统计项>_RTOT_OLD,另一个<被统计项>_RTOT_DB,类型 CHAR(61) DISPLAY_ITEM,即AMOUNT_RTOT_OLD/CHAR(61)/DISPLAY_ITEM 和 AMOUNT_RTOT_DB/CHAR(61)/DISPLAY_ITEM

4,包装一下app_calculate.running_total方法,让其对明细块中的Amount进行汇总计算

 

procedure running_total (event varchar2) is
begin
  app_calculate.running_total(event,'LINES.AMOUNT','HEADERS.AMOUNT_TOTAL');
end running_total;

 5,在引发HEADERS.AMOUNT_TOTALLINES.AMOUNT变化的两个Item(lines.unit_price)和(lines.quantity)的WHEN-VALIDATE-ITEM触发器中调用app_calculate.running_total运算汇总值,Item的Handler代码如下:

 

 

procedure unit_price (event varchar2) is
begin
  if event = 'WHEN-VALIDATE-ITEM' then
    lines.amount('INIT');--先计算行上面的LINES.AMOUNT
    lines.running_total('WHEN-VALIDATE-ITEM'); --然后在计算HEADERS.AMOUNT_TOTAL里面的数值
  end if;	
end unit_price;
 
procedure quantity (event varchar2) is
begin
  if event = 'WHEN-VALIDATE-ITEM' then
    lines.amount('INIT');
    lines.running_total('WHEN-VALIDATE-ITEM');--同上
  end if;
end quantity;

 6,创建lines.amount('INIT');的Handler代码

 

procedure amount (event varchar2) is
begin
  if event = 'INIT' then
    copy(name_in('lines.unit_price') * name_in('lines.quantity'),'lines.amount');
  end if;	
end amount;

 7,在汇总显示项目所在块中的POST-QUERY触发器中从数据库中计算出明细的初始汇总值

procedure post_query is
begin
  select nvl(sum(unit_price*quantity),0)
    into :headers.amount_total
  from xhu_order_lines
 where header_id = :headers.header_id ;
 :HD.SUM_TOTAL_RTOT_DB := :HD.SUM_TOTAL;
end post_query;

 8,在明细块的以下触发器中添加相应的代码

--KEY-DELREC
lines.running_total('KEY-DELREC');
Delete_Record;
 
--KEY-DUPREC
lines.running_total('KEY-DUPREC');
duplicate_record;
 
--KEY-CLRREC
lines.running_total('KEY-CLRREC');
app_folder.event('KEY-CLRREC');
或者下面的方式
CLEAR_RECORD;
 
--WHEN-CLEAR-BLOCK
lines.running_total('WHEN-CLEAR-BLOCK');
 
--POST-QUERY
lines.running_total( 'POST-QUERY' );
或者post-query中为
app_folder.event('POST-QUERY');
app_globe.event('POSET-QUERY');
LN_PRIVATE.running_total('POST-QUERY');
if :system.trigger_record =1 then
    
  select sum(amount) 
    into  :HD.SUM_TOTAL
    from CUX_PLAN_PROJECT_LINES_T
    where header_id= :HD.HEADER_ID;
    :HD.SUM_TOTAL_RTOT_DB := :HD.SUM_TOTAL;  
end if;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  • 大小: 59.3 KB
分享到:
评论

相关推荐

    中汇 ( 中文汇编 )

    在实际应用中,中汇可以用于系统级编程、驱动开发、性能敏感的算法实现等场景。特别是在教学环境中,中文汇编语言可以降低语言理解难度,提高学习效率。同时,由于中汇的兼容性,开发者可以利用其进行各种Windows...

    中汇人才网1.03升级版

    我为客户写的人才网站,绝对完整无错无后门---中汇人才网1.03版(7月9日晚上20点发布) &lt;br&gt;中汇人才网 1.03版 &lt;br&gt;1.03版修改内容如下 &lt;br&gt;修正了 &lt;br&gt;人才网首页 index.asp 中广告部分的logo尽寸,由原先...

    中汇集团:2019年度报告.PDF

    中汇集团:2019年度报告.PDF

    中汇房地产信息网

    "中汇房地产信息网"可能是一个专注于提供房地产行业资讯、数据和解决方案的平台。它可能包含了多种功能,如房源信息展示、市场数据分析、行业动态发布等,旨在帮助房地产开发商、中介公司、投资者以及消费者更好地...

    中汇技术打造银行间市场本外币交易背后的共享服务平台.pdf

    随着银行间市场新业务的开展,为了快速响应业务需求,更好的服务行业机构和会员单位,中汇系统逐步升级至分布式、服务化、高可用的技术架构。 中汇公司自主设计规划的企业架构资产库,包含丰富的技术平台、框架,...

    中汇宏基海口灯塔酒店概念性规划设计最终文本——ATKINS.pdf ) 您可以上传小于220MB的文件

    根据提供的文件信息,我们可以提炼出中汇宏基海口灯塔酒店概念性规划设计相关的多个IT知识要点,涵盖从城市规划、建筑设计到项目管理等方面。 1. 城市规划与设计 - 中汇宏基海口灯塔酒店作为海口世界贸易中心的一...

    香港)-中汇集团-0382.HK-高质量办学先驱走出华南,布局全国.pdf

    中汇集团旗下的广州华商学院和华商职业学院凭借其在师资、校企合作及毕业生就业方面的优质表现,赢得了良好的口碑,预计在23/24学年新招生人数将实现12.5%的三年复合增长率,达到1.86万人。同时,随着校区扩建,这两...

    藏经阁-中汇技术_打造银行间市场本外币交易背后的共享服务平台.pdf

    这篇文档的核心是中汇技术如何通过三次系统架构的演变,特别是与阿里云的合作,实现从IT到DT(Data Technology)的数字化转型。 首先,人民币国际化进程推动了金融市场的发展,中国外汇交易中心承担着人民币国际化...

    藏经阁-中汇技术:打造银行间市场本外币交易背后的共享服务平台.pdf

    《藏经阁-中汇技术:打造银行间市场本外币交易背后的共享服务平台》这篇文章揭示了中汇技术在银行间市场交易系统领域的创新实践。中汇技术,作为中国外汇交易中心的开发中心,承担着推动人民币国际化的重要使命。...

    中汇集团-0382.HK-大湾区民办商科高教明珠.zip

    4. 财务报告:历年业绩、财务指标、股价走势、投资者关系信息。 5. 大湾区影响:集团如何利用大湾区的区位优势,推动教育创新和国际合作。 6. 市场分析:民办高等教育行业的趋势、竞争格局以及中汇集团的竞争优势。 ...

    教育行业周报:中汇集团首单并购落地,希望教育FY2020经调整纯利+61%.pdf

    本周,中汇集团宣布通过其间接全资附属公司广州智蘅教育,成功收购四川新概念教育51%的股权,此次并购涉及金额为人民币7.5亿元。同时,广州华港以人民币1元收购成都育德后勤51%的股权。此并购行为对于中汇集团而言,...

    教育行业跨市场周报(第90期):中汇集团FY19业绩增加显著,学生人数与平均学费齐升.zip

    学生的数量增长表明了该集团的教学质量和市场吸引力得到了广泛认可,这可能是由于其课程设置、师资力量、就业支持等方面的优势。 其次,平均学费的提高也反映了中汇集团的市场定位和价值认知的提升。在教育行业,...

    中汇股份:2018年年度报告.PDF

    【中汇股份2018年年度报告】涵盖了公司一年中的重大事件和发展成就,展示了公司在行业内的地位和影响力。以下是对这些内容的详细解读: 1. **文化产业发展**:中汇股份在2018年被命名为第六届安徽省文化产业示范...

    广州保利中汇广场写字楼推广策略PPT学习教案.pptx

    【广州保利中汇广场写字楼推广策略】是针对广州市中心天河北区域的一个超甲级写字楼项目的营销计划。该区域作为广州的重要商务区,竞争激烈,因此制定有效的推广策略至关重要。此PPT学习教案详细分析了天河北商圈的...

    中汇会计师事务所2022校园招聘大礼包_大街网制作@大街网归类.pdf

    【中汇会计师事务所2022校园招聘大礼包】是由大街网制作并提供的网络资源,旨在帮助学生更好地准备和了解中汇会计师事务所在校园招聘中的相关信息。中汇会计师事务所是一家在中国拥有广泛影响力的综合性专业服务机构...

    中汇股份:2020年年度报告.rar

    《中汇股份:2020年年度报告》是一份重要的公开披露文件,它详尽地展示了中汇股份公司在2020年度的经营状况、财务数据、业绩表现以及未来的发展战略。年度报告是上市公司与投资者沟通的重要桥梁,旨在提供公司全面的...

    中汇花园塔吊安装施工方案.pdf

    周口中汇花园工程的塔吊安装施工方案是河南省第五建筑安装...综上所述,周口中汇花园的塔吊安装施工方案全面覆盖了从前期准备到后期拆除的全过程,强调了安全与规范,以期在高层建筑施工中实现高效且安全的塔吊作业。

Global site tag (gtag.js) - Google Analytics