Requirement with hierarchical query results

Question

I've a table contains the following columns and the data
create table test_test2 (do_id_tp varchar2(32),do_id number ,do_up_tp varchar2(32),do_up_id number)
insert into test_test2 values('A_S',100170,'A_S',100001);
insert into test_test2 values('P_G',1001052,'P_G',100001);
insert into test_test2 values('A_S',1001054,'P_G',100001);
insert into test_test2 values('A_S',1001055,'P_G',100001);
insert into test_test2 values('P_G',1001037,'P_G',100001);
insert into test_test2 values('P_G',1001038,'P_G',100001);
insert into test_test2 values('A_S',1001053,'P_G',100001);
insert into test_test2 values('A_S',1001056,'P_G',100001);
insert into test_test2 values('A_S',1001052,'P_G',100001);
insert into test_test2 values('A_S',1001051,'P_G',100001);
insert into test_test2 values('P_G',100001,'R_S',100001);
insert into test_test2 values('P_G',1001031,'R_S',100001);
insert into test_test2 values('P_G',1001035,'R_S',100001);
insert into test_test2 values('A_S',100170,'P_G',100001);
insert into test_test2 values('A_S',1001054,'A_S',100001);
insert into test_test2 values('A_S',1001055,'A_S',100001);
insert into test_test2 values('A_S',1001053,'A_S',100001);
insert into test_test2 values('A_S',1001056,'A_S',100001);
insert into test_test2 values('A_S',1001051,'A_S',100001);
insert into test_test2 values('A_S',1001052,'A_S',100001);
insert into test_test2 values('A_S',100001,'P_G',100001);In the above data R_S is at high level (Means P_G and A_S should depend on R_S)
similarly P_G is next level ( A_S should depend on P_G OR P_G depends on P_G)
the lower level is A_S ( A_S depends on A_S)
So i tried the following query which gives the child list of a parent
SELECT  DO_UP_TP,DO_UP_ID ,do_id_tp,wm_concat( CONNECT_BY_ROOT  do_id) 
                                FROM test_test2
                                where do_up_id=100001
                                   CONNECT BY  nocycle PRIOR do_up_id = do_id
                                   group  by  DO_UP_TP,DO_UP_ID ,do_id_tp;The requirement is for each do_up_id ( i'll get a list of do_id (which are in wm_concat).).
i've to check in flag column in Following table
create table check_test2 (d_id ) as
select do_up_id from test_test2 union
select do_id from test_test2   
alter table check_test2 add (flag char(1) DEFAULT 'N')For Ex: R_S (100001) has the childs P_G(100001),P_G(1001031),P_G(1001035) {This is a branch in a Tree}
Now first i've to check R_S(100001) is active or not in the check_test2 table, If 'N' then check it's child's flag until it finds no more childs.
If no child is having 'Y' then mark the entire branch as 'N'
This i've to do for all the do_up_id in TEST_TEST2 table.
I tried the following package plz correct me as per requirement
CREATE OR REPLACE package USPF_APR.test_pak1 as
FUNCTION map_object ( obj_typ_in VARCHAR2 ) RETURN VARCHAR2;
  CURSOR c_c1
    IS
     select * from test_test2 where (do_id in (100001) or do_up_id in (100001));
    TYPE test_ttyp IS TABLE OF c_c1%ROWTYPE INDEX BY PLS_INTEGER;
procedure search_obj(obj_type varchar2);
end;
CREATE OR REPLACE package body USPF_APR.test_pak1 as
FUNCTION map_object ( obj_typ_in VARCHAR2 ) RETURN VARCHAR2
     IS
  begin
       dbms_output.put_line ('Hello');
  return 'abc';
end;
PROCEDURE search_obj (obj_type VARCHAR2)
   IS
      test_tab   test_ttyp;
      test_tab_r   c_c1%ROWTYPE;
      dep_up_id NUMBER;
      dep_id NUMBER;
      con_dep_up_id VARCHAR2(2100);
      con_dep_id VARCHAR2(2100);
   BEGIN
      OPEN c_c1;
        LOOP
             Fetch c_c1 into test_tab_r;
             exit when c_c1%NOTFOUND;
             test_tab(test_tab.COUNT + 1) := test_tab_r;
         END LOOP;
        CLOSE c_c1;  
              DBMS_OUTPUT.put_line ('Test_tab.count is ...'|| test_tab.COUNT);
        FOR i IN 1 .. test_tab.COUNT LOOP
                               WITH T AS
                      ( SELECT test_tab(i).do_id   , test_tab(i).do_up_id
                          FROM DUAL)
                           SELECT test_tab(i).do_up_id ,wm_concat( CONNECT_BY_ROOT test_tab(i).do_id)  INTO dep_up_id ,dep_id
                                FROM T
                                CONNECT BY  nocycle PRIOR test_tab(i).do_up_id=test_tab(i).do_id
                                   group  by test_tab(i).do_up_id;
                                 con_dep_id := con_dep_id || ',' || dep_id;                         
                  DBMS_OUTPUT.put_line ('Value of dep_id'||con_dep_id );
       END LOOP;
        DBMS_OUTPUT.put_line ('.....****************************...');
         ----   Here need to compare with check_test2 table  for the active ness of the id  in where condition i've to pass the con_dep_id
         ---    But how to differentiate  For which parent the child is checking the childs
         --   The invalid records( where  for ex:do_up_id =100001 ) should be removed form test_tab   Or the valid records can be copied to another associative array having the same structure as test_tab
    END;
   END;
EXEC TEST_PAK1.search_obj ('Hi');
I even confused with
SELECT test_tab(i).do_up_id ,wm_concat( CONNECT_BY_ROOT test_tab(i).do_id)  INTO dep_up_id ,dep_id
because wm_concat gives me ' , ' sepearated values where they can't fit into dep_id variablecreating global temporary tables will be useful or not !!!
Plz help me
Edited by: smile on Jan 5, 2012 10:23 PM

Answer 1

I've a table contains the following columns and the data
create table test_test2 (do_id_tp varchar2(32),do_id number ,do_up_tp varchar2(32),do_up_id number)
insert into test_test2 values('A_S',100170,'A_S',100001);
insert into test_test2 values('P_G',1001052,'P_G',100001);
insert into test_test2 values('A_S',1001054,'P_G',100001);
insert into test_test2 values('A_S',1001055,'P_G',100001);
insert into test_test2 values('P_G',1001037,'P_G',100001);
insert into test_test2 values('P_G',1001038,'P_G',100001);
insert into test_test2 values('A_S',1001053,'P_G',100001);
insert into test_test2 values('A_S',1001056,'P_G',100001);
insert into test_test2 values('A_S',1001052,'P_G',100001);
insert into test_test2 values('A_S',1001051,'P_G',100001);
insert into test_test2 values('P_G',100001,'R_S',100001);
insert into test_test2 values('P_G',1001031,'R_S',100001);
insert into test_test2 values('P_G',1001035,'R_S',100001);
insert into test_test2 values('A_S',100170,'P_G',100001);
insert into test_test2 values('A_S',1001054,'A_S',100001);
insert into test_test2 values('A_S',1001055,'A_S',100001);
insert into test_test2 values('A_S',1001053,'A_S',100001);
insert into test_test2 values('A_S',1001056,'A_S',100001);
insert into test_test2 values('A_S',1001051,'A_S',100001);
insert into test_test2 values('A_S',1001052,'A_S',100001);
insert into test_test2 values('A_S',100001,'P_G',100001);In the above data R_S is at high level (Means P_G and A_S should depend on R_S)
similarly P_G is next level ( A_S should depend on P_G OR P_G depends on P_G)
the lower level is A_S ( A_S depends on A_S)
So i tried the following query which gives the child list of a parent
SELECT  DO_UP_TP,DO_UP_ID ,do_id_tp,wm_concat( CONNECT_BY_ROOT  do_id) 
                                FROM test_test2
                                where do_up_id=100001
                                   CONNECT BY  nocycle PRIOR do_up_id = do_id
                                   group  by  DO_UP_TP,DO_UP_ID ,do_id_tp;The requirement is for each do_up_id ( i'll get a list of do_id (which are in wm_concat).).
i've to check in flag column in Following table
create table check_test2 (d_id ) as
select do_up_id from test_test2 union
select do_id from test_test2   
alter table check_test2 add (flag char(1) DEFAULT 'N')For Ex: R_S (100001) has the childs P_G(100001),P_G(1001031),P_G(1001035) {This is a branch in a Tree}
Now first i've to check R_S(100001) is active or not in the check_test2 table, If 'N' then check it's child's flag until it finds no more childs.
If no child is having 'Y' then mark the entire branch as 'N'
This i've to do for all the do_up_id in TEST_TEST2 table.
I tried the following package plz correct me as per requirement
CREATE OR REPLACE package USPF_APR.test_pak1 as
FUNCTION map_object ( obj_typ_in VARCHAR2 ) RETURN VARCHAR2;
  CURSOR c_c1
    IS
     select * from test_test2 where (do_id in (100001) or do_up_id in (100001));
    TYPE test_ttyp IS TABLE OF c_c1%ROWTYPE INDEX BY PLS_INTEGER;
procedure search_obj(obj_type varchar2);
end;
CREATE OR REPLACE package body USPF_APR.test_pak1 as
FUNCTION map_object ( obj_typ_in VARCHAR2 ) RETURN VARCHAR2
     IS
  begin
       dbms_output.put_line ('Hello');
  return 'abc';
end;
PROCEDURE search_obj (obj_type VARCHAR2)
   IS
      test_tab   test_ttyp;
      test_tab_r   c_c1%ROWTYPE;
      dep_up_id NUMBER;
      dep_id NUMBER;
      con_dep_up_id VARCHAR2(2100);
      con_dep_id VARCHAR2(2100);
   BEGIN
      OPEN c_c1;
        LOOP
             Fetch c_c1 into test_tab_r;
             exit when c_c1%NOTFOUND;
             test_tab(test_tab.COUNT + 1) := test_tab_r;
         END LOOP;
        CLOSE c_c1;  
              DBMS_OUTPUT.put_line ('Test_tab.count is ...'|| test_tab.COUNT);
        FOR i IN 1 .. test_tab.COUNT LOOP
                               WITH T AS
                      ( SELECT test_tab(i).do_id   , test_tab(i).do_up_id
                          FROM DUAL)
                           SELECT test_tab(i).do_up_id ,wm_concat( CONNECT_BY_ROOT test_tab(i).do_id)  INTO dep_up_id ,dep_id
                                FROM T
                                CONNECT BY  nocycle PRIOR test_tab(i).do_up_id=test_tab(i).do_id
                                   group  by test_tab(i).do_up_id;
                                 con_dep_id := con_dep_id || ',' || dep_id;                         
                  DBMS_OUTPUT.put_line ('Value of dep_id'||con_dep_id );
       END LOOP;
        DBMS_OUTPUT.put_line ('.....****************************...');
         ----   Here need to compare with check_test2 table  for the active ness of the id  in where condition i've to pass the con_dep_id
         ---    But how to differentiate  For which parent the child is checking the childs
         --   The invalid records( where  for ex:do_up_id =100001 ) should be removed form test_tab   Or the valid records can be copied to another associative array having the same structure as test_tab
    END;
   END;
EXEC TEST_PAK1.search_obj ('Hi');
I even confused with
SELECT test_tab(i).do_up_id ,wm_concat( CONNECT_BY_ROOT test_tab(i).do_id)  INTO dep_up_id ,dep_id
because wm_concat gives me ' , ' sepearated values where they can't fit into dep_id variablecreating global temporary tables will be useful or not !!!
Plz help me
Edited by: smile on Jan 5, 2012 10:23 PM