home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 February / PCWK0296.iso / po7_win / db / rdbms71 / rdbms71.vrf < prev    next >
Text File  |  1995-03-27  |  25KB  |  580 lines
  1. /* Copyright (c) Oracle Corporation 1992.  All Rights Reserved */
  2. /*****************************************************************************
  3.   NAME
  4.     rdbms71.vrf - Windows V3 installation verification script for the
  5.                   Personal Oracle7 RDBMS.
  6.  
  7.   DESCRIPTION
  8.     This script checks dependencies and environment settings for installation
  9.     of the Personal Oracle7 RDBMS product and prompts the user for the option
  10.     of creating a seed database.
  11.  
  12.   OWNER
  13.     Tony Rodgers
  14.  
  15.   MODIFIED    DD-MMM-YY Reason
  16.   LMurphy      11/29/94 - modified NT RDBMS script for Personal Oracle7
  17.   syau         07/01/94 - 7.1.3
  18.   HA!          04/18/94   7.1.2 and 3.0.10.2
  19.    Hartenstine 04/20/93 - WIN_NT: Adapt to Windows NT
  20.     Colello    10/09/92 - DESKTOP: add demo and doc files
  21.     trodgers  01-APR-92 Created.
  22. *****************************************************************************/
  23. {
  24.   { doit = execute("%installer_home%\windows.vrf"); }
  25.   [
  26.     'UNBOUND_VARIABLE:
  27.       {
  28.         required_version = product_version(windowsinstver);
  29.         temp = explode(required_version,".");
  30.         required_version = implode(list(first(temp),first(rest(temp)),
  31.                                         first(rest(rest(temp))),
  32.                                         first(rest(rest(rest(temp))))),".");
  33.         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.")));
  34.       }
  35.   ]
  36.  
  37.   if (doit)
  38.     {
  39.       /***********************************************************************
  40.           Set the VRF-INS script "ratchet"
  41.        ***********************************************************************/
  42.       vrf_ratchet = "7.1.4.1.0C";
  43.  
  44.       permit_retry_operations = FALSE;
  45.  
  46.       /***********************************************************************
  47.          Bind path variables...
  48.       ************************************************************************/
  49.       {
  50.         set_rdbms71 = FALSE;
  51.         rdbms71 = v7_translate("RDBMS71");
  52.  
  53.         if (not(exists(rdbms71)))
  54.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  55.       }
  56.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  57.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  58.           {
  59.             rdbms71 = "%oracle_home%\RDBMS71";
  60.             set_rdbms71 = TRUE;
  61.           }
  62.         ]
  63.  
  64.       {
  65.         set_rdbms71_control = FALSE;
  66.         rdbms71_control = v7_translate("RDBMS71_CONTROL");
  67.  
  68.         if (not(exists(rdbms71_control)))
  69.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  70.       }
  71.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  72.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  73.           {
  74.             rdbms71_control = "%oracle_home%\DBS";
  75.             set_rdbms71_control = TRUE;
  76.           }
  77.         ]
  78.  
  79. /* New variable RDBMS71_PORACLE used for installation and de-installation
  80.    process - if RSF71.dei is run before RDBMS71.dei, the variable
  81.    RDBMS71 will be removed from the oracle.ini and be unbound
  82.    for RDBMS71.dei - RDBMS71_PORACLE is used in its place - controlled
  83.    exclusively by Personal Oracle install */
  84.       {
  85.         set_rdbms71_poracle = FALSE;
  86.         rdbms71_poracle = v7_translate("RDBMS71_PORACLE");
  87.  
  88.         if (not(exists(rdbms71_poracle)))
  89.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  90.       }
  91.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  92.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  93.           {
  94.             rdbms71_poracle = "%oracle_home%\RDBMS71";
  95.             set_rdbms71_poracle = TRUE;
  96.           }
  97.         ]
  98.  
  99.  
  100.       {
  101.         set_rdbms71_archive = FALSE;
  102.         rdbms71_archive = v7_translate("RDBMS71_ARCHIVE");
  103.  
  104.         if (not(exists(rdbms71_archive)))
  105.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  106.       }
  107.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  108.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  109.           {
  110.             rdbms71_archive = "%RDBMS71%\ARCHIVE";
  111.             set_rdbms71_archive = TRUE;
  112.           }
  113.         ]
  114.  
  115.       {
  116.         set_vs10 = FALSE;
  117.         vs10 = v7_translate("VS10");
  118.  
  119.         if (not(exists(vs10)))
  120.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  121.       }
  122.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  123.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  124.           {
  125.             vs10 = "%oracle_home%\VS10";
  126.             set_vs10 = TRUE;
  127.           }
  128.         ]
  129.  
  130.       {
  131.         set_local = FALSE;
  132.         local = v7_translate("LOCAL");
  133.  
  134.         if (not(exists(local)))
  135.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  136.       }
  137.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  138.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  139.           {
  140.             local = "2:";
  141.             set_local = TRUE;
  142.           }
  143.         ]
  144.  
  145.       {
  146.         set_sqlnet_dbname = FALSE;
  147.         sqlnet_dbname = v7_translate("SQLNET DBNAME oracle7");
  148.  
  149.         if (not(exists(sqlnet_dbname)))
  150.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  151.       }
  152.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  153.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  154.           {
  155.             sqlnet_dbname = "2:";
  156.             set_sqlnet_dbname = TRUE;
  157.           }
  158.         ]
  159.  
  160.      {
  161.         set_plsql21 = FALSE;
  162.         plsql21 = v7_translate("PLSQL21");
  163.  
  164.         if (not(exists(plsql21)))
  165.           signal('UNBOUND_ENVIRONMENT_VARIABLE);
  166.       }
  167.         [ 'OS_ERROR,'INVALID_FILE_NAME,
  168.           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE:
  169.           {
  170.             plsql21 = "%oracle_home%\PLSQL21";
  171.             set_plsql21 = TRUE;
  172.           }
  173.         ]
  174.     windir = windows_directory();
  175.     winsys = windows_system_directory();
  176.     vs10_ini = "%oracle_home%\vs10\vs10.ini";
  177.  
  178.     { bundle_name = bundle_name; }
  179.     [ 'UNBOUND_VARIABLE: bundle_name = "Personal Oracle7 for Windows"; ]
  180.     
  181. /* Determine which type of install - only Custom Install asks questions */
  182.     {
  183.     if (install_type == "Custom Install")
  184.         custom_install = TRUE;
  185.     else
  186.         custom_install = FALSE;
  187.     }
  188.     [ 'UNBOUND_VARIABLE: custom_install = TRUE; ]
  189.  
  190.       /***********************************************************************
  191.          Bind string variables & prompt strings...
  192.       ***********************************************************************/
  193.  
  194.       password_prompt = nls("password_prompt", "Choose a DBA password for your database.  Oracle requires this password to start up and shut down your database.  Null passwords and passwords containing spaces are not allowed.
  195.  
  196. Suggested Password:  Oracle");
  197.       password_prompt2 = nls("password_prompt2", "Null passwords and password containing spaces are not allowed.  Please enter another password.");
  198.       password_prompt3 = nls("password_prompt2", "The maximum password length is 30 characters.  Please enter another password.");
  199.       confirm_pass_prompt = nls("confirm_pass_prompt", "Enter your DBA password again to confirm.");
  200.       different_pass_prompt = nls("different_pass_prompt", "The second password you entered is different from the first.  Please enter the DBA password again.");
  201.       password_content = nls("password_content", "DBA Password");
  202.       password_help = nls("password_help","The password you enter is required to build, start up, and shut down your database.  The maximum password length is 30 characters.  Null passwords, passwords containing spaces and multi-byte characters are not allowed.");
  203.  
  204.       newpass = nls("newpass", "Password");
  205.       confirmpass = nls("confirmpass", "Confirm");
  206.       pword1 = list('LABEL, newpass, 'SECURE);
  207.       pword2 = list('LABEL, confirmpass 'SECURE);
  208.       pwords = list(pword1, pword2);
  209.  
  210.       reinstall_warning = instantiate(nls("reinstall_warning","The Oracle Installer detected a previously installed %%bundle_name%% Database on your machine.  Do you wish to overwrite this database with the Starter Database?
  211.  
  212. Choosing YES will DESTROY your existing data.  Choosing NO will prevent the installation of the Starter Database."));
  213.       reinstall_help = nls("reinstall_help", "Your existing database in %oracle_home%\DBS will be overwritten by the new Starter Database.");
  214.  
  215.       reinstall_sure = nls("reinstall_sure", "Are you sure?");
  216.  
  217.       pwm_err = nls("pwm_err", "Password Manager could not be run.");
  218.       sqldba_err = nls("sqldba_err", "SQL*DBA could not be run to startup your Starter Database.");
  219.       sqldba_fail = instantiate(nls("sqldba_fail", "There was an error in starting up the Starter Database.  Please see the file %%rdbms71%%\TRACE\BUILD.LOG for details."));
  220.       no_build_log = instantiate(nls("no_build_log", "There was an error in using SQL*DBA to start up the Starter Database."));
  221.  
  222.       db_inst_cancelled = instantiate(nls("db_inst_cancelled", "%%bundle_name%% installation cancelled."));
  223.       under_nt_prompt = instantiate(nls("under_nt_prompt", "The Oracle Installer has detected that you are attempting to install %%bundle_name%% under Windows NT.  This configuration is not supported.  Do you wish to continue the installation?"));
  224.       under_win95_prompt = instantiate(nls("under_win95_prompt", "The Oracle Installer has detected that you are attempting to install %%bundle_name%% under Windows 95.  This configuration is not supported.  Do you wish to continue the installation?"));
  225.  
  226.       nodetect = nls("nodetect", "The Oracle Installer could not detect which configuration this machine is running.  Please retry the installation.");
  227.       nodetect_orarun = instantiate(nls("nodetect_orarun", "The Oracle Installer could not detect whether a %%bundle_name%% Database is running.  If you know there is no database running, select YES to continue the installation.  Otherwise, select NO,  determine your database status and rerun the Oracle Installer."));
  228.       nodetect_orarun_help = instantiate(nls("nodetect_orarun", "The %%bundle_name%% Database cannot be running during installation.  Please verify the database is not running before attempting installation."));
  229.       nodetect_orarun_content = nls("nodetect_orarun_content", "Database Status");
  230.       nodetect_freemem = nls("nodetect_freemem", "The Oracle Installer could not detect the amount of available memory for starting up the database.  Do you wish to continue?");
  231.       nodetect_freemem_help = nls("nodetect_freemem_help", "The Oracle Installer could not detect the amount of available memory on your system.  If there is not enough memory, the startup of the Starter Database during the installation procedure could fail.  This process can be manually done after the installation.");
  232.       nodetect_freemem_content = nls("nodetect_freemem_content", "Memory Status");
  233.       not_enough_memory = nls("not_enough_memory", "Warning:  the Oracle Installer has detected that there may be insufficient memory for installation.  
  234.  
  235. Do you want to continue the installation?");
  236.       not_enough_memory_content = nls("not_enough_memory_content", "Insufficient Memory");
  237.       not_enough_memory_help = nls("not_enough_memory_help", "The Oracle Installer has detected that there may be insufficient memory for installation.  You can allocate more memory for the Installer by quiting some other applications or by increasing the current size of virtual memory.  You can also choose to continue the installation at your own risk.");
  238.       nowin32s = instantiate(nls("nowin32s", "The Oracle Installer could not locate Win32s on this machine.  Win32s is required by %%bundle_name%%.  To install Win32s, exit the Oracle Installer and run setup.exe from the WIN32S\DISK1 directory (CD-ROM install) or DISK1 of your Win32s disks (diskette install).  You must then re-run the Oracle Installer to install the %%bundle_name%%."));
  239.       oldwin32s = instantiate(nls("oldwin32s", "The Oracle Installer has detected an older version of Win32s on this machine.  To ensure successful installation of %%bundle_name%%, a Win32s of 1.20 or above must be installed on this machine.  To install a correct version of Win32s, exit the Oracle Installer and run setup.exe from the WIN32S\DISK1 directory (CD-ROM install) or DISK1 of your Win32s disks (diskette install).  You must then re-run the Oracle Installer to install the %%bundle_name%%."));
  240.  
  241.       oracle_upi = instantiate(nls("oracle_upi", "A %%bundle_name%% Database is currently running on this machine.  Please shut down the database before installing this software."));
  242.  
  243.       plseedsize = sum(plseed);
  244.       totalseed = plseedsize;
  245.       totalseed = totalseed / 1024;
  246.       totalseed = totalseed / 1024;      
  247.       totalseedsize = stringify(totalseed, FALSE);
  248.       
  249.       seed_help = nls("seed_help","The Oracle Installer can automatically create a Starter Database for you at this time.  Or, after installation, you may manually create a new database by following the instructions in the Oracle7 Documentation Help file.  The Starter Database requires %%totalseedsize%%M disk space.");
  250.       seed_content = instantiate(nls("seed_content","Starter Database"));
  251.       seed_option = instantiate(nls("seed_content","Starter Database"));
  252.  
  253.       db_prompt = nls("db_prompt","Do you wish to install the Starter Database?");
  254.       db_help = instantiate(nls("db_help","If you wish to install the Starter Database choose YES.  The Oracle7 RDBMS software automatically will be installed.
  255.  
  256. %seed_content%:
  257.  
  258. %seed_help%"));
  259.       db_content = nls("db_content","Starter Database");
  260.  
  261.       sndevnts_prompt = instantiate(nls("sndevnts_prompt","The version of Microsoft Sound System 2.0 installed on your computer is incompatible with %%bundle_name%%.
  262.  
  263. Do you wish to update your system with a new version of the sound driver (sndevnts.drv) which is compatible with %%bundle_name%%?"));
  264.       sndevnts_content = nls("sndevnts_content","Microsoft Sound System 2.0");
  265.       sndevnts_help = instantiate(nls("sound_drv_inst_help","The sound driver (sndevnts.drv) used by Microsoft Sound System 2.0 is incompatible with %%bundle_name%%.  The Installer can update sndevnts.drv with a new version of the driver that is compatible with %%bundle_name%%."));
  266.       sndevnts_warn = instantiate(nls("sndevnts_warn","You have chosen not to update the sound driver (sndevnts.drv).  You may continue and complete the installation of %%bundle_name%%.  However, in order to successfully run %%bundle_name%% with Microsoft Sound System 2.0, the updated driver must be installed."));
  267.       sndevnts_remind1 = instantiate(nls("sndevnts_remind1","Please update the Microsoft Sound System 2.0 driver (sndevnts.drv) and then restart Microsoft Windows before running %%bundle_name%%."));
  268.       sndevnts_remind2 = instantiate(nls("sndevnts_remind2","Please restart Microsoft Windows before running %%bundle_name%% in order to load the new sound driver (sndevnts.drv)."));
  269.  
  270.       installing_scripts = nls("installing_scripts",
  271.                                "Installing %%product_label%% Scripts...");
  272.       installing_msg = nls("installing_msg",
  273.                                "Installing %%product_label%% Message Files...");
  274.       installing_executables = nls("installing_executables",
  275.                                "Installing %%product_label%% Executables...");
  276.       installing_admin = nls("installing_admin",
  277.                                "Installing %%product_label%% Administration Files...");
  278.       installing_dlls = nls("installing_dlls",
  279.                                "Installing %%product_label%% Dynamic Link Libraries...");
  280.       installing_doc = nls("installing_doc",
  281.                                "Installing %%product_label%% Help Files...");
  282.       installing_oci = nls("installing_oci",
  283.                                "Installing %%product_label%% OCI Files...");
  284.       installing_seed = nls("installing_seed",
  285.                                "Installing Starter Database...");
  286.       moving_files = nls("moving_files", "Moving database and log files...");
  287.       modifying_config = instantiate(nls("modifying_config",
  288.                                "Modifying %%ora_config%%..."));
  289.       starting_up = nls("starting_up","Starting Up the Starter Database...");
  290.       registering = nls("registering","Registering %%product_label%%...");
  291.       setting_password = nls("setting_password", "Setting %%product_label%% Password...");
  292.  
  293. /*****************************************************************************
  294.    Start processing ...
  295. *****************************************************************************/
  296.       
  297.     ui_product(product_label);
  298.  
  299.     curr_dir = directory_name(current_script);
  300.  
  301.     environ_test = execute("%curr_dir%\environ.vrf");
  302.  
  303. /* LMurphy - determine if proper version of WINS32S is installed */
  304. /* Create a list of the elements of Version */
  305. /* Get the second item in the list */
  306. /* If the second item of the version number is < 20 
  307.    an old version of WIN32S is installed */
  308. /* running_under_nt, running_under_win32s, win31_version, and win32s_version
  309.    are set in environ.vrf */
  310.    if (not(running_under_nt))
  311.    {
  312.     win31vlist = explode(win31_version, ".");
  313.     win31vs = first(win31vlist);
  314.     win31vs2 = first(rest(win31vlist));
  315. /* Windows 95 - get 32bit version API returning 3.95 for Beta2 */
  316.     if ((win31vs == 4) || ((win31vs == 3) && (win31vs2 == 95)))
  317.     {
  318.         under_win95_cont = yesno_dialog(under_win95_prompt);
  319.         if (not(under_win95_cont))
  320.             signal('FAILURE, db_inst_cancelled);
  321.     }
  322.     else
  323.     {
  324.         if (not(running_under_win32s))
  325.             signal('FAILURE, nowin32s);
  326.         else
  327.         {
  328.             win32vlist = explode(win32s_version, ".");
  329.             win32vs = first(rest(win32vlist));
  330.             if (win32vs < 20)
  331.                 signal('FAILURE, oldwin32s);
  332.         }
  333.     }
  334.    }
  335.    else
  336.    {
  337.     under_nt_cont = yesno_dialog(under_nt_prompt);
  338.     if (not(under_nt_cont))
  339.         signal('FAILURE, db_inst_cancelled);
  340.    }
  341.  
  342. /* LMurphy - see if sndevnts.drv is loaded */
  343.  
  344.    {
  345.      drivers = translate("drivers", "%windir%\system.ini", "boot");
  346.    }
  347.      [ 'DEFAULT:
  348.         {
  349.           drivers = "";
  350.           continue(); 
  351.         }
  352.      ]
  353.    drivers_list = explode(drivers);
  354.    mssoundsys20 = false;
  355.    update_sndevnts = false;
  356.    old_sndevnts = false;
  357.    while (not(empty(drivers_list)))
  358.    {
  359.     if ((first(drivers_list)) == "sndevnts.drv")
  360.     {
  361.         mssoundsys20 = true;
  362.     }
  363.     drivers_list=rest(drivers_list);
  364.    }
  365.    if (mssoundsys20)
  366.    {
  367.       destination = first(group_files(drv));
  368.       source = implode(list(product_home, product_location(current_product),
  369.                 file_name(destination)), "\");
  370.       pathify(source);
  371.       source_version = windows_file_version(source);
  372.       if (windows_earlier_version(destination,source_version))
  373.         old_sndevnts = true;
  374.       if (old_sndevnts)
  375.       {
  376.         mark
  377.     {
  378.         update_sndevnts = yesno_dialog(sndevnts_prompt, sndevnts_content, sndevnts_help);
  379.         mark
  380.         {
  381.           if (not(update_sndevnts))
  382.             information_dialog(sndevnts_warn);
  383.         }
  384.     }
  385.        }
  386.    }
  387.  
  388.  
  389. /* LMurphy - see if oracle71.exe is in use */
  390. /* if so, exit installer */
  391.  
  392.    p7inst_var = "orarun";
  393.    if (exists("%ORACLE_HOME%\bin\oracle71.exe"))
  394.    {
  395.     ora_test = execute("%curr_dir%\p7inst.vrf");
  396.     if (oracle71_running == 1)
  397.         signal('FAILURE, oracle_upi);
  398.    }
  399.  
  400.  
  401. /* LMurphy - determine installation options */
  402.  
  403.    prev_db_inst = exists("%oracle_home%\dbs\ctl1.ora");
  404.  
  405.    if (custom_install)
  406.    {
  407.      mark
  408.      {
  409.        install_seed_database = yesno_dialog(db_prompt, db_content, db_help);
  410.        mark
  411.        {
  412.      if (install_seed_database)
  413.      {
  414.          if (prev_db_inst)
  415.          {
  416.         install_seed_database = yesno_dialog(reinstall_warning,FALSE,
  417.                                             seed_content,reinstall_help);
  418.         if (install_seed_database)
  419.             install_seed_database = yesno_dialog(reinstall_sure);
  420.          }
  421.      }
  422.        }
  423.     }
  424.     
  425.     install_plsql = TRUE;
  426.     defaultconfig ="Windows 7.1 PL/SQL";
  427.     
  428.     if (not((prev_db_inst && not(install_seed_database))))
  429.     {
  430.     mark
  431.     {
  432.     password = multiple_text_dialog(password_prompt, pwords,
  433.                         password_content,
  434.                         password_help);
  435.  
  436.     npass = first(password);
  437.     cpass = first(rest(password));
  438.     npass1 = replace(npass, " ", "");
  439.     cpass1 = replace(npass, " ", "");           
  440.         while ((npass != cpass) || (length(npass) != length(npass1))
  441.         || (length(cpass) != length(cpass1)) ||
  442.                 (length(npass) == 0) || (length(npass) > 30))
  443.         {
  444.         if ((length(npass) != length(npass1)) ||
  445.             (length(npass) == 0))
  446.         {
  447.            information_dialog(password_prompt2);
  448.            password = multiple_text_dialog(password_prompt,
  449.                         pwords,
  450.                         password_content,
  451.                         password_help);
  452.            npass = first(password);
  453.            cpass = first(rest(password));
  454.            npass1 = replace(npass, " ", "");
  455.            cpass1 = replace(npass, " ", "");           
  456.            continue();
  457.         }
  458.         if (length(npass) > 30)
  459.         {
  460.            information_dialog(password_prompt3);
  461.            password = multiple_text_dialog(password_prompt,
  462.                         pwords,
  463.                         password_content,
  464.                         password_help);
  465.            npass = first(password);
  466.            cpass = first(rest(password));
  467.            npass1 = replace(npass, " ", "");
  468.            cpass1 = replace(npass, " ", "");           
  469.            continue();
  470.         }
  471.         if (npass != cpass)
  472.         {
  473.            information_dialog(different_pass_prompt);
  474.            password = multiple_text_dialog(password_prompt,
  475.                         pwords,
  476.                         password_content,
  477.                         password_help);
  478.            npass = first(password);
  479.            cpass = first(rest(password));
  480.            npass1 = replace(npass, " ", "");
  481.            cpass1 = replace(npass, " ", "");           
  482.            continue();
  483.         }
  484.      }
  485.          dba_password = npass;
  486.     }
  487.     }
  488.    }
  489.    else /* Not Custom Install */
  490.    {
  491.     install_seed_database = TRUE;
  492.         if (prev_db_inst)
  493.     {
  494.         install_seed_database = yesno_dialog(reinstall_warning,FALSE,
  495.                                             seed_content,reinstall_help);
  496.         if (install_seed_database)
  497.             install_seed_database = yesno_dialog(reinstall_sure);
  498.         
  499.         }
  500.     install_plsql = TRUE;
  501.     dba_password = "oracle";
  502.     defaultconfig ="Windows 7.1 PL/SQL";
  503.    }
  504.  
  505. /* PL/SQL memory requirements */
  506.    nmem = 1700 + 3500; /* Win32s 1.20, swap space */
  507.    nmem = nmem + 4870; /* SGA, with PL/SQL */
  508.    nmem = nmem + 5333; /* PLM executable */
  509.  
  510.    if (install_seed_database)
  511.    {
  512.     p7inst_var = "freemem";
  513.     ora_test = execute("%curr_dir%\p7inst.vrf");
  514.     fmem = (avail_mem/1000) + 1;
  515.     if (nmem > fmem)
  516.         yesno_dialog(not_enough_memory, not_enough_memory_content, not_enough_memory_help);
  517.    }
  518.  
  519.   /* LMurphy - set remind_list to default password if Complete or Custom install */
  520.   default_password = instantiate(nls("default_password", "The default password for the %%bundle_name%% Database has been set to 'oracle'.  To change the password, use Password Manager.")); 
  521.  
  522.   { install_type = install_type; }
  523.   [
  524.    'UNBOUND_VARIABLE: install_type = "Custom Install";
  525.   ]
  526.  
  527.   if (not((prev_db_inst && not(install_seed_database))))
  528.     set_password = TRUE;
  529.   else
  530.     set_password = FALSE;
  531.  
  532.   reminder_msg = TRUE;
  533.   { remind_list = remind_list; }
  534.   [ 'UNBOUND_VARIABLE: reminder_msg = FALSE; ]
  535.   if (reminder_msg)
  536.   {
  537.     if ((install_type == "Complete Install") || (install_type == "Typical Install") || (install_type == "Minimal Install")) 
  538.         if (set_password)
  539.             add(remind_list, default_password);
  540.     if (mssoundsys20)
  541.     {
  542.         if (old_sndevnts)
  543.         {
  544.             if (not(update_sndevnts))
  545.                 add(remind_list, sndevnts_remind1);
  546.             else
  547.                 add(remind_list, sndevnts_remind2);
  548.         }
  549.     }
  550.   }
  551.  
  552.      /***********************************************************************
  553.          Return total size of files and set comment string ...
  554.       ***********************************************************************/
  555.  
  556.        dbsum = 0;
  557.        if (install_seed_database)
  558.        {
  559.     comment = "With Starter Database, With PL/SQL";
  560.     dbsum = dbsum + sum(plseed, plmsg, nls_abbreviation);
  561.        }
  562.        if (not(install_seed_database))
  563.        {
  564.     comment = "Without Starter Database, With PL/SQL";
  565.     dbsum = dbsum + sum(plmsg, nls_abbreviation);
  566.        }
  567.  
  568.       drvsum = 0;
  569.       if (update_sndevnts)
  570.         drvsum = sum(drv);
  571.     
  572.       return(verify(winrsf70) + verify(winrsf71) + verify(win32rsf71) + verify(windbhlp71) + sum(deinstl, exec, bin, sys, dllopt, dll, nls_abbreviation, oci, ini, dbs, admin, msg, nls_abbreviation) + dbsum + drvsum);
  573.     }
  574.   else
  575.     {
  576.       refresh_map_file = FALSE;
  577.       return(0);
  578.     }
  579. }
  580.