home *** CD-ROM | disk | FTP | other *** search
- /* Copyright (c) Oracle Corporation 1994. All Rights Reserved */
- /*****************************************************************************
- NAME
- dbint72.ins - V3 installation script
-
- DESCRIPTION
- This script installs
-
- OWNER
- Zakia Zerhouni
-
- MODIFIED DD-MMM-YY Reason
- ekhor 31-OCT-95 added processing for trial web install
- LMurphy 19-JUN-95 Modified for Windows 95 GUI
- LMurphy 23-JAN-95 Modified for use with SQL*Net help
- zzerhoun 04-JAN-95 Created.
- *****************************************************************************/
- {
-
- if (doit)
- {
- /*****************************
- Set the VRF-INS script ratchet
- ******************************/
-
- bmp_home = directory_name(current_script);
- { ui_graphics("%bmp_home%\nav.bmp"); }
- [ 'DEFAULT: continue(); ]
-
- ins_ratchet = "7.2.2.3.1";
-
- permit_retry_operations = TRUE;
-
- execute("%installer_home%\win95.ins");
-
- install(w95rsf72);
-
- /******************
- Install the product
- *******************/
-
- ui_action( instantiate(installing_scripts) );
- copy(deinst);
-
- ui_action( instantiate(installing_executables) );
- copy(exe);
- copy(smpldir);
-
- ui_action( instantiate(installing_dlls) );
- copy(dll,vsn);
-
- if (copy_sample)
- copy(sample);
-
- ui_action( instantiate(modifying_config) );
-
- { win32_create_key("HKEY_CURRENT_USER", "Software\ORACLE\Personal Oracle7 Navigator\Local"); }
- [ 'INVALID_KEY, 'PERMISSION_DENIED, 'OS_ERROR: continue(); ]
-
- { win32_set_value("HKEY_CURRENT_USER", "Software\ORACLE\Personal Oracle7 Navigator\Local", "Connection", "PO7/PO7@2:"); }
- [ 'INVALID_KEY, 'PERMISSION_DENIED, 'OS_ERROR: continue(); ]
-
-
- /*************************
- Modify Configuration files
- **************************/
-
- permit_retry_operations = FALSE;
-
- if (set_nav72)
- modify("NAV72",nav72,ora_config,(product_filename(current_product)));
-
- /*******************
- Install the parent
- ********************/
-
- if(member(selected_products, current_product))
- {
- if (install_parent)
- install(product_parent(current_product));
- }
-
- /*******************
- Register the product
- ********************/
- ui_action( instantiate(registering) );
- register(current_product);
-
- if (member(selected_products,current_product))
- reference(current_product);
-
- /* reference parent */
- reference(product_parent(current_product), current_product);
-
- reference(w95rsf72, current_product);
-
- permit_retry_operations = FALSE;
- }
- }
-
-
-
-
-
-
-
-
-