Я делал примерно следующее:
на входе процедуры имена таблиц для сравнения,
за тем я создавал временку, где были поля идентифицирующие номер записи и флаг, принцип флага 0 -значение не изменилось, -1 запись отсутсвует, 1 значение изменилось, ну а дальше все просто, из системных таблиц извлекалось имя столбцов таблицы, т.е. открывался курсор который бегал по именам столбцов, на их основе делался запрос на сравнение значений ABS(Compare()) и вливание результата во времянку, затем во времянке убивались все записи где флаг = 0, ну а оставшиеся записи показывали что надо изменять.
Вот что получилось...

create PROCEDURE "DBA"."procUpgradeTable"(in Table_ varchar(256),in Table1 varchar(256))
begin
declare inIdTable integer;
declare column_id_tmp integer;
declare column_name_tmp varchar(256);
declare recId_tmp varchar(256);
declare s varchar(2048);
declare UTable_ varchar(256);
declare UTable1 varchar(256);
declare Err_not_Found exception for sqlstate value '02000';
declare NewColumns dynamic scroll cursor for select column_id,column_name from SYS.SYSCOLUMN where table_id = inIdTable order by column_id asc;
declare NewStrings dynamic scroll cursor for select distinct keyOrg from tblOrlovTMP where
(name_Table = Table1 or name_Table = Table_) and flagDb < 0;
declare local temporary table tblOrlovTMP(
idRec integer not null default
autoincrement,
KeyOrg integer null,
Flagdb integer null,
Name_table varchar(256) null,
primary key( idRec) ,
) on commit delete rows;
set UTable1=Ucase(Table1);
set UTable_=Ucase(Table_);
delete from OrlovTemp where name_Table = Table1;
delete from OrlovTemp where name_Table = Table_;
select table_id into inIdTable from SYS.SYStable where table_name = table1;
/* Сравнение столбцов таблиц новой Table1 и старой Table_ */
open NewColumns;
For_NewColumns_loop1: loop
fetch next NewColumns into column_id_tmp,column_name_tmp;
if sqlstate = Err_not_Found then
leave For_NewColumns_loop1
end if;
if column_id_tmp = 1 then
/* счетчик, если flafDb -1 то новая строка */
set recId_tmp=column_Name_tmp;
set s=string('insert into tblOrlovTMP( keyOrg,FlagDb,Name_table) ( select "',recid_tmp,'",');
set s=string(s,' -1 ,',"char"(39),Utable1,"char"(39));
set s=string(s,' from ',table1,' where not ( "',recid_tmp,'" in (');
set s=string(s,' select "',recid_tmp,'" from ',table_,' )))');
execute immediate s
else
/* остальные поля, если flafDb 0 или null то нет изменений */
set s=string(' insert into tblOrlovTMP( keyOrg,FlagDb,Name_table) ( select a."',recid_tmp,'",');
set s=string(s,'abs(Compare(a."',column_Name_tmp,'",b."',column_Name_tmp,'")),',"char"(39),Utable1,"char"(39));
set s=string(s,' from ',table1,' as a, ',table_,' as b where a."',recid_tmp,'"= b."',recid_tmp,'" )');
execute immediate s
end if
end loop For_NewColumns_loop1;
close NewColumns;
/* Сравнение столбцов таблиц старой Table_ и новой Table1 */
select table_id into inIdTable from SYS.SYStable where table_name = table_;
open NewColumns;
For_NewColumns_loop2: loop
fetch next NewColumns into column_id_tmp,column_name_tmp;
if sqlstate = Err_not_Found then
leave For_NewColumns_loop2
end if;
if column_id_tmp = 1 then
/* счетчик, если flafDb -2 то строка в старой таблице отсуствует в новой */
set recId_tmp=column_Name_tmp;
set s=string('insert into tblOrlovTMP( keyOrg,FlagDb,Name_table) ( select "',recid_tmp,'",');
set s=string(s,' -2 ,',"char"(39),Utable_,"char"(39));
set s=string(s,' from ',table_,' where not ( "',recid_tmp,'" in (');
set s=string(s,' select "',recid_tmp,'" from ',table1,' )))');
execute immediate s
else
/* остальные поля, если flafDb 0 или null то нет изменений */
set s=string(' insert into tblOrlovTMP( keyOrg,FlagDb,Name_table) ( select a."',recid_tmp,'",');
set s=string(s,'abs(Compare(a."',column_Name_tmp,'",b."',column_Name_tmp,'")),',"char"(39),Utable_,"char"(39));
set s=string(s,' from ',table_,' as a, ',table1,' as b where a."',recid_tmp,'"= b."',recid_tmp,'" )');
execute immediate s
end if
end loop For_NewColumns_loop2;
close NewColumns;
/* очистка о данных которые не изменились */
delete from tblOrlovTMP where keyOrg = 0;
delete from tblOrlovTMP where(FlagDb = 0 or FlagDb is null);
/* сканирование если надо всталять или удалять всю строку */
open NewStrings;
For_NewStrings_loop: loop
fetch next NewStrings into column_id_tmp;
if sqlstate = Err_not_Found then
leave For_NewStrings_loop
end if;
delete from tblOrlovTMP where(name_Table = Table1 or name_Table = Table_) and flagDb > 0 and
keyorg = column_id_tmp
end loop For_NewStrings_loop;
close NewStrings;
/* Вставка данных в таблицу OrlovTemp */
insert into OrlovTemp( keyOrg,Flagdb,Name_table) (
select distinct keyorg,1,Name_table from tblOrlovTMP where(name_Table = UTable1 or name_Table = UTable_) and
FlagDb > 0);
insert into OrlovTemp( keyOrg,Flagdb,Name_table) (
select distinct keyorg,-2,UTable_ from tblOrlovTMP where(name_Table = UTable1 or name_Table = UTable_) and
FlagDb = -2);
insert into OrlovTemp( keyOrg,Flagdb,Name_table) (
select distinct keyorg,-1,UTable_ from tblOrlovTMP where(name_Table = UTable1 or name_Table = UTable_) and
FlagDb = -1);
select column_name into column_name_tmp from SYS.SYSCOLUMN where column_id = 1 and table_id = (select table_id from SYS.SYStable where table_name = table_);
set s=string('delete from "',TABLE_,'" where "',column_name_tmp,'" in (');
set s=string(s,' select keyOrg from OrlovTemp where Name_table=',"char"(39),UTable_,"char"(39),')');
execute immediate s;
set s=string('insert into "',TABLE_,'"(');
set s=string(s,' select * from "',Table1,'" where "',column_name_tmp,'" in ');
set s=string(s,' ( select distinct keyOrg from OrlovTemp where Name_table=',"char"(39),Utable_,"char"(39),'))');
execute immediate s;
drop table tblOrlovTMP;
commit work
end

Да, забыл сказать именно в таблице OrlovTemp получается информация какие записи надо менять
там idrec autoincrement
keyOrg integer - номер записи
FlagDb integer - удалять/изменять/вставлять
Name_table varchar(255) - в какой таблице