/* Copyright (c) Oracle Corporation <year>.  All Rights Reserved */
/***************************************************************
 NAME
        dbmig.dei

 DESCRIPTION
        deinstallation script for data migration utility

 OWNER
        Ramesh Uppala

 MODIFIED       MM/DD/YY        Reason
  ruppala       05/20/97        created
****************************************************************/

{
 /*** Call %os%.dei to determine if deinstallation is allowed (if there are no
      installed products which depend on products slated to be removed). ***/
 {
  doit = execute("%installer_home%\%operating_system%.dei");
 }
  [
   'UNBOUND_VARIABLE:
     {
      required_version = product_version(osinstver);
      temp = explode(required_version,".");
      required_version = implode(list(first(temp),first(rest(temp)),
                                      first(rest(rest(temp))),
                                      first(rest(rest(rest(temp))))),".");
      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.")));
     }
  ]

 if(doit)
   {
    /*** Ensure that the necessary environment variables and MAP file variables are bound. ***/
    {
     dbmig = "%oracle_home%\JRE11\classes\dbmig";
     /*variable = v7_translate("dbmig804");*/
    }
     [
      'UNBOUND_ENVIRONMENT_VARIABLE, 'OS_ERROR:
        {
         /*variable = variable to be bound;*/
         information_dialog(instantiate(deinstall_prompt02),
                            instantiate(deinstall_content02),
                            instantiate(deinstall_help02));
         doit = FALSE;
        }
     ]
   }

 /*** If doit = TRUE, then necessary variables are bound, so continue. ***/
 if(doit)
   {


    /*** Bind NLS deinstall strings ***/

    unregistering_product = nls("unregistering_product","Unregistering %%registry_label%%...");

    removing_scripts   = nls("removing_scripts","Deinstalling %%registry_label%% Scripts...");
    removing_html      = nls("removing_html","Deinstalling %%registry_label%% HTML files...");
    removing_dll       = nls("removing_dll","Deinstalling %%registry_label%% Dll files...");
    removing_image     = nls("removing_image","Deinstalling %%registry_label%% Image files...");
    removing_exec      = nls("removing_exec","Deinstalling %%registry_label%% Exec files...");



    /*** Deinstall Product - Remove Files ***/

    ui_action(instantiate(removing_scripts));
    remove(deinstl);
    ui_action(instantiate(removing_html));
    remove(html,nls_abbreviation);
    ui_action(instantiate(removing_dll));
    remove(dll);
    ui_action(instantiate(removing_image));
    remove(image);
    ui_action(instantiate(removing_exec));
    remove(exec);
    remove(other);

    /*** Deinstall Dependent Products ***/
    if (registered("w32jre11"))
      {
       dependent = registration("w32jre11");
       unreference(dependent, current_registry);
       deinstall(dependent);
      }

    if (registered("jsf803"))
      {
       dependent = registration("jsf803");
       unreference(dependent, current_registry);
       deinstall(dependent);
      }

     if (registered("w32netclt80"))
        {
          dependent = registration("w32netclt80");
          unreference(dependent, current_registry);
          deinstall(dependent);
        }


    /*** Unregister Product ***/

    ui_product(registry_label);

    ui_action(instantiate(nls("unregistering_product","Unregistering %%registry_label%%...")));
    unregister(current_registry);

    /*** Reset Configuration Variables ***/

   /* ui_action(instantiate(nls("resetting_variables","Modifying %%registry_label%% Environment Variables..."));
    modify(variable, "", ora_config, delimeter);
   */
    permit_retry_operations = FALSE;
   }
}