Getting ORA-06512: at "SYS.UTL_HTTP", line 1022 ORA-29270: too many open

Question

hi
I am getting the following error while calling the procedure in the batch process
ORA-06512: at "SYS.UTL_HTTP", line 1022
ORA-29270: too many open HTTP requests
Could you please help me on this? As this is getting affected in the live databases.
ORA-06512: at "SYS.UTL_HTTP", line 1022
ORA-29270: too many open HTTP requests
CREATE OR REPLACE PROCEDURE Send_To_Spg(
PTRANSACTION_ID               IN          VARCHAR2,
PCHANNEL_TYPE               IN VARCHAR2 DEFAULT NULL,
PCSS_ORDER_NUMBER          IN VARCHAR2 DEFAULT NULL,
PTELEPHONE_NUMBER          IN VARCHAR2 DEFAULT NULL,
PSCENARIO_TYPE               IN VARCHAR2 DEFAULT NULL,
PCUSTOMER_REQUIRED_DATE IN          VARCHAR2 DEFAULT NULL,
PCUSTOMER_REQUIRED_TIME IN          VARCHAR2 DEFAULT NULL,
PCANCELLATION_REASON     IN          VARCHAR2 DEFAULT NULL,
PCANCELLATION_NOTES          IN          VARCHAR2 DEFAULT NULL,
PSMPF_RETENTION               IN          VARCHAR2 DEFAULT NULL,
PEMERGENCY_WINBACK          IN          VARCHAR2 DEFAULT NULL,
PCSS_PROJECT_ID               IN          VARCHAR2 DEFAULT NULL,
PCSS_ORDER_NOTES          IN          VARCHAR2 DEFAULT NULL,
PREASON_FOR_CESSATION     IN          VARCHAR2 DEFAULT NULL,
P_RESPONSE                    OUT VARCHAR2,
PSMART_USER_ID               IN VARCHAR2 DEFAULT NULL,
PORACLE_ERROR               OUT VARCHAR2,
PORACLE_ERROR_MESSAGE     OUT          VARCHAR2,
PRESPONSE_TIME               OUT          NUMBER,
PDATA_TRANSFER_STATUS     OUT          VARCHAR2)
IS
v_scenario_type               VARCHAR2(20); -- Varialble to Hold Time Out of every request to SPG
v_transaction_time          NUMBER;          -- Total time in which Request to SPG was processed
v_record_inserted_at     DATE;          -- Date/Time about the record insertion to the Error Handler
v_start_time               NUMBER;          -- Variable to hold Start Time for calculationg Transaction Time
v_url                         VARCHAR2(32767);-- URL to use when sending data to SPG
vtransaction_id               VARCHAR2(18); -- Variable to hold Transaction ID for the request
v_buffer                    VARCHAR2(32760);-- Variable to read response from the SPG interface
v_timeout                    PLS_INTEGER; -- Time Out for each Transaction
v_oracle_err_msg          VARCHAR2(600); -- Variable to hold Oracle Error Message
v_resp                UTL_HTTP.RESP; -- Response Object
v_req                UTL_HTTP.REQ; -- Request Object
v_userid_pwd               SMT_ORACLE_PARAMETERS%ROWTYPE; --Variable declared to contain User ID & Password
vl_RetCode          VARCHAR2(5000);
vl_std_returnCode     VARCHAR2(3000);
--PDATA_TRANSFER_STATUS Holds the Data Transfer Status which can have possible values as
-- N => Data Has not been sent to SPG
-- Y => Received Successful response from SPG
-- F => On the First try to Send data to SPG Oracle Error Occured or response from SPG was a faulure
-- S => On the Second try to Send data to SPG Oracle Error Occured or response from SPG was a faulure
-- T => Data Has been transferred to the Error Log Table
-- X => Data need not be transfered to Error Log Table.
--Location of the timeout, URL & User Id & Password in Standing Data.
c_url_stopwlr SMT_ORACLE_PARAMETERS.PARAMETER_CODE%TYPE:='SPG_WLR';-- Stop WLR URL
c_url_cancelown SMT_ORACLE_PARAMETERS.PARAMETER_CODE%TYPE:='SPG_OWN';-- Cancel own URL
c_url_cancelother SMT_ORACLE_PARAMETERS.PARAMETER_CODE%TYPE:='SPG_OTH';-- Cancel other URL
c_url_amendcrd SMT_ORACLE_PARAMETERS.PARAMETER_CODE%TYPE:='SPG_CRD';--Amend CRD URL
c_spg_useridpwd SMT_ORACLE_PARAMETERS.PARAMETER_CODE%TYPE:='SPGIDPWD'; --Contains user id and pwd
ctimeout smt_parameters.parameter_code%TYPE:='SPGTO'; --This holds the timeout parameter
BEGIN
     --In case the calling batch process can pass this value this SQL read will not be required & can be deleted
     --Read data transfer status for the transaction Id
     SELECT data_transfer_status INTO PDATA_TRANSFER_STATUS     FROM SPG_INTERFACE_TABLE
     WHERE transaction_id     =     PTRANSACTION_ID;
     --Record the start time
     v_start_time:=DBMS_UTILITY.GET_TIME;
     --If Data transfer status is S then send the record to error handler
     IF PDATA_TRANSFER_STATUS = 'S' THEN
          Error_Handler(PTRANSACTION_ID,PSMART_USER_ID,PORACLE_ERROR,PORACLE_ERROR_MESSAGE,v_record_inserted_at,PDATA_TRANSFER_STATUS);
     ELSE
     --In case Data Tranfer Status is something other than S then send the request to SPG
          --Initialise other variables which will be populated during the journey
          P_RESPONSE                    :=     '';
          PORACLE_ERROR               :=     NULL;
          PORACLE_ERROR_MESSAGE     :=     NULL;
          PRESPONSE_TIME               :=     0;
     --Read timeout parameter from standing data.
          BEGIN
               SELECT VALUE INTO v_timeout FROM smt_parameters WHERE parameter_code=ctimeout;
          EXCEPTION
               WHEN NO_DATA_FOUND THEN
               v_timeout:=30;
          WHEN OTHERS THEN
               v_timeout:=30;
          END;
     -- Construct the URL for Stop WLR Scenario
          IF PSCENARIO_TYPE = 'STOP_WLR' THEN
               BEGIN
               -- Read the Initial URL from Standing Data
               SELECT VALUE
                    INTO v_url
                    FROM SMT_ORACLE_PARAMETERS
                    WHERE parameter_code = c_url_stopwlr
                    AND host_id = ( SELECT host_id
                                                  FROM SMART_HOSTS A
                                                  WHERE EXISTS ( SELECT 1
                                                                 FROM DB_PARAMETERS b
                                                                 WHERE A.hostname = b.hostname
                                                                 AND A.database_id = b.database_id));
               --handle unforseen exception
               EXCEPTION
               WHEN NO_DATA_FOUND THEN
                    v_url:='Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_winback_details'; --After testing the same, URL will be fetched from the Query
               WHEN OTHERS THEN
                    v_url:='Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_winback_details'; --After testing the same, URL will be fetched from the Query
               END;
               --construct the URL depending on the parameters to be passed to the url
               v_url := v_url || '?';
               v_url := v_url || 'p_data_entered=' || Smart_Urlencode('xmloverhttp') || '&';
               v_url := v_url || 'p_channel_type=' || Smart_Urlencode(PCHANNEL_TYPE)|| '&';
               v_url := v_url || 'p_css_start_order_no=' || Smart_Urlencode(PCSS_ORDER_NUMBER)|| '&';
               v_url := v_url || 'p_tel_no=' || Smart_Urlencode(PTELEPHONE_NUMBER)|| '&';
               v_url := v_url || 'p_crd=' || Smart_Urlencode(PCUSTOMER_REQUIRED_DATE)|| '&';
               v_url := v_url || 'p_take_over_time=' || Smart_Urlencode(PCUSTOMER_REQUIRED_TIME)|| '&';
               v_url := v_url || 'p_retainsmpf=' || Smart_Urlencode(PSMPF_RETENTION)|| '&';
               --v_url := v_url || 'p_emergency_winback='                    || Smart_Urlencode(PEMERGENCY_WINBACK)|| '&';
               v_url := v_url || 'p_projectno=' || Smart_Urlencode(PCSS_PROJECT_ID)|| '&';
               v_url := v_url || 'p_ordernotes=' || Smart_Urlencode(PCSS_ORDER_NOTES)|| '&';
               v_url := v_url || 'p_reason_cessation=' || Smart_Urlencode(PREASON_FOR_CESSATION);
          ELSIF PSCENARIO_TYPE='CANCEL_OWN' THEN
          --Fetch the URL for cancel own from standing data.
               BEGIN
                    SELECT VALUE
                    INTO v_url
                    FROM SMT_ORACLE_PARAMETERS
                    WHERE parameter_code = c_url_cancelown
                    AND host_id = ( SELECT host_id
                                                  FROM SMART_HOSTS A
                                                  WHERE EXISTS ( SELECT 1
                                                                 FROM DB_PARAMETERS b
                                                                 WHERE A.hostname = b.hostname
                                                                 AND A.database_id = b.database_id));
          --handle unforseen exception
               EXCEPTION
                         WHEN NO_DATA_FOUND THEN
                         v_url := 'Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_cancelown_details'; --After testing the same, URL will be fetched from the Query
               WHEN OTHERS THEN
                         v_url := 'Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_cancelown_details'; --After testing the same, URL will be fetched from the Query
               END;
          --construct the URL
          v_url := v_url || '?';
          v_url := v_url || 'p_data_entered=' ||Smart_Urlencode('xmloverhttp')|| '&';
          v_url := v_url || 'p_channel_type=' ||Smart_Urlencode(PCHANNEL_TYPE)|| '&';
          v_url := v_url || 'p_css_start_order_no=' ||Smart_Urlencode(PCSS_ORDER_NUMBER)|| '&';
          v_url := v_url || 'p_tel_no=' ||Smart_Urlencode(PTELEPHONE_NUMBER)|| '&';
          v_url := v_url || 'p_cancel_reason=' ||Smart_Urlencode(PCANCELLATION_REASON)|| '&';
          v_url:= v_url || 'p_cancel_notes=' ||Smart_Urlencode(PCANCELLATION_NOTES);
          ELSIF PSCENARIO_TYPE='CANCEL_OTHER' THEN
          --Fetch the URL for cancel own from standing data.
          BEGIN
          SELECT VALUE
                    INTO v_url
                    FROM SMT_ORACLE_PARAMETERS
                    WHERE parameter_code = c_url_cancelother
                    AND host_id = ( SELECT host_id
                                                  FROM SMART_HOSTS A
                                                  WHERE EXISTS ( SELECT 1
                                                                 FROM DB_PARAMETERS b
                                                                 WHERE A.hostname = b.hostname
                                                                 AND A.database_id = b.database_id));
          --handle unforseen exception
          EXCEPTION
               WHEN NO_DATA_FOUND THEN
                    v_url := 'Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_cancelother_details'; --After testing the same, URL will be fetched from the Query
               WHEN OTHERS THEN
                    v_url := 'Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_cancelother_details'; --After testing the same, URL will be fetched from the Query
          END;
          --construct the URL
          v_url := v_url || '?';
          v_url := v_url || 'p_data_entered=' ||Smart_Urlencode('xmloverhttp')|| '&';
          v_url := v_url || 'p_channel_type=' ||Smart_Urlencode(PCHANNEL_TYPE)|| '&';
          v_url := v_url || 'p_css_stop_order_no=' ||Smart_Urlencode(PCSS_ORDER_NUMBER)|| '&';
          v_url := v_url || 'p_tel_no=' ||Smart_Urlencode(PTELEPHONE_NUMBER)|| '&';
          v_url := v_url || 'p_cancel_reason=' ||Smart_Urlencode(PCANCELLATION_REASON);
          ELSIF Pscenario_type='AMEND_CRD' THEN
          --Fetch the URL for cancel own from standing data.
          BEGIN
          SELECT VALUE
                    INTO v_url
                    FROM SMT_ORACLE_PARAMETERS
                    WHERE parameter_code = c_url_amendcrd
                    AND host_id = ( SELECT host_id
                                                  FROM SMART_HOSTS A
                                                  WHERE EXISTS ( SELECT 1
                                                                 FROM DB_PARAMETERS b
                                                                 WHERE A.hostname = b.hostname
                                                                 AND A.database_id = b.database_id));
          --handle unforseen exception
          EXCEPTION
          WHEN NO_DATA_FOUND THEN
               v_url := 'Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_amendcrd_details'; -- After testing the same , URL will be fetched from the Query
          WHEN OTHERS THEN
               v_url := 'Http://wls.brassi1c.devenv1.bt.co.uk:64738/pls/spgenv/spg_btrc.add_btrc_amendcrd_details'; -- After testing the same , URL will be fetched from the Query
          END;
          --construct the URL
          v_url := v_url || '?';
          v_url := v_url || 'p_data_entered=' ||Smart_Urlencode('xmloverhttp')|| '&';
          v_url := v_url || 'p_channel_type=' ||Smart_Urlencode(PCHANNEL_TYPE)|| '&';
          v_url := v_url || 'p_css_start_order_no=' ||Smart_Urlencode(PCSS_ORDER_NUMBER)|| '&';
          v_url := v_url || 'p_tel_no=' ||Smart_Urlencode(PTELEPHONE_NUMBER)|| '&';
          v_url := v_url || 'p_crd='                         ||Smart_Urlencode(PCUSTOMER_REQUIRED_DATE)|| '&';
          v_url := v_url || 'p_css_change_order_numbers='||Smart_Urlencode(PCANCELLATION_REASON);
          END IF;
          --this is start of setting parameters for utl http object. the show begins...
          utl_http.set_transfer_timeout(v_timeout);
          --Set the wallet
          --XXXXX e.g.UTL_HTTP.SET_WALLET(?file:DirectoryPath?,'put password here?);
          --Set proxy
          --YYYYY e.g. utl_http.set_proxy(p_proxy_in, p_no_proxy_domains_in);
          v_url := REPLACE(v_url,'%27%27','%27'); -- Fix to ensure Double Quotes are converted to Single Quotes
          --set the required URL to utl http.
          v_req := utl_http.begin_request(v_url);
          --Authentication setting
          --Fetch the user id and password from stnding data.
          BEGIN
               SELECT *
                    INTO v_userid_pwd
                    FROM SMT_ORACLE_PARAMETERS
                    WHERE PARAMETER_CODE=c_spg_useridpwd
                    AND HOST_ID = ( SELECT HOST_ID
                                        FROM SMART_HOSTS A
                                        WHERE EXISTS ( SELECT 1
                                                            FROM DB_PARAMETERS B
                                                            WHERE A.HOSTNAME = B.HOSTNAME
                                                            AND A.DATABASE_ID = B.DATABASE_ID));
          EXCEPTION
               WHEN NO_DATA_FOUND THEN
               P_RESPONSE := 'ORACLE_ERROR: USER id AND Password NOT configured IN SMT_ORACLE_PARAMETERS:SPGIDPWD';
               WHEN OTHERS THEN
               P_RESPONSE := 'ORACLE_ERROR: USER id AND Password NOT configured IN SMT_ORACLE_PARAMETERS:SPGIDPWD';
          END;
          --utl_http.set_authentication(v_req, p_username_in, p_password_in);
          utl_http.set_authentication(v_req, v_userid_pwd.description, v_userid_pwd.VALUE);
          v_resp := utl_http.get_response(v_req);
          --Fill in the the response time
          PRESPONSE_TIME := (DBMS_UTILITY.GET_TIME - v_start_time)/100;
          IF v_resp.reason_phrase = 'OK' THEN
               -- Fetch the response
               BEGIN
                    LOOP
                    utl_http.read_line(v_resp, v_buffer);
                         P_RESPONSE := P_RESPONSE || v_buffer;
                    END LOOP;
                         utl_http.end_response(v_resp);
                    EXCEPTION
                    WHEN utl_http.end_of_body THEN
                    utl_http.end_response(v_resp);
                    P_RESPONSE := P_RESPONSE || v_buffer;
               END;
          ELSIF v_resp.reason_phrase <> 'OK' OR P_RESPONSE = '' THEN
               --error handling starts
               --If the HTTP Status is not OK then store the error information
               PORACLE_ERROR_MESSAGE     :=     'Status Code: '|| v_resp.STATUS_CODE||'. Reason Phrase ' ||v_resp.reason_phrase;
               P_RESPONSE                    :=     'ORACLE_ERROR: '||     ' Reason Phrase ' ||     v_resp.reason_phrase;
               PORACLE_ERROR               :=     v_resp.STATUS_CODE;
          END IF;
          --In case we got successful response from SPG
          IF P_RESPONSE LIKE '%<RetCde>0</RetCde>%' THEN
               PDATA_TRANSFER_STATUS     :=     'Y';
          ELSE
               BEGIN
SELECT message
                              INTO vl_std_returnCode
                              FROM SMT_MESSAGES
                              WHERE MESSAGE_CODE='SPGANTIDTS';
EXCEPTION
WHEN NO_DATA_FOUND THEN
     vl_std_returnCode := '-12545,-29273,-1,401,';
WHEN OTHERS THEN
                    vl_std_returnCode := '-12545,-29273,-1,401,';
END;
               --In case there was an error do not update Data Transfer Status
               IF PORACLE_ERROR <> NULL AND INSTR(vl_std_returnCode, PORACLE_ERROR || ',', 1, 1) <> 0 THEN
                         PDATA_TRANSFER_STATUS:=PDATA_TRANSFER_STATUS;
               ELSE
                    vl_RetCode := SUBSTR(P_RESPONSE, INSTR(P_RESPONSE,'<RetCde>', 1, 1),
                    INSTR(P_RESPONSE,'</RetCde>',1,1)+9 - INSTR(P_RESPONSE,'<RetCde>', 1, 1));
                    BEGIN
                         SELECT VALUE
                              INTO vl_std_returnCode
                              FROM SMT_ORACLE_PARAMETERS
                              WHERE PARAMETER_CODE='SPGRCS'
                              AND HOST_ID = ( SELECT HOST_ID
                                   FROM SMART_HOSTS A
                                   WHERE EXISTS ( SELECT 1
                                                       FROM DB_PARAMETERS B
                                                       WHERE A.HOSTNAME = B.HOSTNAME
                                                       AND A.DATABASE_ID = B.DATABASE_ID));
               EXCEPTION
                    WHEN NO_DATA_FOUND THEN
                         vl_std_returnCode := '<RetCde>4244</RetCde><RetCde>4245</RetCde><RetCde>4246</RetCde>';
                    WHEN OTHERS THEN
                         vl_std_returnCode := '<RetCde>4244</RetCde><RetCde>4245</RetCde><RetCde>4246</RetCde>';
                    END;
                    IF INSTR(vl_std_returnCode, vl_RetCode, 1, 1) <> 0 THEN
                         --needs not to re attempted.
                         PDATA_TRANSFER_STATUS:='X';
                    ELSE
                         --In case we did'nt got SUCCESSFUL response FROM SPG THEN UPDATE the Data Transfer Status so that the failed requests can be picked up BY the NEXT batch job RUN
                         IF PDATA_TRANSFER_STATUS='N' THEN
                              --initially if data transfer status was N then update it now to F
                              PDATA_TRANSFER_STATUS     :=     'F';
                         ELSIF PDATA_TRANSFER_STATUS='F' THEN
                              --initially if data transfer status was N then update it now to S
                              PDATA_TRANSFER_STATUS     :=     'S';
                         END IF;
                    END IF;
               END IF;
          END IF;
          --Now Update all the modified Values
     UPDATE SPG_INTERFACE_TABLE
               SET     response          =     P_RESPONSE,
               data_transfer_status     =     PDATA_TRANSFER_STATUS,
               oracle_error               =     PORACLE_ERROR,
               oracle_error_message     =     PORACLE_ERROR_MESSAGE,
               response_time               =     PRESPONSE_TIME
               WHERE transaction_id     =     PTRANSACTION_ID;
          COMMIT;
END IF;
EXCEPTION
     WHEN OTHERS THEN
     --Handling the unhandled exception
     PORACLE_ERROR               :=     SQLCODE;
     PORACLE_ERROR_MESSAGE     :=     SQLERRM;
     P_RESPONSE                    :=     'ORACLE_ERROR: '|| PORACLE_ERROR_MESSAGE;
     PRESPONSE_TIME               :=     (DBMS_UTILITY.GET_TIME - v_start_time)/100;
     SELECT data_transfer_status INTO PDATA_TRANSFER_STATUS
     FROM SPG_INTERFACE_TABLE
     WHERE transaction_id=PTRANSACTION_ID;
     --New functionality to update the oracle error and oracle error message and not the Data Transfer Status
BEGIN
SELECT message
INTO vl_std_returnCode
FROM SMT_MESSAGES
WHERE MESSAGE_CODE='SPGANTIDTS';
EXCEPTION
WHEN NO_DATA_FOUND THEN
vl_std_returnCode := '-12545,-29273,-1,';
WHEN OTHERS THEN
vl_std_returnCode := '-12545,-29273,-1,';
END;
     vl_RetCode     :=     PORACLE_ERROR || ',';
IF INSTR(vl_std_returnCode, vl_RetCode, 1, 1) <> 0 THEN
--If the error is found in above maintained standing data do not change the Data Transfer Status
               pdata_transfer_status:=pdata_transfer_status;
ELSE
          IF pdata_transfer_status='N' THEN
                         PDATA_TRANSFER_STATUS     :=     'F';
                         DBMS_OUTPUT.PUT_LINE('DUE TO ERROR DATA COULDN''T GET TRANSFERED TO SPG FOR TRANSACTION'||' '||PTRANSACTION_ID);
                         DBMS_OUTPUT.PUT_LINE(SQLERRM);
          ELSIF pdata_transfer_status='F' THEN
                         PDATA_TRANSFER_STATUS     :=     'S';
                         DBMS_OUTPUT.PUT_LINE('DUE TO ERROR DATA COULDN''T GET TRANSFERED TO SPG FOR TRANSACTION'||' '||PTRANSACTION_ID);
                         DBMS_OUTPUT.PUT_LINE(SQLERRM);
ELSE
                         DBMS_OUTPUT.PUT_LINE('Failure WHEN sending data TO Error LOG. Data Transfer Status IS ' || PDATA_TRANSFER_STATUS || '. TRANSACTION ID '|| PTRANSACTION_ID);
          END IF;
END IF;
          --Now update all the information gathered above to the table
     UPDATE SPG_INTERFACE_TABLE
          SET     response          =     P_RESPONSE,
          data_transfer_status     =     PDATA_TRANSFER_STATUS,
          oracle_error               =     PORACLE_ERROR,
          oracle_error_message     =     PORACLE_ERROR_MESSAGE,
          response_time               =     PRESPONSE_TIME
          WHERE transaction_id     =     PTRANSACTION_ID;
          COMMIT;
END;
/

Answer 1

I have fixed the problem by own.
Seems there are some while space in the endpoint url.
Fix
http_req:= utl_http.begin_request
trim(l_endpoint_url)
,'POST'
,'HTTP/1.1'
It works...
Regards
BS