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

/*****************************************************************************
  NAME
    fcsnd60.vrf - V3 analysis/product configuration script for Windows
                    Forms 6.0 Cue Card Sound Extensions

  DESCRIPTION
    This script checks dependencies and environment settings for the
    installation of Windows Forms 6.0 Cue Card Sound Extensions.


  MODIFIED   MM/DD/YY   REASON
    pgupta   11/07/97   Created
******************************************************************************/

{
   SHARED_ORACLE_COMPLIANT = TRUE;
    { doit = execute("%installer_home%%dir_separator%%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)
    {
        /****************************************************************
        Display the generic "Welcome to Oracle Developer"
        billboard if not already displayed, and if Developer release
        *****************************************************************/
        if(exists("%installer_home%%dir_separator%d2bb_01.bmp"))
        {
            if(DEVELOPER2000_RELEASE)
            {
                if(not(DEV2K_BB01))
                {
                    DEV2K_BB01 = TRUE;
                    ui_graphics("%installer_home%%dir_separator%d2bb_01.bmp");
                }
            }
        }
        /****************************************************************/

        /*****************************
        Set the VRF-INS script ratchet
        ******************************/
        vrf_ratchet = "6.0.0.0.0";

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

        /******************************************************************
        child_in_control = TRUE ==> component product called explicitly
        child_in_control = FALSE ==> component product called by the PARENT
        *******************************************************************/
        child_in_control = TRUE;
        if( member(products_for_installation, product_parent(current_product)) )
            child_in_control = FALSE;
        /******************************************************************/

        /*************************
         Set Product Name variables
        **************************/
        DESIGNER_PRODUCT = w32fdes60;
        /*************************/

        /**************************
        Determine installation path
        ***************************/
        install_variable = "FORMS60";
        default_home     = "%oracle_home%%dir_separator%FORMS60";
        FORMS60 = execute("%product_home%%dir_separator%instloc.usr");                        /* resets generic variable for this specific product */
        TOOLS_HOME = "%ORACLE_HOME%%dir_separator%TOOLS";
        DOC60 = "%TOOLS_HOME%%dir_separator%DOC60";
        /**************************/

        /************************************************************************
        Compute and Return total size of files
        *************************************************************************/
        total_sum = 0;

        /********************************************
        Check if Forms Designer needs to be installed
        *********************************************/
        if(child_in_control)
        {
            COMPONENT_PRODUCT = DESIGNER_PRODUCT;
            EXECUTE_SCRIPT = "CHECK_COMPONENT_PRODUCT";
            install_designer = execute("%installer_home%%dir_separator%d2kr2vrf.usr");

            if(install_designer)
                total_sum = total_sum  + verify(DESIGNER_PRODUCT);
        }
        /********************************************/

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

        if(child_in_control)
        {
           if(not(member(products_for_installation, w32formsl60)))
           {
                    total_sum = total_sum + verify(w32formsl60);
                    add(products_for_installation, w32formsl60);

            }
         }
        /*************************************************/

        if(child_in_control)
        {
           if(not(member(products_for_installation, w32formsl60)))
           {
                    total_sum = total_sum + verify(FLANG_PRODUCT);
                    add(products_for_installation, w32formsl60);

           }
         }
        /*******************************************/
        total_sum = total_sum + sum(deinst);
        total_sum = total_sum + sum(FORMS,"US");
        total_sum = total_sum + sum(FORMS,NLS_ABBREVIATION);


        return(total_sum);
        /************************************************************************/
    }
    else
    {
        refresh_map_file = FALSE;
        return(0);
    }
}