oracle如何发送http请求

在oracle里面如何发送http请求，步骤：

1.新建存储过程发送http请求

create or replace procedure SP_WebService_Check_aj /*IVR WebService*/
(ajbm   in varchar2,
 flag   out varchar2) is
  req   utl_http.req;
  resp  utl_http.resp;
  value varchar2(1024);
begin
  req := utl_http.begin_request(get_tp_url('IvrCheck') ||
                                '?action=check_aj' || chr(38) || --参数1 action
                                'ajbm=' || ajbm --参数2 ajbm
                                );
  utl_http.set_header(req, 'User-Agent', 'Mozilla/4.0');
  resp := utl_http.get_response(req);
  utl_http.read_line(resp, value, true);
  flag := value;

  utl_http.end_response(resp);
EXCEPTION
  when utl_http.end_of_body then
    utl_http.end_response(resp);
end SP_WebService_Check_aj;

2.触发的函数get_tp_url

create or replace function get_tp_url(pname in varchar2)
       return varchar2
as
v_url varchar2(100);
begin
     select url into v_url from tp_url where name=pname and VALID=1;
     return v_url;
end;

3.附上tp_url表里的数据

insert into tp_url (ID, URL, NAME, VALID)
values ('2', 'http://ip:8080/WebService12368/IvrCheckServlet', 'IvrCheck', 1);