/* Copyright (c) Oracle Corporation 1996.  All Rights Reserved */
/*****************************************************************************
  NAME
    ot25.vrf - V3 version analysis/product configuration script for
               Oracle Terminal 2.5

  DESCRIPTION
    This script checks dependencies and environment settings for the
    installation of Oracle Terminal 2.5.

  MODIFIED    MM/DD/YY  Reason
   rbansal    07/22/96  Created
*****************************************************************************/
{
    SHARED_ORACLE_COMPLIANT = TRUE;

    reinstall_group            = nls("reinstall_group","Version %%installed_version%% of %%product_label%% has already been installed and is up to date.  Do you want to reinstall it?");
    reinstall_group_help    = nls("reinstall_group_help","You selected to install %%product_label%%, which is up to date.  Unless a problem has occurred with %%product_label%%, there is no need to reinstall.  Choose 'No' to skip the reinstallation, or choose 'Yes' if you want to reinstall %%product_label%%.");

    { doit = execute("%installer_home%%dir_separator%%operating_system%.vrf"); }
    [
        'UNBOUND_VARIABLE:
        {
            required_version = product_version(instver_product);
            temp             = explode(required_version, ".");
            required_version = implode(list(first(temp),first(rest(temp)),
                                            first(rest(rest(temp))),
                                            first(rest(rest(rest(temp))))), ".");
            signal('FAILURE, instantiate(nls("instver_too_early1",
                                             "The version of the Installer currently running is %%installer_version%%. The installation you have chosen requires version %%required_version%% or later. Please run version %%required_version%% or later in order to perform this installation.")));
        }
    ]                                                                   /* This FAILURE will cause 3.0.x.x installer to exit gracefully. */

    if (doit)
    {
        /****************************************************************
        Display the generic "Welcome to Oracle Developer"
        billboard if not already displayed, and if Developer release
        *****************************************************************/
        if(exists("%installer_home%%dir_separator%d2bb_01.bmp"))
        {
            if(DEVELOPER2000_RELEASE)
            {
                if(not(DEV2K_BB01))
                {
                    DEV2K_BB01 = TRUE;
                    ui_graphics("%installer_home%%dir_separator%d2bb_01.bmp");
                }
            }
        }
        /****************************************************************/

        /*******************************
         Set the VRF-INS script "ratchet"
        ********************************/
        vrf_ratchet = "6.0.8.12.1";  /*"6.0.5.35.0"; */

        main_product_version = "6.0.5.34.1";
         /***************************
         Check Installed Version
         ***************************/
         if(registered(product_name(current_product)))
         {
              check_installed_version = registry_version(registration(product_name(current_product)));
              if(earlier_version(check_installed_version, main_product_version))
              {
                   information_dialog(instantiate(product_upgrade_required),
                                      instantiate(product_upgrade_contents),
                                      instantiate(product_upgrade_help));
                   refresh_map_file = FALSE;
                   doit = FALSE;
                   return(0);
              }
          }
          else
          {
                information_dialog(instantiate(main_product_required),
                                   instantiate(main_product_contents),
                                   instantiate(main_product_help));
                 refresh_map_file = FALSE;
                 doit = FALSE;
                 signal('FAILURE, instantiate(halt_installation));
          }
        /************************************************
        Create a label with the product name, and version
        *************************************************/
        EXECUTE_SCRIPT = "CREATE_LABEL";
        execute("%installer_home%%dir_separator%d2kr2vrf.usr");
        /************************************************/

        /*****************************
        Set the Product Name variables
        ******************************/
        TUTIL_PRODUCT = w32tutil60;
        verify_dependency_list = list(w32tutil60, w32gui60, w32rsf80); /* ,w32otl60 removed for patch-3 *//* rsf added for p-6 */
        install_dependency_list = list(); /* ,w32otl60 removed for patch-3 */


        /* Added for Patch-3  */
        /* If the language is not English then only test if the lang dependencies are already installed 
  		from the production version */

	  nls_lang = translate("nls_lang",ora_config);
	  if (not(nls_lang == "AMERICAN_AMERICA.WE8ISO8859P1"))
    	  {

	        if(not(registered("w32otl60")))
      	  {
            	 information_dialog(instantiate(otl_product_required),
	                                instantiate(otl_product_contents),
      	                          instantiate(otl_product_help));
            	 signal('FAILURE, instantiate(halt_installation));  
	        }
	  }
	/* Till here ***********/
        /*****************************/

        /********************************************************************
        Calculate total size of installation.....
        *********************************************************************/
        total_sum = 0;

        /******************
        Verify Dependencies
        *******************/
        EXECUTE_SCRIPT = "VERIFY_DEPENDENCIES";
        total_sum = total_sum + execute("%installer_home%%dir_separator%d2kr2vrf.usr");
        /******************/

        total_sum = total_sum + sum(deinst,exe,res);

        return(total_sum);
        /********************************************************************/
    }
    else
    {
        refresh_map_file = FALSE;
        return(0);
    }
}