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

/****************************************************************************
  NAME
    d2kqt60.dei - V3 deinstallation script for Windows Documentation Quick Tour

  DESCRIPTION
    This script removes Windows Oracle Documentation Quick Tour.

  OWNER
   PGUPTA    11/12/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);
        COMPONENT_PRODUCT_STRING        = "w32d2kqt60";
        /****************************/
        /*temp_var=current_directory();
        change_directory("%INSTALLER_HOME%");
        {win32_asynchronous_spawn("%INSTALLER_HOME%\d2kqt60.bat");}
        ['NO_RESPONSE, 'FILE_NOT_FOUND, 'MEMORY_ERROR: continue();]
        change_directory("%temp_var%");*/
        /***************************
        Validate deinstallation path
        ****************************/
        deinstall_variable = "DOC60";
        section_heading    = registry_filename(PARENT_PRODUCT);
        EXECUTE_SCRIPT = "GET_DEINSTALLATION_PATH";
        DOC60 = execute("%installer_home%%dir_separator%d2kr2dei.usr");
        /***************************/
        {
           ORAINFONAV_DOCPATH  = translate("ORAINFONAV_DOCPATH", ora_config);
           set_orainfonav_docpath = FALSE;
        }
        [
           'OS_ERROR,'INVALID_FILE_NAME,
           'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE, 'FILE_NOT_FOUND:
           ORAINFONAV_DOCPATH = "%ORACLE_HOME%%dir_separator%OIN";
        ]
        permit_retry_operations  = TRUE;
        permit_ignore_operations = TRUE;
        permit_process_operations= TRUE;
        /*********************
        Deinstall dependencies
        **********************/
        LANG_SUPP_STRING = "w32fql60";

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

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

        {unreference(registration(PARENT_REGISTRY_NAME), current_registry);}             /* Unreference Parent */
        ['UNREGISTERED_PRODUCT: continue();]
        /**********************************/
	/**************************************************************
        Unreference & Deinstall Component Products if explicitly called
        ***************************************************************/
        EXECUTE_SCRIPT = "DEINSTALL_COMPONENTS";
        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 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(deinst);
        remove(qtour);

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

        permit_retry_operations = FALSE;
    }
}