/* Copyright (c) Oracle Corporation 1995.  All Rights Reserved 

   FILE: template.dei							   

   CONTENTS: Template of various OIS blocks  

   AUTHOR: Athmaraman R

   DATE: 29/11/95
   
   Warning!!!
   Modifications to this file may affect all the scripts generated by OIS.

*/

{


	/*BEGIN_OIS,DEI_FIRST_BLOCK*/

		/* Call the OS.dei script */
		{
			script_os = script_os;
		}
		['UNBOUND_VARIABLE:
			script_os = operating_system;
		]

		{
			platform_prefix = platform_prefix;
		}
		['UNBOUND_VARIABLE:
			platform_prefix = product_prefix;
		]

		{ 
			doit = execute("%INSTALLER_HOME%\%script_os%.dei"); 
		}
		[
			'UNBOUND_VARIABLE: signal('failure,instantiate(instver_too_early2));
		]

		if (doit) 
		{
			/* Go ahead and deinstall */
			implode_explode_delimiter = ";";
			
			/* Create Product Label by adding version */
			ois_prodname = registry_filename(current_registry);
			OIS_EXECUTE_SCRIPT = "CREATE_LABEL";
			{
				execute(instantiate("%installer_home%\%%ois_prodname%%.det"));
			}
			['FILE_NOT_FOUND:
				{
					sys_file = "%%ois_prodname%%.det";
					signal('FAILURE,instantiate(no_sys_file));
				}
			]

			/* Determine Product Location */

			child_products = all_child_registrations(current_registry);
			is_parent_product = true;
			if (empty(child_products))
				is_parent_product = false;
			is_child_product = true;
			{
				PARENT_PRODUCT  = registry_parent(current_registry);
			}
			['PARENT_NOT_FOUND:
				is_child_product = FALSE;
			]
			
			if (is_child_product)
			{
				PARENT_PRODUCT       = registry_parent(current_registry);
				PARENT_REGISTRY_NAME = registry_filename(PARENT_PRODUCT);
				deinstall_variable = "%parent_registry_name%";
				if (operating_system == "os2")
					section_heading = "=";
				else
					section_heading = "%parent_registry_name%";
			}
			else
			{
				deinstall_variable = registry_filename(current_registry);
				if (operating_system == "os2")
					section_heading = "=";
				else
					section_heading = registry_filename(current_registry);
			}
			default_home = "%ORACLE_HOME%\%deinstall_variable%";
			if (directory_popup == true)
			{
				OIS_EXECUTE_SCRIPT = "GET_DEINSTALLATION_PATH";
				PROD_HOME = execute(instantiate("%installer_home%\%%ois_prodname%%.det"));
			}
			else
			{
				PROD_HOME = default_home;
			}
	/*END_OIS*/

	/*BEGIN_OIS,DEI_DEPENDENCY_BLOCK*/
			OIS_EXECUTE_SCRIPT = "DEINSTALL_DEPENDENCIES";
			execute(instantiate("%installer_home%\%%ois_prodname%%.det"));
	/*END_OIS*/


	/*BEGIN_OIS,DEI_THIRDPARTY_BLOCK*/

			cur_dir = current_directory();
			/* remove the drive name */
			thirdparty_deinstall_list = explode(thirdparty_deinstall_name,"\");
			thirdparty_deinstall_list = rest(thirdparty_deinstall_list);
			thirdparty_deinstall_name = implode(thirdparty_deinstall_list,"\");				
			{
				thirdparty_deinstall_parameters = translate("DeinstallerParam", thirdparty_info_file,section_heading);
			}	
			['unbound_environment_variable:
			{
				thirdparty_deinstall_parameters = "";
				continue();
			}
			]		
			thirdparty_deinstall_directory = directory_name(thirdparty_deinstall_name);
			thirdparty_deinstall_name = file_name(thirdparty_deinstall_name);
			deinstall_command = "%%thirdparty_deinstall_name%% %%thirdparty_deinstall_parameters%%";
			change_directory("%PROD_HOME%\%thirdparty_deinstall_directory%");
			if (installation_mode != 'shared)
			{
				{ 
					temp=spawn(instantiate("%deinstall_command%")); 
				}	
				['NO_RESPONSE: continue();] 
			}
			change_directory(cur_dir);
			OIS_EXECUTE_SCRIPT = "REMOVE_DIRECTORIES";
			deldir = "%PROD_HOME%";
			execute(instantiate("%INSTALLER_HOME%\%%ois_prodname%%.det"));
			remove_directory("%PROD_HOME%");

	/*END_OIS*/


	/*BEGIN_OIS,DEI_REMOVE_VARIABLES_BLOCK*/
			OLD_SECTION_HEADING_EXISTS = FALSE;
			OIS_EXECUTE_SCRIPT = "REMOVE_ENVIRONMENT_VARIABLES";
			execute(instantiate("%INSTALLER_HOME%\%%ois_prodname%%.det"));
	/*END_OIS*/


	/*BEGIN_OIS,DEI_REMOVE_BLOCK*/	
			ui_product(registry_label);
			permit_retry_operations = TRUE;
			ui_action(instantiate(unregistering_product));
			unregister(current_registry);  
	/*END_OIS*/

	 }
}
/*END_SCRIPT*/