create or replace procedure RPS_SOAP(
                                      in_ApplicationNumber     in varchar2,
                                      in_PersonalCode          in varchar2,
                                      in_Category              in varchar2             
                                                                          
                                      ) is
        soap_request   CLOB;
        http_req       UTL_HTTP.REQ;
        http_resp      UTL_HTTP.RESP;
        strData        varchar2(4000);
        url            varchar2(32767);
  begin

          DBMS_OUTPUT.enable;
          soap_request :=
                          '<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:abs="http://mvdPayLib/ABSUrgencyInterface">
                             <soapenv:Header/>
                             <soapenv:Body>
                                <abs:RegisterUrgency>
                                   <register>
                                      <ApplicationNumber>'||in_ApplicationNumber||'</ApplicationNumber>
                                      <PersonalCode>'||in_PersonalCode||'</PersonalCode>
                                      <Category>'||in_Category||'</Category>
                                   </register>
                                </abs:RegisterUrgency>
                             </soapenv:Body>
                          </soapenv:Envelope>';            
            
           url:='http://100.1.30.82:9081/mvdPayWeb/sca/ABSUrgencyInterfaceExport1/wsdl/mvdPay_ABSUrgencyInterfaceExport1.wsdl';
           utl_http.set_transfer_timeout(10);
           http_req:= utl_http.begin_request(url, 'POST','HTTP/1.1');      
           utl_http.set_header(http_req, 'Content-Type', 'text/xml; charset=utf-8');
           utl_http.set_header(http_req, 'Content-Length', length(soap_request));
           utl_http.write_text(http_req, soap_request);
           http_resp := utl_http.get_response(http_req);
           utl_http.read_text (http_resp, strData);
           utl_http.end_response (http_resp);
           DBMS_OUTPUT.put_line ('Output: ' || strData);
  end RPS_SOAP;