declare
  l_BLOB BLOB;
  l_CLOB CLOB;
  l_envelope CLOB;
  l_xmltype XMLTYPE;
  l_response varchar2(32767);
  ecode NUMBER;
  emesg VARCHAR2(200);
begin
  l_envelope := '<?xml version=''''1.0'''' encoding=''''UTF-8''''?>';
  l_envelope := l_envelope || '<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:sear="http://www.stellent.com/Search/">';
  l_envelope := l_envelope || ' <soapenv:Header/>';
  l_envelope := l_envelope || ' <soapenv:Body>';
  l_envelope := l_envelope || '  <sear:QuickSearch>';
  l_envelope := l_envelope || '   <sear:queryText>dDocAuthor &lt;matches&gt; `test`</sear:queryText>';
  l_envelope := l_envelope || '  </sear:QuickSearch>';
  l_envelope := l_envelope || ' </soapenv:Body>';
  l_envelope := l_envelope || '</soapenv:Envelope>';


  l_envelope := '<?xml version=''''1.0'''' encoding=''''UTF-8''''?>';
  l_envelope := l_envelope || '<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:get="http://www.stellent.com/GetFile/">';
  l_envelope := l_envelope || ' <soapenv:Header/>';
  l_envelope := l_envelope || ' <soapenv:Body>';
  l_envelope := l_envelope || '  <get:GetFileByID>';
  l_envelope := l_envelope || '   <get:dID>123456</get:dID>';
  l_envelope := l_envelope || '  </get:GetFileByID>';
  l_envelope := l_envelope || ' </soapenv:Body>';
  l_envelope := l_envelope || '</soapenv:Envelope>';


  -- dbms_output.put_line('(soapenv)='||l_envelope);

  l_xmltype := flex_ws_api.make_request(
    p_url               => 'https://server.domain.com/_dav/cs/idcplg',
    p_action            => 'http://www.stellent.com/GetFile/',
    p_envelope          => l_envelope,
    p_username          => 'adminuser',
    p_password          => 'password', 
    p_wallet_path       => 'file:/u01/app/oracle/admin/SID/wallet',
    p_wallet_pwd        => 'walletpassword'
  );

  -- dbms_output.put_line('(xml)='||substr(l_xmltype.GetClobVal(),1,2000));

  l_response := flex_ws_api.parse_xml(
    p_xml=>l_xmltype, 
    p_xpath=>'//idc:QuickSearchResponse/idc:QuickSearchResult/idc:StatusInfo/idc:statusMessage/text()',
    p_ns=>'xmlns:idc="http://www.stellent.com/Search/"'
  );




  l_response_msg := flex_ws_api.parse_response(p_collection_name=>'STELLENT_CHECKIN',p_xpath=>'//idc:CheckInUniversalResponse/idc:CheckInUniversalResult/idc:StatusInfo/idc:statusMessage/text()',p_ns=>'xmlns:idc="http://www.stellent.com/CheckIn/"');

  

  l_BLOB := flex_ws_api.clobbase642blob(l_CLOB);




exception
  when others then
    ecode := SQLCODE; 
    emesg := SQLERRM;
    --insert into log_table (code,message,info) values (0,TO_CHAR(ecode) || '-' || emesg,'apex_ucm.CheckinDocument emesg');
    --commit;
    raise;
end;
/



/*
  cursor searchresults_cur(p_xmltype xmltype) is
    SELECT 
      extractvalue(column_value, '/idc:SearchResults/idc:dDocName','xmlns:idc="http://www.stellent.com/Search/"') DOCNAME,
      extractvalue(column_value, '/idc:SearchResults/idc:dDocTitle','xmlns:idc="http://www.stellent.com/Search/"') DOCTITLE
    FROM TABLE(XMLSequence(p_xmltype.extract('//idc:QuickSearchResponse/idc:QuickSearchResult/idc:SearchResults','xmlns:idc="http://www.stellent.com/Search/"')));
  searchresults_rec searchresults_cur%ROWTYPE;

  open searchresults_cur(l_xmltype);
  loop
    fetch searchresults_cur into searchresults_rec;
    exit when searchresults_cur%NOTFOUND;
    dbms_output.put_line('(dDocName)='||searchresults_rec.DOCNAME||' (dDocTitle)='||searchresults_rec.DOCTITLE);  
  end loop;
  if searchresults_cur%ROWCOUNT = 0 then
    dbms_output.put_line('No records found!');  
  end if;
  close searchresults_cur;



*/