/* Copyright (c) Oracle Corporation 1996.  All Rights Reserved */
/*****************************************************************************
  NAME
    tk60.dei - V3 deinstallation script for GUI Common Files 2.5.

  DESCRIPTION
    This script deinstalls GUI Common Files 6.0.

  MODIFIED   MM/DD/YY   Reason
  majain	01/18/00    modified for de-install problems
*****************************************************************************/
{
    /************************************
    Set the directory separator according
    to the current operating system.
    *************************************/
    dir_separator = "\";
    /************************************/

    /**********************************************
    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");
        /************************************************/

        /************************/

        /***************************************
        Create a label with the product, version
        ****************************************/

          EXECUTE_SCRIPT = "CREATE_LABEL";
          execute("%installer_home%%dir_separator%d2kr2dei.usr");
        /***********************
        Set up dependencies list
        ************************/
        dependency_list = list("w32rsf80");

         /****************************
          Set up product name variables
          *****************************/
          PARENT_PRODUCT       = registry_parent(current_registry);
          PARENT_REGISTRY_NAME = registry_name(PARENT_PRODUCT);
          COMPONENT_PRODUCT_STRING        = "w32tk60";
         /****************************/
          MM60 = "%ORACLE_HOME%%dir_separator%TOOLS%dir_separator%COMMON60";
        /**************************/
         permit_retry_operations  = TRUE;
          permit_ignore_operations = TRUE;
          permit_process_operations= TRUE;
        /*********************************************************/

        permit_retry_operations = TRUE;
        permit_ignore_operations = TRUE;
        permit_process_operations = TRUE;
         /************************************************
            Deinstall parent if no other child product exists
            *************************************************/
            EXECUTE_SCRIPT = "DEINSTALL_PARENT";
            execute("%installer_home%%dir_separator%d2kr2dei.usr");
            /************************************************/
        /**************************************************************
        Unreference & Deinstall Component Products if explicitly called
        ***************************************************************/
        EXECUTE_SCRIPT = "DEINSTALL_COMPONENTS";
        execute("%installer_home%%dir_separator%d2kr2dei.usr");
        /**********************************************************/

        /***********************************
        Unreference & Deinstall Dependencies
        ***********************************/
        EXECUTE_SCRIPT = "UNREFERENCE_DEPENDENCIES";
        execute("%installer_home%%dir_separator%d2kr2dei.usr");
        /**********************************/

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

        /********************
        Deinstall the product
        *********************/
        ui_action(instantiate(deinstall_files));
        remove(msg);

        ui_action(instantiate(deinstall_dll));
        remove(dll);

        ui_action(instantiate(deinstall_exe));
        remove(exe);
	
	  ui_action(instantiate(deinstall_exe));
        remove(res);

        ui_action(instantiate(deinstall_files));
        remove(deinst);

        /********************/

        permit_retry_operation = FALSE;

     /***************************************************/

    }
}