Rem drv:
Rem
Rem $Header: callback_upgrade.sql 24-oct-2005.16:10:34 ychan Exp $
Rem
Rem callback_upgrade.sql
Rem
Rem Copyright (c) 2005, Oracle. All rights reserved.
Rem
Rem NAME
Rem callback_upgrade.sql -
Rem
Rem DESCRIPTION
Rem
Rem
Rem NOTES
Rem
Rem
Rem MODIFIED (MM/DD/YY)
Rem ychan 10/24/05 - Fix bug 4642958
Rem ychan 08/23/05 - ychan_bug-4129031
Rem ychan 08/17/05 - Created
Rem
-- NOTE: For DB TARGET UPGRADE
---this will remove property change callback and add meta category callback
BEGIN
BEGIN
mgmt_properties.del_property_change_callback(p_target_type=>'oracle_database',
p_procedure_name=>'mgmt_db_upgrade.change_ver_inst',
p_property_name=>'Version',
p_new_property_value=>'%');
EXCEPTION
when others then
IF EMDW_LOG.p_is_info_set THEN
emdw_log.info('mgmt_properties.del_property_change_callback - oracle_database.mgmt_db_upgrade: ' || SQLERRM, 'MGMT_DB_UPGRADE');
END IF;
END;
BEGIN
mgmt_properties.del_property_change_callback(p_target_type=>'rac_database',
p_procedure_name=>'mgmt_db_upgrade.change_ver_rac',
p_property_name=>'Version',
p_new_property_value=>'%');
EXCEPTION
when others then
IF EMDW_LOG.p_is_info_set THEN
emdw_log.info('mgmt_properties.del_property_change_callback - rac_database.mgmt_db_upgrade: ' || SQLERRM, 'MGMT_DB_UPGRADE');
END IF;
END;
BEGIN
mgmt_target.add_metaver_catprop_callback(p_target_type=>'oracle_database',
p_callback_name=>'mgmt_db_upgrade.change_ver_inst',
p_eval_order=>-1);
EXCEPTION
when others then
IF EMDW_LOG.p_is_info_set THEN
emdw_log.info('mgmt_target.add_metaver_catprop_callback - oracle_database.mgmt_db_upgrade: ' || SQLERRM, 'MGMT_DB_UPGRADE');
END IF;
END;
BEGIN
mgmt_target.add_metaver_catprop_callback(p_target_type=>'rac_database',
p_callback_name=>'mgmt_db_upgrade.change_ver_rac',
p_eval_order=>-1);
EXCEPTION
when others then
IF EMDW_LOG.p_is_info_set THEN
emdw_log.info('mgmt_target.add_metaver_catprop_callback - rac_database.mgmt_db_upgrade: ' || SQLERRM, 'MGMT_DB_UPGRADE');
END IF;
END;
END;
/
commit;