Oracle EBS Export 主从关系（Master Detail）数据到EXCEL

 以下是关于解决 EBS 标准导出功能无法导出主从关系数据的方法。

解决思路：

1. 在form上增加一个导出按钮,或者在工具栏注册一个菜单项。

2. 用制作一个报表,或者模仿系统标准的导出功能。然后用上面的按钮或者菜单项直接调用。

这里主要介绍模仿系统标准导出功能。

步骤：

1. 直接修改form级trigger EXPORT，把默认的 app_standard.event('EXPORT')注释掉。把下面的代码复制进去。

 

2. DECLARE
3. --以上五个变量照搬即可
4. URL VARCHAR2(2000);
5. DB_FILE NUMBER;
6. WEB_SERVER_PREFIX VARCHAR2(255);
7. RES BOOLEAN;
8. MIME_TYPE VARCHAR2(255);
10. L_ORGANZIATION_ID NUMBER;
11. --定义一个包含主从关系数据的CURSOR
12. CURSOR CSR(V_ORGANIZATION_ID IN NUMBER) IS
13. SELECT CST.COST_GROUP_CODE,
14. CST.COST_GROUP_DESCRIPTION,
15. CST.COST_GROUP_DISABLE_DATE,
16. CAP.CAPABILITY,
17. EQP.EQP_CAP_DESC DESCRIPTION,
18. CAP.ACTIVE
19. FROM CUX2_CST_COST_GROUP_ALL CST,
20. CUX2_CST_COST_GROUP_EQPS_ALL CAP,
21. CUX2_BOM_EQP_CAP_TYPE EQP
22. WHERE CAP.COST_GROUP_ID(+) = CST.COST_GROUP_ID
23. AND EQP.EQP_CAP_CODE(+) = CAP.CAPABILITY
24. AND EQP.ORGANIZATION_ID(+) = CAP.ORGANIZATION_ID
25. AND CAP.ORGANIZATION_ID(+) = CST.ORGANIZATION_ID
26. AND CST.ORGANIZATION_ID = V_ORGANIZATION_ID
27. ORDER BY CST.ORGANIZATION_ID, CST.COST_GROUP_CODE, CAP.CAPABILITY;
28. BEGIN
29. --获取Organzition_id
30. L_ORGANZIATION_ID := FND_PROFILE.VALUE('MFG_ORGANIZATION_ID');
31. --更改鼠标式样：漏斗鼠标（忙状态）
32. SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'BUSY');
33. --显示进度条窗口，并设置进度为0
34. APP_WINDOW.PROGRESS(0);
35. --创建数据包，并设置文件头类型。
36. DB_FILE := FND_GFM.FILE_CREATE(CONTENT_TYPE => 'text/html',
37. PROGRAM_NAME => 'export');
39. --输出题头行 注:chr(9) 为 tab键
40. FND_GFM.FILE_WRITE_LINE(DB_FILE,
41. 'Cost Group Code' || CHR(9) ||
42. 'Cost Group Description' || CHR(9) ||
43. 'Cost Group Disable Date' || CHR(9) ||
44. 'Capability' || CHR(9) || 'Description' || CHR(9) ||
45. 'Active');
46. --循环数据行
47. FOR R IN CSR(L_ORGANZIATION_ID) LOOP
48. FND_GFM.FILE_WRITE_LINE(DB_FILE,
49. R.COST_GROUP_CODE || CHR(9) ||
50. R.COST_GROUP_DESCRIPTION || CHR(9) ||
51. TO_CHAR(R.COST_GROUP_DISABLE_DATE,
52. 'YYYY-MM-DD HH24:MI:SS') || CHR(9) ||
53. R.CAPABILITY || CHR(9) || R.DESCRIPTION ||
54. CHR(9) || R.ACTIVE);
55. END LOOP;
56. --关闭数据包
57. DB_FILE := FND_GFM.FILE_CLOSE(DB_FILE);
58. --将数据包提交给客户端
59. URL := FND_GFM.CONSTRUCT_DOWNLOAD_URL(WEB_SERVER_PREFIX, DB_FILE, TRUE);
60. --DBMS_OUTPUT.PUT_LINE(URL);
61. --打开URL地址下载
62. FND_UTILITIES.OPEN_URL(URL);
63. --更改鼠标式样：默认指针（常规状态）
64. SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
65. APP_WINDOW.PROGRESS(1); --显示进度条窗口，并设置进度为1（100%）
66. END;

效果：

至于这种办法与 跑请求的 方法相比。个人感觉这种办法比较快。只是个人看法。。。。。

OK ，就这样。

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/24627116/viewspace-754506/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/24627116/viewspace-754506/