/* Copyright (c) Oracle Corporation 1992, 1996.  All Rights Reserved */
/***************************************************************************
  NAME
    Excel.ins - Installation script for Intersolv Datadirect Drivers

  DESCRIPTION
    This script installs the Excel Datadirect Drivers package.

  MODIFIED    MM/DD/YY    Reason
  pgupta      11/18/97    Created
 **************************************************************************/
{
    if(doit)
    {
        /*****************************
        Set the VRF-INS script ratchet
        ******************************/
        ins_ratchet = "2.0.0.0.0";

        execute("%installer_home%%dir_separator%%operating_system%.ins");

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

        win32_register_OCSM_product();

        /****************************************
        Set Installer to only copy files that
        are newer than those previously installed
        *****************************************/

        permit_invisible_registrations = FALSE;
        overwrite_mode = 'UPDATE;

                copy(deinst);

        /************************************************************
        Delete the Old Program Group if present and Install the new
        Program Group
        *************************************************************/

        if(exists("%WINDOWS_SYS_DIR%\D2XLS09.DLL"))
        {
          D2K60_DRIVERS = D2K60_DRIVERS_OLD;
          windows_delete_icons(excel);
          windows_delete_icons(shrdll);
          D2K60_DRIVERS = D2K60_DRIVERS_NEW;
        }
                copy(excel);
                copy(shrdll,"excel");
                win32_register_OCSM_group(shrdll,"excel",'MEDMODE);
                register(excel_prod);
                reference(excel_prod);
                {win32_asynchronous_spawn("%installer_home%%dir_separator%d2drvins.exe Excel");}
                ['NO_RESPONSE: continue();]

        permit_retry_operations = FALSE;
        permit_invisible_registrations = TRUE;

    }
    [
         'UNREGISTERED_PRODUCT: continue();
         'CANCEL: signal('FAILURE, instantiate(halt_installation));
    ]

}