Edit D:\app\Administrator\product\11.2.0\dbhome_1\sysman\admin\scripts\dbGetAdrHome.pl
# $Header: dbGetAdrHome.pl 20-feb-2007.11:59:30 loliu Exp $ # # dbGetAdrHome.pl # # Copyright (c) 2006, 2007, Oracle. All rights reserved. # # NAME # dbGetAdrHome.pl # # DESCRIPTION # Given the db_name and instance_name, determine # the complete path to ADR home. Note that this script should never # "die". It should always return some value for the ADR home. # # NOTES # <other useful comments, qualifications, etc.> # # MODIFIED (MM/DD/YY) # loliu 02/19/07 - Creation # use strict; use DBI; require "emd_common.pl"; require "dbAdrUtil.pl"; my $adr_home = get_diag_info_from_db("ADR Home"); EMAGENT_PERL_DEBUG("dbGetAdrHome: read from database adr_home=$adr_home"); $adr_home = read_or_save_state($adr_home, "adr.home"); if (!$adr_home) { $adr_home = ""; } EMAGENT_PERL_DEBUG("dbGetAdrHome: adr_home=$adr_home"); print "em_result=$adr_home\n"; exit 0;
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de