home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a525 / 27.ddi / ORAINST2.VRF < prev   
Encoding:
Text File  |  1993-02-24  |  2.4 KB  |  79 lines
  1. /* Copyright (c) Oracle Corporation 1992.  All Rights Reserved */
  2. /*****************************************************************************
  3.   NAME
  4.     orainst2.vrf - V3.0.9.2 version analysis/product configuration script for
  5.            V2 Installer
  6.  
  7.   DESCRIPTION
  8.     This script checks dependencies and environment settings for the
  9.     installation of the V2 Installer.
  10.  
  11.   OWNER
  12.     Kush Deepak Jain
  13.  
  14.   MODIFIED    DD-MM-YY    Reason
  15.     kjain     02-03-92    Created.
  16. *****************************************************************************/
  17. {
  18.   product_label = product_interface_label(current_product);
  19.  
  20.   ui_product(product_label);
  21.  
  22.   analyzing_dependencies = instantiate(nls("analyzing_dependencies",
  23.                        "Analyzing %%product_label%% Dependencies..."));
  24.  
  25.   ui_action(analyzing_dependencies);
  26.  
  27.   doit = TRUE;
  28.  
  29.   if (registered(product_name(current_product)))
  30.     {
  31.       registry = registration(product_name(current_product));
  32.       current_version = product_version(current_product);
  33.       installed_version = registry_version(registry);
  34.  
  35.       if (earlier_version(registry,current_version))
  36.     {
  37.       doit = yesno_dialog(instantiate(reinstall_prompt01),TRUE,
  38.                   instantiate(reinstall_content01),
  39.                   instantiate(reinstall_help01));
  40.  
  41.       if (not(doit))
  42.         if (bootstrap)
  43.           information_dialog(instantiate(reinstall_prompt02),
  44.                  instantiate(reinstall_content02),
  45.                  instantiate(reinstall_help02),);
  46.     }
  47.       else if (later_version(registry,current_version))
  48.     doit = yesno_dialog(instantiate(reinstall_prompt03),FALSE
  49.                 instantiate(reinstall_content03),
  50.                 instantiate(reinstall_help03));
  51.       else /* if (not(bootstrap)) */
  52.     doit = yesno_dialog(instantiate(reinstall_prompt04),FALSE,
  53.                 instantiate(reinstall_content04),
  54.                 instantiate(reinstall_help04));
  55.     }
  56.  
  57.   if (doit)
  58.     {
  59.  
  60.       subdirectory = "%oracle_home%\PBIN";
  61.       make_directory(subdirectory);
  62.       subdirectory = "%oracle_home%\BIN";
  63.       make_directory(subdirectory);
  64.  
  65.       copy_file("PLOADR.COM","%oracle_home%\PBIN\");
  66.  
  67.       installing_executables = nls("installing_executables",
  68.                    "Installing %%product_label%% Executables...");
  69.       installing_scripts = nls("installing_scripts",
  70.                    "Installing %%product_label%% Scripts...");
  71.  
  72.       registering_product = nls("registering_product",
  73.                 "Registering %%product_label%%...");
  74.  
  75.       return(sum(deinstl,exe));
  76.     }
  77.   else
  78.     return(0);
  79. }