home *** CD-ROM | disk | FTP | other *** search
- /* Copyright (c) Oracle Corporation 1992. All Rights Reserved */
- /*****************************************************************************
- NAME
- netc22.ins - Windows 95 V3 installation script for SQL*Net.
-
- DESCRIPTION
- This script performs the installation tasks for the OS/2 SQL*Net
- product.
-
- VERSION
- 2.2.0.0.0
-
- OWNER
- Lav Jain
-
- MODIFIED DD-MMM-YY Reason
- **************************************************************************/
- {
-
- if (doit)
- {
-
- bmp_home = directory_name(current_script);
- { ui_graphics("%bmp_home%\network.bmp"); }
- [ 'DEFAULT: continue(); ]
-
- ins_ratchet = "2.2.2.0.0";
-
- execute("%installer_home%\win95.ins");
-
- install(w95rsf72);
-
- if (not(registered("w95install")))
- install(w95install);
- else if (earlier_version(registration("w95install"),product_version(w95instver)))
- install(w95install);
-
-
- if (member(chosen_stack_list, tcp_stack))
- install(w95tcp22);
- if (member(chosen_stack_list, spx_stack))
- install(w95spx22);
- if (member(chosen_stack_list, nmp_stack))
- install(w95nmp22);
-
-
- permit_retry_operations = TRUE;
-
- /* Copy Files */
- ui_product(product_label);
-
- ui_action(instantiate(net2_install_script));
- copy(deinstl);
-
- ui_action(instantiate(net2_install_message));
- copy(msb, nls_abbreviation);
-
- ui_action(instantiate(net2_install_sample));
- copy(sample);
-
- ui_action(instantiate(net2_install_easycfg));
- copy(cfg22);
-
- ui_action(instantiate(net2_install_dll));
- {
- copy(dll);
- }
- ['WRITE_ERROR:{
- information_dialog(instantiate(app_prompt),
- instantiate(app_content),
- instantiate(app_help) );
- signal('FAILURE, instantiate(installation_terminated);
- }
- ]
- copy(exec);
-
- permit_retry_operations = FALSE;
-
- /* set NET20 here in the registry */
-
- modify("NET20","%oracle_home%\NETWORK", ora_config, (product_filename(current_product)));
-
- /* Register Product and Dependencies */
-
- ui_action(instantiate(net2_register));
- register(current_product);
- if (member(selected_products,current_product))
- reference(current_product);
- reference(w95rsf72, current_product);
- }
- }
-