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

/*****************************************************************************
  NAME
    brqrl60.ins - V3 installation script for Dev2000 Forms Language Supplement

  DESCRIPTION
    This script installs Browser Language Supplement.

  MODIFIED      MM/DD/YY        REASON
  anmanian	01/13/99	modified
  pgupta        08/14/97        Created
*****************************************************************************/

{
    if(not(doit))
    {
       if(member(selected_products, w32tul60))
       {
          information_dialog("Language Supplement Files are not required if English is chosen");
       }
    }
    if (doit)
    {
        /*****************************
        Set the VRF-INS script ratchet
        ******************************/
        ins_ratchet = "6.0.8.12.1";

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

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

        


        /****************************************************************
         Set the install variable in Registry
        *****************************************************************/

        /* Using the existing registry entries */

         if(child_in_control)
            if(install_parent)
                install(product_parent(current_product));


        /*****************************************************************
        Install the product
        ******************************************************************/
        ui_product(instantiate(display_product_label));

        ui_action(instantiate(install_files));
        copy(deinst);
      
        if(install_tutil)
            {
                ui_action(instantiate(install_files));
                copy(tutil, nls_abbreviation);
            }

        if(install_grppref)
            {
                ui_action(instantiate(install_files));
                copy(grppref, nls_abbreviation);
            }

 

        /************************************************************************
        Register and Reference the product and remove delold
        *************************************************************************/

        EXECUTE_SCRIPT = "REGISTER_REFERENCE_PRODUCT";
        execute("%installer_home%%dir_separator%d2kr2ins.usr");
        /************************************************************************/

        permit_retry_operations = TRUE;

        /**************************
        Modify Config Variables....
        ***************************/
        ui_action(instantiate(modify_variables));

        if (set_vgs60)
        {
            modify("VGS60", VGS60, ora_config, product_filename(current_product));     /* add vgs60 in Registry */
            win32_register_key("$ORACLE","","VGS60",'REPLICATE);
        }

        if (set_de60)
        {
            modify("DE60", DE60, ora_config, product_filename(current_product));     /* add de60 in Registry */
            win32_register_key("$ORACLE","","DE60",'REPLICATE);
        }

        if (set_ca_gprefs)
        {
            modify("CA_GPREFS", CA_GPREFS, ora_config, product_filename(current_product));     /* add CA_GPREFS in Registry */
            win32_register_key("$ORACLE","","CA_GPREFS",'REPLICATE);
        }


        /***************************************************************
         Registering map variables except Installer_home and oracle_home
        ****************************************************************/
        win32_register_map_variable("VGS60");
        win32_register_map_variable("DE60");
        win32_register_map_variable("CA_GPREFS");


        /************************************************************************
        Reference dependencies
        *************************************************************************/

        ui_action(instantiate(reference_dependencies));

        {reference(current_product);}  
        ['UNREGISTERED_PRODUCT: continue();]


        /**************************************************************************/
        permit_retry_operations = FALSE;

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