/* Copyright (c) Oracle Corporation 1994, 1996.  All Rights Reserved */
/*****************************************************************************
  NAME
    Dbase.vrf

  DESCRIPTION
    This script checks dependencies and environment settings for installation
    of the Windows 32 Dbase DataDirect Drivers.

  MODIFIED    DD-MMM-YY  Reason
  pgupta      11/18/97   Created
*****************************************************************************/
{

    {
        doit = TRUE;
        /*not making normal call to <os>.vrf because do not want version comparison to occur based on parent*/
      /*  product_label = product_interface_label(current_product); */
        doit = execute("%installer_home%\%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. */

    /******************************************************************************************************
    START MAIN LOGIC
    ******************************************************************************************************/
    if (doit)
    {
        /*****************************
        Set the VRF-INS script ratchet
        ******************************/
        vrf_ratchet = "2.0.0.0.0";

        /************************************************
        Create a label with the product name, and version
        *************************************************/
        EXECUTE_SCRIPT = "CREATE_LABEL";
        execute("%product_home%%dir_separator%d2kr2vrf.usr");
        /************************************************/


        /******************
        Bind OCA20 variable
        *******************/
        OCA20 = "%oracle_home%%dir_separator%OCA20";

         /****************************************************************
         Set default SYSTEM location - for all products
         *****************************************************************/
         windows_sys_dir = windows_system_directory();


         /****************************************************************
         Initialize total size of files
         *****************************************************************/
          total_sum = 0;

          total_sum = total_sum + sum(deinst, dbase);

    return(total_sum);

  } /*end if doit */

 else
   {
    refresh_map_file = FALSE;
    return(0);
   }
}