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

/*****************************************************************************
  NAME
    rrun60.dei - V3 deinstallation script for Oracle Report 6.0 Runtime

  DESCRIPTION
    This script removes Oracle Report 6.0 Runtime.

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

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

          /***********************
          Set up dependencies list
          ************************/
          SQLNET_PRODUCT = "w32netclt80";
          /***********************/

          /***************************
          Validate deinstallation path
          ****************************/
          deinstall_variable = "RW60";
          section_heading    = registry_filename(PARENT_PRODUCT);
          EXECUTE_SCRIPT         = "GET_DEINSTALLATION_PATH";
          RW60                  = execute("%installer_home%%dir_separator%d2kr2dei.usr");
          doc60 = translate("doc60","$oracle");
          /***************************/

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

          /***********************
          Unreference dependencies
          ************************/
          ui_product(instantiate(display_registry_label));
          ui_action(instantiate(unreference_dependencies));

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

          {unreference(registration(SQLNET_PRODUCT), current_registry);}        
          ['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(deinst);
          remove(sql);
          remove(plb);

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

          permit_retry_operations = FALSE;

          /***************************
          Modify environment variables
          ****************************/
        {
             reports60_path_dir = "%RW60%%dir_separator%ADMIN%dir_separator%TEMPLATE";
             reports60_path_variable = translate("REPORTS60_PATH", ora_config, RW60);  
             paths_in_reports60_path = explode(reports60_path_variable, ";");
             if(member(paths_in_reports60_path, reports60_path_dir))            
             {
                  extract(paths_in_reports60_path, reports60_path_dir);                
                  if(empty(paths_in_reports60_path))
                          modify("REPORTS60_PATH", "", ora_config, RW60); 
                  else
                  {
                       reports60_path_variable = implode(paths_in_reports60_path, ";");
                          modify("REPORTS60_PATH", reports60_path_variable, ora_config, RW60); 
                  }
             }
        }
         [                                                                      
              'OS_ERROR,'INVALID_FILE_NAME,'FILE_NOT_FOUND,
             'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE: continue();
         ]



        {
             reports60_tmp_path_dir = "%RW60%%dir_separator%TMP";
             reports60_tmp_path_variable = translate("REPORTS60_TMP", ora_config, RW60); 
             paths_in_reports60_tmp_path = explode(reports60_tmp_path_variable, ";");
             if(member(paths_in_reports60_tmp_path, reports60_tmp_path_dir))    
             {
                  extract(paths_in_reports60_tmp_path, reports60_tmp_path_dir);
                  if(empty(paths_in_reports60_tmp_path))
                          modify("REPORTS60_TMP", "", ora_config, RW60);
                  else
                  {
                       reports60_tmp_path_variable = implode(paths_in_reports60_tmp_path, ";");
                          modify("REPORTS60_TMP", reports60_tmp_path_variable, ora_config, RW60); 
                  }
             }
        }
         [                                                                      
              'OS_ERROR,'INVALID_FILE_NAME,'FILE_NOT_FOUND,
             'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE: continue();
         ]


        {
             reports60_jni_dll_path_dir = "%ORACLE_HOME%%dir_separator%jre11%dir_separator%bin%dir_separator%javai.dll";
             reports60_jni_dll_path_variable = translate("REPORTS60_JNI_DLL", ora_config); 
             paths_in_reports60_jni_dll_path = explode(reports60_jni_dll_path_variable, ";");
             if(member(paths_in_reports60_jni_dll_path, reports60_jni_dll_path_dir))    
             {
                  extract(paths_in_reports60_jni_dll_path, reports60_jni_dll_path_dir);
                  if(empty(paths_in_reports60_jni_dll_path))
                          modify("REPORTS60_JNI_DLL", "", ora_config, RW60);
                  else
                  {
                       reports60_jni_dll_path_variable = implode(paths_in_reports60_jni_dll_path, ";");
                          modify("REPORTS60_JNI_DLL", reports60_jni_dll_path_variable, ora_config, RW60); 
                  }
             }
        }
         [                                                                      
              'OS_ERROR,'INVALID_FILE_NAME,'FILE_NOT_FOUND,
             'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE: continue();
         ]



        {
             reports60_classpath_path_dir = "%ORACLE_HOME%%dir_separator%jre11%dir_separator%lib%dir_separator%rt.jar;%RW60%%dir_separator%java%dir_separator%zrmpr.jar;%RW60%%dir_separator%java%dir_separator%jars%dir_separator%xmlparser.jar";
             reports60_classpath_path_variable = translate("REPORTS60_CLASSPATH", ora_config); 
             paths_in_reports60_classpath_path = explode(reports60_classpath_path_variable, ";");
             if(member(paths_in_reports60_classpath_path, reports60_classpath_path_dir))    
             {
                  extract(paths_in_reports60_classpath_path, reports60_classpath_path_dir);
                  if(empty(paths_in_reports60_classpath_path))
                          modify("REPORTS60_CLASSPATH", "", ora_config, RW60);
                  else
                  {
                       reports60_classpath_path_variable = implode(paths_in_reports60_classpath_path, ";");
                          modify("REPORTS60_CLASSPATH", reports60_classpath_path_variable, ora_config, RW60); 
                  }
             }
        }
         [                                                                      
              'OS_ERROR,'INVALID_FILE_NAME,'FILE_NOT_FOUND,
             'PERMISSION_DENIED,'UNBOUND_ENVIRONMENT_VARIABLE: continue();
         ]

          /***************************/
     }
}