oracle调用webservice接口地址demo

create or replace function FUNC_GENERATE_LOGINNAME(xmlstring VARCHAR2)

  return VARCHAR2 AS

  service_ sys.utl_dbws.SERVICE;

  call_ sys.utl_dbws.CALL;

  service_qname sys.utl_dbws.QNAME;

  port_qname sys.utl_dbws.QNAME;

  operation_qname sys.utl_dbws.QNAME; 
string_type_qname sys.utl_dbws.QNAME;
  retx ANYDATA;
  retx_string VARCHAR2(100);
  retx_len number;
  params sys.utl_dbws.ANYDATA_LIST;
begin
  service_qname := sys.utl_dbws.to_qname(null, 'ICSMSService');
  service_ := sys.utl_dbws.create_service(service_qname);
  port_qname := sys.utl_dbws.to_qname(null, 'ICSMSServicePortType');
  operation_qname := sys.utl_dbws.to_qname('http://webService.ic.jst.com', 'sendMsg');
  call_ := sys.utl_dbws.create_call(service_, port_qname, operation_qname);
  sys.utl_dbws.set_target_endpoint_address(call_, 'http://192.168.0.169:8081/ic/services/ICSMSService.ICSMSServiceHttpSoap11Endpoint');
--  sys.utl_dbws.set_property(call_, 'ENCODINGSTYLE_URI', 'http://schemas.xmlsoap.org/soap/encoding/');
  string_type_qname := sys.utl_dbws.to_qname('http://www.w3.org/2001/XMLSchema', 'string');
        sys.utl_dbws.add_parameter(call_, 'String_1', string_type_qname, 'ParameterMode.IN');
        sys.utl_dbws.set_return_type(call_, string_type_qname);
  params(0) := ANYDATA.convertvarchar(xmlstring);

  retx := sys.utl_dbws.invoke(call_, params);
  retx_string := retx.accessvarchar2;
  dbms_output.put_line('PL/SQL DII client return ' 
------解决方案--------------------
 retx_string);
  RETURN ANYDATA.AccessVarchar2(retx);
EXCEPTION
  WHEN OTHERS THEN
    RETURN substr(sqlerrm, 0, 2000);
END FUNC_GENERATE_LOGINNAME;
----------------------------------------------------------------------------------------------------------
在oracle中直接调用web services怎么操作，在网上查了很久，相关资料，比较少。

在这里整理一下，给需要的童鞋们做参考。。

Window下oracle开发web services

1，  去oracle官网上下载dbws-callout-utility-10131.zip

地址：http://www.oracle-base.com/articles/10g/utl_dbws10g.php

2，  解压后放到oracle安装目录下的<oracle_install_dir>/sqlj/lib中；

3，  在命令行中利用loadjava命令(一般安装完jdk或oracle之后就会有)将jar包导入oracle对应的用户中：

loadjava -u user/password@oracle -r -v -f -genmissing -s -grant public dbwsclientws.jar dbwsclientdb102.jar若为SYS用户，命令为：

loadjava -u user/password -r -v -f -genmissing -s -grant public dbwsclientws.jar dbwsclientdb102.jar

4，  如果未发现UTL_DBWS(可以在plsql中敲入sys.若未有utl_dbws显示，则需要进行初始化)，需要运行之前下载的包中dbws-callout-utility-10131/sqlj/lib/ utl_dbws_body.sql及utl_dbws_decl.sql