`
cqh520llr
  • 浏览: 473171 次
  • 性别: Icon_minigender_1
  • 来自: 深圳
文章分类
社区版块
存档分类
最新评论

report builder

 
阅读更多 

create or replace package body page_test_pkg as

  PROCEDURE output(p_text IN VARCHAR2) as
  BEGIN
    fnd_file.put_line(fnd_file.output, p_text);
  END output;

  procedure main(errbuf  OUT VARCHAR2,
                 retcode OUT NUMBER) as
    v_item varchar2(200);
  begin
    select distinct description || segment1
      into v_item
      from mtl_system_items_b msi
     where segment1 = '100003592H0299A';
    output('<?xml version="1.0"?>'); --- 文本
    output('<html>....</html>');  --- HTML
  exception
    WHEN OTHERS THEN
      errbuf  := 'ERROR';
      retcode := 2;
      fnd_file.put_line(fnd_file.LOG,
                        '运行出现错误，错误信息为：' || SQLERRM);
      output('运行失败，错误信息为：' || SQLERRM);
  end main;
end page_test_pkg;
分享到：
| Eclipse Class Decompiler——Java反编译插 ...
评论
发表评论

您还没有登录,请您登录后再发表评论

相关推荐

Magicbox
Global site tag (gtag.js) - Google Analytics