home *** CD-ROM | disk | FTP | other *** search
- /* Copyright (c) Oracle Corporation 1992. All Rights Reserved */
- /*****************************************************************************
- NAME
- util72.ins - Windows 95 V3 installation script for database utilities.
-
- DESCRIPTION
- This script performs the installation tasks for the ORACLE database
- utilities product.
-
- OWNER
- Tony Rodgers
-
- MODIFIED DD-MMM-YY Reason
- LMurphy 06/19/95 - Modified for Windows 95 and 7.2
- syau 07/01/94 - 7.1.3
- HA! 04/28/94 - 7.1.2 and 3.0.10.2
- Hartenstine 04/21/93 - DESKTOP:Adapt to Windows NT
- trodgers 01-APR-92 Created.
- *****************************************************************************/
- {
- /**************************************************************************
- Start main logic...
- **************************************************************************/
- if (doit)
- {
- ins_ratchet = "7.2.2.3.1";
-
- execute("%installer_home%\win95.ins");
-
- install(w95rsf72);
-
- ui_product(product_label);
-
- ui_action(instantiate(installing_scripts));
- copy(deinstl);
-
- ui_action(instantiate(installing_executables));
- copy(exec);
-
- ui_action(instantiate(installing_msbs));
- copy(msg, nls_abbreviation);
-
- ui_action(instantiate(installing_init));
- copy(init);
-
- ui_action(instantiate(installing_sql));
- copy(sql);
-
- ui_action(instantiate(installing_demo));
- copy(demo);
-
- /*****************
- Install the parent
- ******************/
-
- if(member(selected_products, current_product))
- {
- if (install_parent)
- install(product_parent(current_product));
- }
-
- if (set_rdbms72)
- {
- ui_action(instantiate(modifying_config));
- modify("RDBMS72",rdbms72,ora_config,(product_filename(w95rsf72)));
- }
-
- if (set_plsql22)
- {
- ui_action(instantiate(modifying_config));
- modify("PLSQL22",plsql22,ora_config,(product_filename(w95rsf72)));
- }
-
- ui_action(instantiate(modifying_config));
- modify("ORA_SQLDBA_MODE","LINE",ora_config,(product_filename(current_product)));
-
- ui_action(instantiate(registering));
- register(current_product);
- if (member(selected_products,current_product))
- reference(current_product);
-
- reference(w95rsf72, current_product);
-
- /* LMurphy - 07/11/95 - if util72 not "selected product" don't
- reference parent - see rdbms72.ins */
-
- if(member(selected_products, current_product))
- {
- reference(product_parent(current_product), current_product);
- }
-
- permit_retry_operations = FALSE;
- }
- }
-