Executing stored procedure dynamically

Question

Hi Everybody,
I am trying to execute one procedure in other procedure dynamically. I am not sure, how to do this. Please provide your responses and comments.
Main Sp:
CREATE OR REPLACE PROCEDURE R2D2.SP_UPDATE (
V_ID IN RC_PENDING_TX.CS_ID%TYPE,
S_ID IN RC_PENDING_TX_STATUS_VL.STATUS_ID%TYPE,
A_ID IN VARCHAR2,
V_NOTES IN VARCHAR2
IS
v_date DATE := SYSDATE;
db_id varchar2(10);
stmt varchar2(10000);
stmt1 varchar2(10000);
BEGIN
db_ID := get_id(v_ID);
IF S_ID = 1
THEN
stmt:= 'begin utl_pkg.set_v_id@'||db_id||'('||V_ID||','||'1'||'); end;';
stmt1:= 'begin utl_pkg.set_t_id@'||db_id||'('||V_ID||','||'1,2,3,4'||','||'Y'||');end;';
execute immediate stmt;
execute immediate stmt1;
END IF;
END SP_UPDATE;
1) GET_ID IS function to get db_id for v_id.
2)utl_pkg.set_v_id,utl_pkg.set_t_id two sps i need to execute if s_id = 1.
3) I have to execute both sps utl_pkg.set_v_id, utl_pkg.set_t_id , which take v_id as input parameter from main sp and these sps will execute in db with db link db_id (which we get from function for v_id we pass in main sp).
Please let me know, how i can do this. DO i need to do it dynamically or i can do it in some ways.
Please help me guys. I will really appreciate it.
Thank you in advance.

Answer 1

Try this.
Please see closely commas and parameter passed in procedures.
SQL> select name from v$database;
NAME
ORADB1
SQL> create or replace package UTL_PKG is
  2   procedure set_v_id(v_id varchar2,any_value varchar2);
  3 
  4  end UTL_PKG;
  5  /
Package created.
SQL> create or replace package body UTL_PKG is
  2 
  3    Procedure set_v_id( v_id varchar2,any_value varchar2 )is
  4     
  5    begin
  6       
  7    dbms_output.put_line('Package from remote DB'||v_id ||' '||any_value);   
  8       
  9    end;
10 
11  end UTL_PKG;
12  /
Package body created.
SQL> Now on another DB
SQL> select name from v$database;
NAME
ORADB2
SQL> select db_link,host from all_db_links;
DB_LINK                HOST
DB1_LINK              ORADB1  
SQL> CREATE OR REPLACE PROCEDURE SP_UPDATE (
  2  V_ID IN emp.ename%TYPE, --This datatype is VARCAHR2
  3  S_ID IN emp.empno%TYPE, --This datatype is NUMBER
  4  A_ID IN VARCHAR2,
  5  V_NOTES IN VARCHAR2
  6  )
  7  IS
  8  v_date DATE := SYSDATE;
  9  db_id varchar2(100);
10  stmt varchar2(1000);
11  BEGIN
12 
13  select db_link into db_id from ALL_DB_LINKS   -- Assuming only DB link is present
14 
15 
16  IF S_ID = 1 THEN
17  
18   stmt:= 'begin utl_pkg.set_v_id@'||db_id||'('||''''||v_id||''''||','||'''1'''||'); end;';
19   dbms_output.put_line(stmt);
20   execute immediate stmt;
21  END IF;
22 
23  END SP_UPDATE;
24  /
Procedure created.
SQL> show error;
No errors.
SQL>  begin
  2     SP_UPDATE('1',1,'a','sometext');
  3     end;
  4  /
begin utl_pkg.set_v_id@ORADB1('1','1'); end;
PL/SQL procedure successfully completed.
SQL> show error
No errors.
SQL> Edited by: Azhar Husain on Jun 10, 2011 1:16 PM