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

/*****************************************************************************
  NAME
    ocades60.dei - V3 deinstallation script for Oracle ocades60 Designer

  DESCRIPTION
    This script removes Oracle ocades60 Designer.

  MODIFIED      MM/DD/YY    Reason
   pgupta       09/20/97    Created.
*****************************************************************************/

{
     /************************************************
     Set necessary variables for deinstallation
     *************************************************/
     EXECUTE_SCRIPT = "SET_DEINSTALL_VARIABLES";
     execute("%installer_home%\d2kr2dei.usr");
     /************************************************/

     {doit = execute("%installer_home%%dir_separator%%operating_system%.dei");}
     [
        'UNBOUND_VARIABLE: signal('failure,instantiate(nls("instver_too_early2",
                                                           "The version of the Installer currently running is %%installer_version%%. The product(s) you have chosen to deinstall were installed with a later version of the Installer. Please use a later version of the Installer to deinstall these Product(s).")));
    ]

     if (doit)
     {
          /************************************************
          Create a label with the product name, and version
          *************************************************/
          EXECUTE_SCRIPT = "CREATE_LABEL";
          execute("%installer_home%%dir_separator%d2kr2dei.usr");
          /************************************************/

          /****************************
          Set up product name variables
          *****************************/
          PARENT_PRODUCT          = registry_parent(current_registry);
          PARENT_REGISTRY_NAME    = registry_name(PARENT_PRODUCT);
          RUNTIME_PRODUCT_STRING  = "w32ocarun60";
          /****************************/

          /***************************
          Validate deinstallation path
          ****************************/
          deinstall_variable = "OCA60";
          section_heading    = registry_filename(PARENT_PRODUCT);
          EXECUTE_SCRIPT         = "GET_DEINSTALLATION_PATH";
          OCA60                  = execute("%installer_home%%dir_separator%d2kr2dei.usr");
          /***************************/

          permit_retry_operations  = TRUE;
          permit_ignore_operations = TRUE;
          permit_process_operations= TRUE;

          /********************************
          Unreference Designer Dependencies
          *********************************/
          ui_product(instantiate(display_registry_label));
          ui_action(instantiate(unreference_dependencies));

         {unreference(registration(RUNTIME_PRODUCT_STRING), current_registry);}              /* Unreference Runtime */
          ['UNREGISTERED_PRODUCT: continue();]


         {unreference(registration(PARENT_REGISTRY_NAME), current_registry);}              /* Unreference Parent */
          ['UNREGISTERED_PRODUCT: continue();]

          /********************************
           Unregister The Product
          *********************************/

          ui_product(instantiate(display_registry_label));
          ui_action(instantiate(deinstall_unregister));
          unregister(current_registry);
          /*********************/

          /************************************************
          Deinstall parent if no other child product exists
          *************************************************/
          EXECUTE_SCRIPT = "DEINSTALL_PARENT";
          execute("%installer_home%%dir_separator%d2kr2dei.usr");
          /************************************************/

          /********************
          Deinstall the product
          *********************/
          ui_product(instantiate(display_registry_label));

          ui_action(instantiate(deinstall_files));
          remove(plsqllib);
          remove(demo);
          remove(sql);
          remove(deinst);
          /********************/

          permit_retry_operations = FALSE;

     }
}