home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a525 / 51.ddi / MIGRATE.VRF < prev    next >
Encoding:
Text File  |  1993-03-22  |  4.9 KB  |  114 lines
  1. /*   Copyright (c) Oracle Corporation 1993.  All Rights Reserved */
  2. /*****************************************************************************
  3.   NAME
  4.     migrate.vrf - Netware V3 installation verification script for the
  5.                   V6 Migration Utility
  6.  
  7.   DESCRIPTION
  8.     This script checks dependencies and environment settings for installation
  9.     of the V6 Migration Utility.
  10.  
  11.   OWNER
  12.     Dan Galatin
  13.  
  14.   MODIFIED    MM/DD/YY  Reason
  15.     dgalatin  25-FEB-93 Created.
  16. *****************************************************************************/
  17. {
  18.   product = netwareinstall;
  19.   product_label = product_interface_label(product);
  20.  
  21.   ui_product(product_label);
  22.   ui_action( instantiate( nls("analyze_depend","Analyzing %%product_label%% Dependencies...") ) );
  23.  
  24.   if (bootstrap)
  25.   {
  26.     installing_msbs = nls("installing_msbs",
  27.                           "Installing %%product_label%% Message Files...");
  28.     installing_sql = nls("installing_sql",
  29.                          "Installing %%product_label%% SQL Scripts...");
  30.     installing_nlms = nls("installing_nlms",
  31.                           "Installing %%product_label%% NLMs...");
  32.     install_done_prompt = nls("install_done_prompt",
  33.                               "The %%product_label%% has been installed. Please run %%oracle_home%%\NLM\ORAMIG.NLM from your Netware console in order to migrate your V6 database files.");
  34.     install_done_content = product_label;
  35.     install_done_help = nls("install_done_help",
  36.                             "The %%product_label%% has been installed. Please run %%server%%\%%oracle_home%%\NLM\ORAMIG.NLM from your Netware console in order to migrate your V6 database files. Unless you do this, your V6 files will not be compatible with ORACLE7.");
  37.  
  38.     /* Set the SUBDIR variable to put files in V6 directory (DBS) */
  39.     subdir = "%ORACLE_HOME%\DBS";
  40.  
  41.     return( sum( nlm, msg, nls_abbreviation, sql ) );
  42.   }
  43.   else /* not the bootstrap */
  44.   {
  45.     /* Is RDBMS70 is already there and is it pointing to a valid directory? */
  46.     {
  47.       rdbms70 = translate("RDBMS70","%SERVER%\SYS:SYSTEM\CONFIG.ORA");
  48.  
  49.       if (not(exists(rdbms70)))
  50.         signal('UNBOUND_ENVIRONMENT_VARIABLE);
  51.     }
  52.       [ 'UNBOUND_ENVIRONMENT_VARIABLE: rdbms70 = "%oracle_home%\RDBMS70";
  53.         'READ_ERROR                  : rdbms70 = "%oracle_home%\RDBMS70"; ]
  54.  
  55.     mark
  56.     {
  57. /*****************************************************************************
  58.    Check if the product has already been installed ...
  59. *****************************************************************************/
  60.       doit = TRUE;
  61.  
  62.       if (registered(product_name(product)))
  63.       {
  64.         registry = registration(product_name(product));
  65.         current_version = product_version(product);
  66.         installed_version = registry_version(registry);
  67.  
  68.         if (earlier_version(registry,current_version))
  69.         {
  70.           doit = yesno_dialog(instantiate(reinstall_prompt01));
  71.  
  72.           if (not(doit))
  73.             if (internally_called)
  74.               information_dialog(instantiate(reinstall_prompt02));
  75.         }
  76.         else if (not(internally_called))
  77.           if (later_version(registry,current_version))
  78.             doit = yesno_dialog(instantiate(reinstall_prompt03));
  79.           else
  80.             doit = yesno_dialog(instantiate(reinstall_prompt04));
  81.         else
  82.           doit = FALSE;
  83.       }
  84.     }
  85.  
  86.     if (doit)
  87.       {
  88.         installing_scripts = nls("installing_scripts",
  89.                                  "Installing %%product_label%% Scripts...");
  90.         installing_msbs = nls("installing_msbs",
  91.                               "Installing %%product_label%% Message Files...");
  92.         installing_sql = nls("installing_sql",
  93.                              "Installing %%product_label%% SQL Scripts...");
  94.         installing_nlms = nls("installing_nlms",
  95.                               "Installing %%product_label%% NLMs...");
  96.         install_done_prompt = nls("install_done_prompt",
  97.                                   "The %%product_label%% has been installed. Please run %%oracle_home%%\NLM\ORAMIG.NLM from your Netware console in order to migrate your V6 database files.");
  98.         install_done_content = product_label;
  99.         install_done_help = nls("install_done_help",
  100.                                 "The %%product_label%% has been installed. Please run %%server%%\%%oracle_home%%\NLM\ORAMIG.NLM from your Netware console in order to migrate your V6 database files. Unless you do this, your V6 files will not be compatible with ORACLE7.");
  101.         modifying_server_config = nls("modifying_server_config",
  102.                                       "Modifying %%server%%/%%ora_config%%...");
  103.         registering = nls("registering","Registering %%product_label%%...");
  104.  
  105.         /* Set the SUBDIR variable to put files in V7 directory (RDBMS70) */
  106.         subdir = RDBMS70;
  107.  
  108.         return( sum( deinstl, nlm, msg, nls_abbreviation, sql ) );
  109.       }
  110.     else
  111.       return(0);
  112.   }
  113. }
  114.