/* Copyright (c) Oracle Corporation 1996. All Rights Reserved */ /***************************************************************************** NAME d2dh60.vrf - V3 version analysis/product configuration script for Common Help Files DESCRIPTION This script checks dependencies and environment settings for the installation of Common Help Files. MODIFIED MM/DD/YY Reason pgupta 11/12/97 Created *****************************************************************************/ { reinstall_group = nls("reinstall_group","Version %%installed_version%% of %%product_label%% has already been installed and is up to date. Do you want to reinstall it?"); reinstall_group_help = nls("reinstall_group_help","You selected to install %%product_label%%, which is up to date. Unless a problem has occurred with %%product_label%%, there is no need to reinstall. Choose 'No' to skip the reinstallation, or choose 'Yes' if you want to reinstall %%product_label%%."); { doit = execute("%installer_home%%dir_separator%%operating_system%.vrf"); } [ 'UNBOUND_VARIABLE: { required_version = product_version(instver_product); temp = explode(required_version, "."); required_version = implode(list(first(temp),first(rest(temp)), first(rest(rest(temp))), first(rest(rest(rest(temp))))), "."); signal('FAILURE, instantiate(nls("instver_too_early1", "The version of the Installer currently running is %%installer_version%%. The installation you have chosen requires version %%required_version%% or later. Please run version %%required_version%% or later in order to perform this installation."))); } ] /* This FAILURE will cause 3.0.x.x installer to exit gracefully. */ doit = TRUE; if (doit) { /******************************* Set the VRF-INS script "ratchet" ********************************/ vrf_ratchet = "6.0.8.11.0"; main_product_version = "6.0.8.6.8"; /*************************** Check Installed Version ***************************/ if(registered(product_name(current_product))) { check_installed_version = registry_version(registration(product_name(current_product))); if(earlier_version(check_installed_version, main_product_version)) { information_dialog(instantiate(product_upgrade_required), instantiate(product_upgrade_contents), instantiate(product_upgrade_help)); refresh_map_file = FALSE; doit = FALSE; return(0); } } else { information_dialog(instantiate(main_product_required), instantiate(main_product_contents), instantiate(main_product_help)); refresh_map_file = FALSE; doit = FALSE; signal('FAILURE, instantiate(halt_installation)); } /************************************************ Create a label with the product name, and version *************************************************/ EXECUTE_SCRIPT = "CREATE_LABEL"; execute("%installer_home%%dir_separator%d2kr2vrf.usr"); /************************************************/ /************************* Set Product Name variables **************************/ REQUIRED_PRODUCTS_LIST = list(w32fhl60); /* w32oin60, removed for Patch-3 */ required_products_to_install = list(); /*************************/ /********************************************************************** parent_in_control = TRUE ==> the complete product needs to be installed parent_in_control = FALSE ==> PARENT called by one of the components ***********************************************************************/ parent_in_control = TRUE; if(not(member(selected_products, current_product))) { child_products = all_child_products(current_product); while(not(empty(child_products))) { next_child = first(child_products); child_products = rest(child_products); if(member(products_for_installation, next_child)) /* PARENT called by one of the components, no need to add PARENT to the list of products to be installed */ parent_in_control = FALSE; } } /**********************************************************************/ /************************** Determine installation path ***************************/ install_variable = "OIN"; default_home = "%oracle_home%%dir_separator%OIN"; OIN = execute("%installer_home%%dir_separator%instloc.usr"); TOOLS_HOME = "%ORACLE_HOME%%dir_separator%TOOLS"; DOC60 = "%TOOLS_HOME%%dir_separator%DOC60"; DOC60_NLS = "%DOC60%%dir_separator%%NLS_ABBREVIATION%"; /******************************************************************** Calculate total size of installation..... *********************************************************************/ total_sum = 0; /**************************************** Check which groups need to be installed *****************************************/ install_forms = TRUE; install_graphics = TRUE; install_graphrun = TRUE; install_procbldr = TRUE; install_transbldr = TRUE; install_schbldr = TRUE; install_projbldr = TRUE; install_qrybldr = TRUE; total_sum = total_sum + sum(forms,"us"); total_sum = total_sum + sum(forms,nls_abbreviation); total_sum = total_sum + sum(graphics,"us"); total_sum = total_sum + sum(graphics,nls_abbreviation); total_sum = total_sum + sum(graphics_runtime,"us"); total_sum = total_sum + sum(graphics_runtime,nls_abbreviation); total_sum = total_sum + sum(procedure_builder,"us"); total_sum = total_sum + sum(procedure_builder,nls_abbreviation); total_sum = total_sum + sum(project_builder,"us"); total_sum = total_sum + sum(project_builder,nls_abbreviation); total_sum = total_sum + sum(query_builder,"us"); total_sum = total_sum + sum(query_builder,nls_abbreviation); total_sum = total_sum + sum(schema_builder,"us"); total_sum = total_sum + sum(schema_builder,nls_abbreviation); total_sum = total_sum + sum(translation_builder,"us"); total_sum = total_sum + sum(translation_builder,nls_abbreviation); /**************************************************** Check if Information Navigator needs to be installed This is required by all of the products that depend on d2dh. *****************************************************/ /************************************************* Determine which of the required products specified in required_products_list need to be installed **************************************************/ while(not(empty(required_products_list))) { REQUIRED_PRODUCT = first(required_products_list); required_products_list = rest(required_products_list); EXECUTE_SCRIPT = "CHECK_REQUIRED_PRODUCT"; install_required_product = execute("%product_home%%dir_separator%d2kr2vrf.usr"); if (install_required_product) { total_sum = total_sum + verify(REQUIRED_PRODUCT); add(required_products_to_install, REQUIRED_PRODUCT); } } /*************************************************/ /*********************************************** If PARENT is explicitly called for installation, verify all the component products ************************************************/ EXECUTE_SCRIPT = "VERIFY_COMPONENTS"; total_sum = total_sum + execute("%product_home%%dir_separator%d2kr2vrf.usr"); /***********************************************/ total_sum = total_sum + sum(deinst,common); return(total_sum); /*************************************************/ if(child_in_control) { if(not(member(products_for_installation, w32fhl60))) { total_sum = total_sum + verify(w32fhl60); add(products_for_installation, w32fhl60); } } /********************************************************************/ /*************************** Return total size of files ***************************/ total_sum = total_sum + sum(deinst); total_sum = total_sum + sum(d2dhdes); return(total_sum); /************************************************************/ } else { refresh_map_file = FALSE; return(0); } }