TEC1401.Report开发技术总结 - 第一章使用PLSQL开发HTML报表

最新推荐文章于 2021-09-26 14:41:36 发布

DeepSea_Allen

最新推荐文章于 2021-09-26 14:41:36 发布

阅读量1.9k

点赞数

分类专栏： -EBS-TEC14.Report Oracle EBS开发技术系列文章标签： Oracle EBS Report开发 HTML报表开发 EBS二次开发技术

本文链接：https://blog.csdn.net/DeepSea_Allen/article/details/53898112

版权

本文介绍了如何使用PLSQL开发HTML报表，通过在Oracle EBS中注册并发程序和定义报表，将报表开发转化为Web开发，提高了报表的灵活性。详细步骤包括PLSQL代码编写、在EBS中注册报表并赋予职责权限。

摘要由CSDN通过智能技术生成

第一章使用PLSQL开发HTML报表

使用PLSQL存储过程准备好数据源，并控制输出的逻辑，最后生成带HTML标签的文本输出，再通过在EBS中设置报表的输出格式为HTML。

如果熟悉Web前端的设计和开发，我感觉用这种方法很方便。

完全将报表开发转变成Web开发了，报表的灵活行被无限放大了。

开发示例：

使用PLSQL开发HTML样式的销售订单报表，并通过javascript将数据导出到Excel中

1. PLSQL代码编写

                       CREATE OR REPLACE PACKAGE CUX_WX_OMRPT01 IS
                       -- Author  : ALLEN
                       -- Created : 2014/5/16 10:46:31
                       -- Purpose : EBS REPORT TRAINING
                       PROCEDURE MAIN(ERRBUF           OUT VARCHAR2,
                                      RETCODE          OUT VARCHAR2,
                                      P_ORDER_FROM     IN VARCHAR2,
                                      P_ORDER_TO       IN VARCHAR2);
                       END CUX_WX_OMRPT01;
                       /
                       CREATE OR REPLACE PACKAGE BODY CUX_WX_OMRPT01
                       -- Author  : ALLEN
                       -- Created : 2014/5/16 10:46:31
                       -- Purpose : EBS REPORT TRAINING IS
                       c_sprt VARCHAR2(2) := ',';
                       --ouput log 
                       PROCEDURE WRITE_LOG(p_log VARCHAR2) IS
                       BEGIN
                         FND_FILE.PUT_LINE(FND_FILE.LOG, p_log);
                       EXCEPTION
                         WHEN OTHERS THEN
                           NULL;
                       END WRITE_LOG;
 
                       --output content
                       PROCEDURE WRITE_OUTPUT(p_content VARCHAR2) IS
                       BEGIN
                         FND_FILE.PUT_LINE(FND_FILE.OUTPUT, p_content);
                       EXCEPTION
                           WHEN OTHERS THEN
                             NULL;
                       END WRITE_OUTPUT;
 
                       --BEGIN
                       PROCEDURE MAIN(ERRBUF           OUT VARCHAR2,
                                      RETCODE          OUT VARCHAR2,
                                      P_ORDER_FROM     IN VARCHAR2,
                                      P_ORDER_TO       IN VARCHAR2)
                       IS
                         CURSOR getdata_header_cur(p_order_from VARCHAR2, p_order_to VARCHAR2) IS
                           SELECT oh.order_number,                 --订单头 订单号码
                                  ot.name,                         --订单头 订单类型
                                  party.party_name,                --订单头 客户名称