CREATE OR replace PROCEDURE Isql (v_childtbl_nme IN VARCHAR2, 
                                  v_istatement   OUT VARCHAR2) 
AS 
  v_iquery VARCHAR2(100); 
BEGIN 
    SELECT 'insert into infa_ilm.asdr_id_xref select ' 
           ||'id.' 
           || v_childtbl_nme 
           || ' as id_value ' 
           || ' from ' 
           || v_childtbl_nme 
           || Xmlagg(XMLELEMENT(e, ', '||parent_tbl_name)).EXTRACT('//text()') 
           || 'where CASE_L.CREATEDDATE < ' 
           ||'2 years' 
           ||' and case_l.isdeleted=' 
           || '''' 
           || 'Y' 
           || '''' 
           || 
    Xmlagg(XMLELEMENT(e, ('and '||child_tbl_name||'.'||child_col_name|| 
           ' = '|| 
           parent_tbl_name||'.'||parent_fk_col_nm)||' ')).EXTRACT('//text()') 
    INTO   v_iquery 
    FROM   infa_ilm.sfdc_relations1 
    START WITH child_tbl_name = v_childtbl_nme 
    CONNECT BY PRIOR parent_tbl_name = child_tbl_name; 

    v_istatement := v_iquery; 
END isql;