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

/****************************************************************************
  NAME
    report60.dei - V3 deinstall script for Windows Oracle Reports 6.0 package

  DESCRIPTION
    This script deinstalls Windows Oracle Reports 6.0 package

  MODIFIED    MM/DD/YY   Reason
   pgupta    11/07/97   created.
*****************************************************************************/

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

    deinstall_prompt01 = nls("deinstall_prompt01", "Other products are dependent on %%registry_label%% (or one of its components). Removing it may cause other products to work improperly. Are you sure you want to deinstall it?");
    deinstall_files01   = nls("deinstall_files01", "Other products are dependent on %%registry_label%% (or one of its components). Removing it will remove all its underlying components also, which may cause other products to work improperly. It is therefore recommended that you do not remove %%registry_label%%. Choose 'No' to leave %%registry_label%% intact. Choose 'Yes' if you are sure you want to remove it.");

    {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 dependency list
        **********************/
        dependency_list = list("w32tutil60", "w32ssf60");
        /*********************/

        /***************************
        Validate deinstallation path
        ****************************/
        deinstall_variable = "RW60";
        section_heading = registry_filename(current_registry);

        EXECUTE_SCRIPT = "GET_DEINSTALLATION_PATH";
        RW60 = execute("%installer_home%%dir_separator%d2kr2dei.usr");
        /***************************/

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

        /* Unregister Reports OCX */
        if (exists("%ORACLE_HOME%\bin\r30sxa32.ocx"))
        {
            {win32_asynchronous_spawn("%ORACLE_HOME%\bin\regsvr32 /u /s r30sxa32.ocx");}
            ['INVALID_FILE_NAME, 'FILE_NOT_FOUND, 'MEMORY_ERROR: continue();]
        }

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

        {remove_directory("%RW60%%dir_separator%TMP");}
               [ 'INVALID_FILE_NAME, 'PERMISSION_DENIED, 'WRITE_ERROR, 'OS_ERROR: continue(); ]


        /***************************
        Modify environment variables
        ****************************/
        {modify(deinstall_variable, "", ora_config, section_heading);}      /* remove RW30 variable from registry */
        [ 'UNBOUND_ENVIRONMENT_VARIABLE, 'FILE_NOT_FOUND: continue(); ]
        /***************************/


    permit_retry_operations = FALSE;
    }
}