2014-01-09 Created By BaoXinjian

?一、摘要

---

以下是關于解決EBS標準導出功能無法導出主從關系數據的方法。

解決思路：

1. 在form上增加一個導出按鈕,或者在工具欄注冊一個菜單項。

2. 用制作一個報表,或者模仿系統標準的導出功能。然后用上面的按鈕或者菜單項直接調用。

這里主要介紹模仿系統標準導出功能

?

二、開發

---

Step1. 直接修改form級trigger EXPORT，把默認的 app_standard.event('EXPORT')注釋掉。把下面的代碼復制進去。

?

Step2. 具體代碼

DECLARE--以上五個變量照搬即可URL VARCHAR2 (2000);DB_FILE NUMBER;WEB_SERVER_PREFIX VARCHAR2 (255);RES BOOLEAN;MIME_TYPE VARCHAR2 (255);L_ORGANZIATION_ID NUMBER;--定義一個包含主從關系數據的CURSORCURSOR CSR ( V_ORGANIZATION_ID IN NUMBER)ISSELECT CST.COST_GROUP_CODE,CST.COST_GROUP_DESCRIPTION,CST.COST_GROUP_DISABLE_DATE,CAP.CAPABILITY,EQP.EQP_CAP_DESC DESCRIPTION,CAP.ACTIVEFROM CUX2_CST_COST_GROUP_ALL CST,CUX2_CST_COST_GROUP_EQPS_ALL CAP,CUX2_BOM_EQP_CAP_TYPE EQPWHERE CAP.COST_GROUP_ID(+) = CST.COST_GROUP_IDAND EQP.EQP_CAP_CODE(+) = CAP.CAPABILITYAND EQP.ORGANIZATION_ID(+) = CAP.ORGANIZATION_IDAND CAP.ORGANIZATION_ID(+) = CST.ORGANIZATION_IDAND CST.ORGANIZATION_ID = V_ORGANIZATION_IDORDER BY CST.ORGANIZATION_ID, CST.COST_GROUP_CODE, CAP.CAPABILITY; BEGIN--獲取Organzition_idL_ORGANZIATION_ID := FND_PROFILE.VALUE ('MFG_ORGANIZATION_ID');--更改鼠標式樣：漏斗鼠標（忙狀態）SET_APPLICATION_PROPERTY (CURSOR_STYLE, 'BUSY');--顯示進度條窗口，并設置進度為0APP_WINDOW.PROGRESS (0);--創建數據包，并設置文件頭類型。DB_FILE :=FND_GFM.FILE_CREATE (CONTENT_TYPE => 'text/html',PROGRAM_NAME => 'export');--輸出題頭行 注:chr(9) 為 tab鍵 FND_GFM.FILE_WRITE_LINE (DB_FILE,'Cost Group Code'|| CHR (9)|| 'Cost Group Description'|| CHR (9)|| 'Cost Group Disable Date'|| CHR (9)
|| 'Capability'|| CHR (9)|| 'Description'|| CHR (9)|| 'Active'
);--循環數據行FOR R IN CSR (L_ORGANZIATION_ID)LOOPFND_GFM.FILE_WRITE_LINE (DB_FILE,R.COST_GROUP_CODE|| CHR (9)|| R.COST_GROUP_DESCRIPTION|| CHR (9)|| TO_CHAR (R.COST_GROUP_DISABLE_DATE, 'YYYY-MM-DD HH24:MI:SS')
|| CHR (9)|| R.CAPABILITY|| CHR (9)|| R.DESCRIPTION|| CHR (9)|| R.ACTIVE
);END LOOP;--關閉數據包DB_FILE := FND_GFM.FILE_CLOSE (DB_FILE);--將數據包提交給客戶端URL := FND_GFM.CONSTRUCT_DOWNLOAD_URL (WEB_SERVER_PREFIX, DB_FILE, TRUE);--DBMS_OUTPUT.PUT_LINE(URL);--打開URL地址下載 FND_UTILITIES.OPEN_URL (URL);--更改鼠標式樣：默認指針（常規狀態）SET_APPLICATION_PROPERTY (CURSOR_STYLE, 'DEFAULT');APP_WINDOW.PROGRESS (1); --顯示進度條窗口，并設置進度為1（100%） END;

Step3. 導出Execl

?

?Step4. 導出條形圖

?

Step5.? 導出的Execel

?

Thanks and Regards

參考：kawontony - http://blog.itpub.net/24627116/viewspace-754506/

參考：kawontony - http://blog.itpub.net/24627116/viewspace-754513/

轉載于:https://www.cnblogs.com/eastsea/p/4220635.html

總結

以上是生活随笔為你收集整理的Form_Form Builder Export导出为Excel（案例）的全部內容，希望文章能夠幫你解決所遇到的問題。

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