CREATE PROCEDURE "DBA"."GetDependedTable"(in cTableName char(30), in nID integer)
BEGIN

 declare curDependedTable dynamic scroll cursor for
 select 
  ft.table_name, 
  b.column_name,
  rt.remarks as table_remarks,
  rc.remarks as column_remarks
 from SYS.SYSFKEY fk, 
 SYS.SYSIDXCOL ic, 
 SYS.SYSIDX i, 
 SYS.SYSTAB pt, 
 SYS.SYSTAB ft 
 key join SYS.SYSTABCOL b
 left outer join SYS.SYSREMARK rc on rc.object_id = b.object_id 
 left outer join SYS.SYSREMARK rt on rt.object_id = ft.object_id 
 where (fk.foreign_table_id = ic.table_id) and 
       (fk.foreign_index_id = ic.index_id) and 
       (B.column_id = ic.column_id) and
       (ic.table_id = i.table_id) and 
       (ic.index_id = i.index_id) and 
       (i.index_category = 2) and
       (fk.foreign_table_id = ft.table_id) and 
       (fk.primary_table_id = pt.table_id) and
       (pt.table_name = cTableName);

 declare local temporary table tmpTable(
   TABLENAME char(30), 
   COLUMNNAME char(50),
   TABLEREMARK long varchar,
   COLUMNREMARK long varchar
   ) on commit delete rows;

 declare cDependTableName char(30);
 declare cDependColumnName char(50); 
 declare cDependTableRemark long varchar;
 declare cDependColumnRemark long varchar;

 declare cSQL long varchar;

 open curDependedTable;
 lab_DependedTable: loop

   fetch next curDependedTable into cDependTableName, cDependColumnName, cDependTableRemark, cDependColumnRemark;
   if @@sqlstatus <> 0 then
     leave lab_DependedTable
   end if;

   set cSQL = 'if exists(select * from dba.'||cDependTableName||' where '||cDependColumnName||'='||cast(nID as char)||') then '||
                'insert into tmpTable(TABLENAME,COLUMNNAME,TABLEREMARK,COLUMNREMARK) '||
                'values('||CHAR(39)||cDependTableName||CHAR(39)||','||CHAR(39)||cDependColumnName||CHAR(39)||','||
                           CHAR(39)||cDependTableRemark||CHAR(39)||','||CHAR(39)||dba.ExtractWord(1, cDependColumnRemark, '(')||CHAR(39)||') '||
              'endif';

   execute immediate cSQL;

 end loop lab_DependedTable;
 close curDependedTable;

 select * from tmpTable;

END

ALTER PROCEDURE "DBA"."GetDependedTable"(in cTableName char(30), in nID integer)
BEGIN

 declare curDependedTable dynamic scroll cursor for
 select 
  ft.table_name, 
  b.column_name,
  rt.remarks as table_remarks,
  rc.remarks as column_remarks
 from SYS.SYSFKEY as fk 
 join SYS.SYSIDXCOL as ic on (ic.table_id = fk.foreign_table_id) and (ic.index_id = fk.foreign_index_id) 
 join SYS.SYSIDX as i on (i.table_id = ic.table_id) and (i.index_id = ic.index_id) and (i.index_category = 2)
 join SYS.SYSTAB as pt on (pt.table_id = fk.primary_table_id) 
 join SYS.SYSTAB as ft on (ft.table_id = fk.foreign_table_id)
 key join SYS.SYSTABCOL as b on (b.column_id = ic.column_id)
 left outer join SYS.SYSREMARK rc on (rc.object_id = b.object_id) 
 left outer join SYS.SYSREMARK rt on (rt.object_id = ft.object_id) 
 where pt.table_name = cTableName;

 declare local temporary table #tmpTable(
   TABLENAME char(30), 
   COLUMNNAME char(50),
   TABLEREMARK long varchar,
   COLUMNREMARK long varchar
   ) on commit delete rows;

 declare cDependTableName char(30);
 declare cDependColumnName char(50); 
 declare cDependTableRemark long varchar;
 declare cDependColumnRemark long varchar;

 declare cSQL long varchar;

 open curDependedTable;
 lab_DependedTable: loop

   fetch next curDependedTable into cDependTableName, cDependColumnName, cDependTableRemark, cDependColumnRemark;
   if @@sqlstatus <> 0 then
     leave lab_DependedTable
   end if;

   set cSQL = 'if exists(select * from dba.'||cDependTableName||' where '||cDependColumnName||'='||cast(nID as char)||') then '||
                'insert into #tmpTable(TABLENAME,COLUMNNAME,TABLEREMARK,COLUMNREMARK) '||
                'values('||CHAR(39)||cDependTableName||CHAR(39)||','||CHAR(39)||cDependColumnName||CHAR(39)||','||
                           CHAR(39)||cDependTableRemark||CHAR(39)||','||CHAR(39)||cDependColumnRemark||CHAR(39)||') '||
              'endif';

   execute immediate cSQL;

 end loop lab_DependedTable;
 close curDependedTable;

 select * from #tmpTable;

END