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

/****************************************************************************
  NAME
    fjava60.ins - V3 installation script for Windows Java Class Web Support Files.

  DESCRIPTION
    This script installs Windows Java Class Web Support Files 6.0.

  OWNER

  MODIFIED  MM/DD/YY    Reason
*****************************************************************************/

{
    if (doit)
    {
    /*****************************
    Set the VRF-INS script ratchet
    ******************************/
    ins_ratchet = "6.0.0.0.0";

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

    /****************************************
    Setup the nls() stuff for install scripts
    *****************************************/

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

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

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

    ui_action(instantiate(install_files));
    copy(deinst);

    ui_action(instantiate(install_exe));
    copy(ewt);

    temp_var=current_directory();
    change_directory("%FORMS60%\java");
    /* win32_asynchronous_*/
    {win32_asynchronous_spawn("ewt.exe -o ");}
    ['NO_RESPONSE, 'FILE_NOT_FOUND, 'MEMORY_ERROR: continue();]
    {win32_asynchronous_spawn("share.exe -o ");}
    ['NO_RESPONSE, 'FILE_NOT_FOUND, 'MEMORY_ERROR: continue();]
    {win32_asynchronous_spawn("help.exe -o ");}
    ['NO_RESPONSE, 'FILE_NOT_FOUND, 'MEMORY_ERROR: continue();]
    change_directory("%temp_var%");

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

    /*************
    Install Parent
    **************/
    if(install_parent)    /* Install parent first, if necessary */
         install(product_parent(current_product));
    /*************/
    permit_retry_operations = TRUE;

    /*********************************
     Install FORMS  Language Supplement
     **********************************/
     if(child_in_control)
     {
         install_fjava = TRUE;
         install(w32formsl60);
     }
    /*********************************
    Register and Reference the product
    **********************************/
    ui_product(instantiate(display_product_label));

    register(current_product);
    reference(current_product);
    /*********************************/
    remove(delold);      /* remove any outdated files if install was successful */

    /*********************************/
    permit_retry_operations = FALSE;
  } /*END if doit*/

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


} /*END fjava60.ins*/
