/* Copyright (c) Oracle Corporation 1992.  All Rights Reserved */
/*****************************************************************************
  NAME
    ctut72.vrf - V3.1.2 version analysis/product configuration script
                  for Oracle Designer/2000 Tutorial Files 60

  DESCRIPTION
    This script checks dependencies and environment settings for the
    installation of Oracle Designer/2000 Tutorial Files 60

  OWNER
    Jeremy Williams

  MODIFIED    DD-MMM-YYYY  Reason
    jewillia  03-NOV-1994  Created

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

{
  filename = current_script;
  start_vrf_list = list(filename, 'DEBUG_CTUT72);
  EXECUTE_SCRIPT = "START.VRF";
  if (perform_start_vrf) execute("%product_home%\des2k_72.vrf");

/*****************************************************************************
   Check Installer and Product version
*****************************************************************************/

  /* sets the doit flag and calls <os>.vrf */

  patch_installation            = PATCHSET_RELEASE;

  EXECUTE_SCRIPT = "INSTVER.VRF";
  execute("%product_home%\des2k_72.vrf");

/*****************************************************************************
   Local variables...
*****************************************************************************/

  /* local install flags and variables */

  total_size                    = 0;

  verify_list                   = list();
  reference_list                = list();
  install_list                  = list();
  children_install_list         = list();

  cgenf_product_label           = product_interface_label(cgenf61_product);

/*****************************************************************************
   Start main logic...
*****************************************************************************/

  if (doit)
    {

/*****************************************************************************
   Dependencies and configuration variables
*****************************************************************************/

      /* verify_list            = list(creq72_product, repadm20_product); */
      verify_list               = ctut72_dependency_list;

      home_variable             = "CTUT72";
      home_variable_default     = "%oracle_home%\CTUT72";

      cgenf_variable            = "CGENF61";
      cgenf_variable_default    = "%oracle_home%\CGENF61";

      if (DATAMART_DESIGNER_RELEASE)
        {
          /* overwrite the default with a new one for data mart */
          home_variable             = "CTUT72";
          home_variable_default     = "%oracle_home%\doc\CTUT72";

          /* if an upgrade then move the old ctut72 root and change the
             registry key to match
          */
          ini_section = product_filename(current_product);
          {
            case_translate_list = list(home_variable,ora_config,ini_section);
            EXECUTE_SCRIPT = "TRANSLATE_VARIABLES.CMN";
            old_home_value = execute("%installer_home%\des2k_72.cmn");
            /* registry entry exists, else UNBOUND_ENVIRONMENT_VARIABLE would have been signalled */
            if (old_home_value != home_variable_default)
              {
                case_modify_list = list();
                add(case_modify_list,list("CTUT72", home_variable_default, ora_config, ini_section, 'INI_SECTION, 'TOP_LEVEL));
                EXECUTE_SCRIPT = "MODIFY_VARIABLES.CMN";
                execute("%product_home%\des2k_72.ins");

                move_file(old_home_value,home_variable_default);
              }
          }
          ['UNBOUND_ENVIRONMENT_VARIABLE, 'WRITE_ERROR, 'PERMISSION_DENIED, 'INVALID_FILE_NAME, 'FILE_NOT_FOUND, 'OS_ERROR: continue();]
        }

      case_map_variables = list('DES2K_R61_BULLETINS, 'DES2K_R61_TUTORIAL);

/*****************************************************************************
   NLS Prompt strings...
*****************************************************************************/

      display_product_label = nls("ui_product", "%product_label% Version %display_version%");

      installing_product        = nls("installing_product","Starting Installation of %%product_label%%");
      installing_deinstl        = nls("installing_deinstl","Installing %%product_label%% Installation scripts...");
      installing_patchset       = nls("installing_patchset","Installing %%product_label%% patchset file...");
      installing_bin            = nls("installing_bin","Installing %%product_label%% Executable files...");
      installing_main           = nls("installing_main","Installing %%product_label%% Product files...");
      installing_patches        = nls("installing_patches","Installing %%product_label%% Patch files...");

      removing_old              = nls("removing_old","Removing obsolete files from previous versions of %%product_label%%...");

      registering_product       = nls("registering_product","Registering %%product_label%%...");
      modify_environment        = nls("modify_environment","Modifying %%product_label%% Environment Variables...");

      analyze_variables         = nls("analyze_variables","Analyzing installed product %%analyze_variables_label%%...");
      analyze_verify            = nls("analyze_verify","Analyzing %%product_label%% dependent products...");
      analyze_children          = nls("analyze_children","Analyzing %%product_label%% child products...");
      analyze_paths             = nls("analyze_paths","Analyzing %%product_label%% Install Paths...");
      analyze_strategy          = nls("analyze_strategy","Analyzing %%product_label%% Install Strategy...");

      home_variable_prompt      = nls("home_variable_prompt","Enter the path for the %%product_label%% files");

/*****************************************************************************
   Set the VRF-INS script ratchet
*****************************************************************************/

      vrf_ratchet = "7.2.96.5.6";

/*****************************************************************************
   Verify parents and dependencies (except children)
*****************************************************************************/

      EXECUTE_SCRIPT = "VERIFY_DEPENDENCIES.VRF";
      execute("%product_home%\des2k_72.vrf");

/*****************************************************************************
   Install paths and configuration variables
*****************************************************************************/

      ui_product(product_label);
      ui_action(instantiate(analyze_paths));

      case_home_list = list(instantiate(home_variable),instantiate(home_variable_default),instantiate(home_variable_prompt),case_accept_tutorial_default);
      EXECUTE_SCRIPT = "DES2_HOME.VRF";
      CTUT72 = execute("%product_home%\des2k_72.vrf");

/*****************************************************************************
   Verify children
*****************************************************************************/

      EXECUTE_SCRIPT = "VERIFY_CHILDREN.VRF";
      if (not(empty(children_verify_list))) execute("%product_home%\des2k_72.vrf");

/*****************************************************************************
     Return sum including this prodct
*****************************************************************************/

      script_size = sum(deinstl,product);
      product_size = sum(main,tut,"%language_subgroup%",tut_ja,"%language_subgroup%");
      patchset_size = sum(patchset);
      install_size = 0;
      install_size = install_size + script_size;
      if (patch_installation)
        {
          install_size = install_size + patchset_size;
        }
      else if (not(case_registry_only_install))
        {
          install_size = install_size + product_size;
        }
      total_size = total_size + install_size;

      EXECUTE_SCRIPT = "END_VERIFY_DEPENDENCIES.VRF";
      execute("%product_home%\des2k_72.vrf");
    }

/*****************************************************************************
   End main logic...
*****************************************************************************/

  EXECUTE_SCRIPT = "END.VRF";
  if (perform_end_vrf) execute("%product_home%\des2k_72.vrf");

  return(total_size);
}