/* Copyright (c) Oracle Corporation 1996.  All Rights Reserved */
/*****************************************************************************
  NAME
    pj60.dei - V3 deinstall script for Developer Control Panel

  DESCRIPTION
    This script deinstalls Developer Control Panel.

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

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

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

    /**************************
    Determine installation path
    ***************************/
    TOOLS_HOME = "%ORACLE_HOME%%dir_separator%TOOLS";
    DOC60 = "%TOOLS_HOME%%dir_separator%DOC60";
    DOC60_NLS = "%DOC60%%dir_separator%%nls_abbreviation%";
   /**************************/

             {
           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%OIN60";
           ]


        /***********************
        Unreference Dependencies
        ************************/
        ui_product(instantiate(display_registry_label));
        ui_action(instantiate(unreference_dependencies));
        OIN_PRODUCT_STRING    = "w32oin60";
        /***********************
        Deinstall OIN if nothing
        else references it
        ************************/
            if (registered(OIN_PRODUCT_STRING))
            {
                dependent = registration(OIN_PRODUCT_STRING);
                unreference(dependent, current_registry);
                unreference(dependent);
                deinstall(dependent);
            }


        permit_retry_operations = TRUE;

        /**************************************************************
        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 the product
        *********************/
        ui_action(instantiate(deinstall_files));
        remove(res);
        remove(msg);
        remove(upd);
        remove(setup);
        ui_action(instantiate(deinstall_dll));
        remove(dll);

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

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

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

    /***********************
    Remove REGISTRY variable
    ************************/
    {modify(deinstall_variable, "", ora_config, section_heading);}      /* remove PJ10 variable from Registry */
        [ 'UNBOUND_ENVIRONMENT_VARIABLE: continue(); ]

    if (exists("%ORACLE_HOME%%dir_separator%PJ60%dir_separator%pjuserus.upd"))
           {
          {remove_file("%ORACLE_HOME%%dir_separator%PJ60%dir_separator%pjuserus.upd");}
                 [ 'INVALID_FILE_NAME, 'PERMISSION_DENIED, 'WRITE_ERROR, 'OS_ERROR: continue(); ]

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



        permit_retry_operations = FALSE;
    }
}