在Oracle EBS的二次開發中，常有在主從關系的主塊中需要顯示明細塊中金額或數量的匯總，在Oracle Form Builder中實際上提供了匯總的功能，但它的這個匯總功能的前提是匯總的明細塊需要一次性查詢出所有的數據，這對于基于B/S架構的EBS應用來說顯然是不合適的，因此Oracle專門包裝了一個匯總計算的方法 app_calculate.running_total 來解決這個問題。

下面以實際的例子來描述如何實現匯總計算，效果圖如下：

?

?

?

背景說明：

頭塊中的Total字段(HEADERS.AMOUNT_TOTAL)匯總行上面Amount(LINES.AMOUNT)

行中的Amount是Unit Price(lines.unit_price)和Quantity(lines.quantity)的乘積

Unit Price和Quantity的任何更改會導致Amount發生改變，最終影響Total值

?

實現步驟：

1，創建合計顯示字段，即HEADERS.AMOUNT_TOTAL，設置其子類屬性為：TEXT_ITEM_DISPLAY_ONLY

2，在合計顯示的數據塊中，創建合計項目的匯總臨時項目,命名規則為：<合計項目名稱>_RTOT_DB，NUMBER(38)/DISPLAY_ITEM，即AMOUNT_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進行匯總計算

^?[Copy to clipboard]View Code PLSQL

1 2 3 4

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

5，在引發Amount變化的兩個Item的WHEN-VALIDATE-ITEM觸發器中調用app_calculate.running_total運算匯總值，Item的Handler代碼如下：

^?[Copy to clipboard]View Code PLSQL

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

procedure unit_price (event varchar2) is begin if event = 'WHEN-VALIDATE-ITEM' then lines.amount('INIT'); lines.running_total('WHEN-VALIDATE-ITEM'); 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，創建Amount的Handler代碼

^?[Copy to clipboard]View Code PLSQL

1 2 3 4 5 6

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觸發器中從數據庫中計算出明細的初始匯總值

^?[Copy to clipboard]View Code PLSQL

1 2 3 4 5 6 7

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 ; end post_query;

8，在明細塊的以下觸發器中添加相應的代碼

^?[Copy to clipboard]View Code PLSQL

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

--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'); ? --WHEN-CLEAR-BLOCK lines.running_total('WHEN-CLEAR-BLOCK'); ? --POST-QUERY lines.running_total( 'POST-QUERY' );

?

轉：http://oracleseeker.com/2009/08/19/calculate_detail_amount_or_quantity_for_master_block/

---

?

我自己的做法：

行塊增加一個total項，項的計算模式設置為“概要”，匯總函數選擇“和”

假如是統計行數-計數

行塊屬性：預計算匯總設置為“是”。

頭塊的total項copy行塊total值。

行塊block屬性查詢所有記錄：是

總結

以上是生活随笔為你收集整理的实现主从关系Form中汇总行金额/数量的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。