oracle级联更新功能是啥,让oracle支持级联更新

create or replace package update_cascade

as

procedure on_table( p_table_name      in varchar2,

p_preserve_rowid  in boolean default TRUE,

p_use_dbms_output in boolean default FALSE );

end update_cascade;

/

create or replace package body update_cascade

as

type cnameArray is table of user_cons_columns.column_name%type

index by binary_integer;

sql_stmt           varchar2(32000);

use_dbms_output    boolean default FALSE;

preserve_rowid     boolean default TRUE;

function q( s in varchar2 ) return varchar2

is

begin

return '"'||s||'"';

end q;

function pkg_name( s in varchar2 ) return varchar2

is

begin

return q( 'u' || s || 'p' );

end pkg_name;

function view_name( s in varchar2 ) return varchar2

is

begin

return q( 'u' || s || 'v' );

end view_name;

function trigger_name( s in varchar2, s2 in varchar2 ) return varchar2

is

begin

return q( 'u' || s || s2 );

end trigger_name;

function strip( s in varchar2 ) return varchar2

is

begin

return ltrim(rtrim(s));

end strip;

procedure add( s in varchar2 )

is

begin

if ( use_dbms_output ) then

dbms_output.put_line( chr(9) || s );

else

sql_stmt := sql_stmt || chr(10) || s;

end if;

end add;

procedure execute_immediate

as

ex