$(document).ready(function () {


        var NODO = 0;
        $(document).on("change", '.material', function () {
            var Material = $(this).val(); //.split("*");
            //alert(Material);
            // $('#SalidaX').append("<br> Material : " + Material); 
        });


        $.fn.PruebaMensaje = function (mensaje) {
            alert(mensaje);
        };
 
        /***
         * ObtenerValorDeChecks Una funcion que recibe un elemento incluido el #
         * @param {type} Elemento
         * @returns {undefined}
         */
        $.fn.ObtenerValorDeChecks = function (Elemento, Fijar) {
            try {

                if (Fijar != undefined) {
                    $(Elemento).prop('checked', Fijar);
                }
                var Resultado = ($(Elemento).is(":checked")) ? true : false;
                
                return Resultado;

            } catch (err) {
                return false;
            }
        };

        $.fn.ActivarOdesctivar = function (Elemento, Opcion) {
            try {

                if (Opcion != undefined) {
                    $(Elemento).prop('disabled', Opcion);

                }

                if (Opcion == true) {
                    $(Elemento).prop('checked', false);
                    $(Elemento).prop('value', '');
                    $(Elemento).removeClass('ErrordeEntrada');
                }

            } catch (err) {

            }
        };

   
        $.fn.ObtenerMayordeArray = function (Elementos) {
            try {

                var Contador = 0;

                var mayor = 0;

                for (Contador = 0; Contador < Elementos.length; Contador++) {

                    var valor = parseFloat(Elementos[Contador]);

                    if (valor != undefined && valor != 'undefined' && valor > 0) {

                        $('#SalidaX').append("<br> Posición  " + Contador + ', Valor:' + valor);

                        if (valor > mayor) {
                            mayor = valor;
                        }
                    }
                }

                //$('#SalidaX').append("<br> <strong> Función ObtenerMayordeArray: Elementos: " + Elementos + " , Mayor : " + mayor + ' </strong> ');

                //  alert("Mayor x: " + mayor);
                return mayor;

            } catch (Err) {
                return 0;
            }

        };


        $.fn.ObtenerMENORdeArray = function (Elementos) {
            try {

                var Contador = 0;

                var menor = Elementos[1];

                for (Contador = 0; Contador < Elementos.length; Contador++) {

                    var valor = parseFloat(Elementos[Contador]);

                    if (valor != undefined && valor != 'undefined' && valor > 0) {

                        $('#SalidaX').append("<br> Posición  " + Contador + ', Valor:' + valor);
                        if (valor > 0 && valor <= menor) {
                            menor = valor;
                        }
                    }
                }
                return menor;

            } catch (Err) {
                return 0;
            }

        };


        $.fn.Obtener_PROMEDIO_deArray = function (Elementos) {
            try {

                var Contador = 0;

                var Total = 0;

                var suma = 0;

                for (Contador = 0; Contador < Elementos.length; Contador++) {

                    var valor = parseFloat(Elementos[Contador]);

                    if (valor != undefined && valor != 'undefined' && valor > 0) {
                        suma = suma + valor;
                        Total++;
                        $('#SalidaX').append("<br> Posición  " + Contador + ', Elementos.length -> ' + Elementos.length + ' , suma:' + suma);
                    }

                }

                return round(suma / Total, 2);

            } catch (Err) {
                return 0;
            }

        };

      
        $.fn.Codificar_PARA_TextArea = function (cadena) {
            try {

                // alert('Entra'  + cadena);

                var Elementos = cadena.split(' ');
                cadena = '';
                for (var x = 0; Elementos.length - 1; x++) {
                    var SubCadena = Elementos[x];
                    cadena += ' ' + SubCadena.replace('<br>', '\n');
                }

                return cadena;

            } catch (err) {
                // alert('Error : Codificar_PARA_TextArea ' + err);
                return cadena;
            }

        };

        $.fn.Obtener_FD_Agrietamiento = function (Susceptibilidad, Inspeccion) {
            try {

                var dataString = 'SAVE_Operation=tabla_IBR3_6_3_SCC_Damage_Factors&Susceptibilidad=' + Susceptibilidad + '&Efectividad=' + Inspeccion + '&ConsultaBasicaTablas=OK&END';

                var resultado = 0;
              

                $.ajax({
                    type: "POST",
                    url: "SaveData.php",
                    data: dataString,
                    cache: true,
                    async: false,
                    success: function (html) {

                       // alert(html);

                        $("#SalidaX").append("<br> Retorno : <br> " + dataString + "<BR> HTML  " + html);

                        resultado = $.fn.Convertir_double(html);

                        return resultado;
                    }

                });

                return resultado;

            } catch (Error) {

            }
        };

        $.fn.ObtenerValorArtAdelgazamientoIBR = function (art, combo_Adelgazamiento_A) {
            try {
                var dataString = "";

                var resultado = 0;

                dataString = 'SAVE_Operation=ObtenerValorArtAdelgazamientoIBR&art=' + art + '&efectividad=' + combo_Adelgazamiento_A + '&ConsultaBasicaTablas=OK&OK';

                $.ajax({
                    type: "POST",
                    url: "SaveData.php",
                    data: dataString,
                    cache: true,
                    async: false,
                    success: function (html) {
                        //alert(html);
                        // $("#SalidaX").append("<br> DataString : " + dataString + "<BR> <b>HTML</b> <br>  " + html);
                        resultado = $.fn.Convertir_double(html);
                        return resultado;
                    }
                });

                return resultado;

            } catch (Error) {

            }

        };

        var Anios_Maximo_Permitido = 15;

        var Anios = 0;

        $.fn.GenerarGrafica_FD_Individual = function (Reng, TipoDeGrafica, TipoDeFactorDeDanio, Efectividad, FD_Permitido, AniodeEvaluacion, EfectividadOptimizada) {

            alert("Atención: Este proceso grafíca el factor de daño individual contra el tiempo, en un algoritmo de simulación. Sea paciente , demoraremos un poco !! ");

            //  alert("TipoDeGrafica->" + TipoDeGrafica + ', TipoDeFactorDeDanio->' + TipoDeFactorDeDanio + ', Efectividad->' + Efectividad + ', FD_Permitido->' + FD_Permitido + ', AniodeEvaluacion->' + AniodeEvaluacion + ', EfectividadOptimizada->' + EfectividadOptimizada);
            Anios = 0;

            var FactordeDanioSeleccionado = "";

            var dataString = "";

            var Grafica = "";

            var EfectividadActual = Efectividad;

            Grafica = "GRAFICA-AGRIETAMIENTO-" + (Math.floor((Math.random() * 100000) + 1)) + ".png";

            var Vector_FD = new Array();
            var Vector_FD_Optimizado = new Array();
            var Vector_Limite = new Array();
            var VectorAnios = new Array();

            var Simulador_ActualInspeccion = true,
                Simulador_NuevaInspeccion = false;

            AniodeEvaluacion = $.fn.Convertir_double(AniodeEvaluacion);
            if (AniodeEvaluacion == undefined || isNaN(AniodeEvaluacion)) {
                AniodeEvaluacion = 2019;
            }

            // FD Permitido
            FD_Permitido = $.fn.Convertir_double(FD_Permitido);
            if (FD_Permitido == undefined || isNaN(FD_Permitido)) {
                FD_Permitido = 1000;
            }

            var FD_permitido_Maximo = FD_Permitido;

            $.fn.Funcion_Memoria_Calculo(true, Salida);

            var Frecc_Falla_generica = parseFloat($("#combo_IBR_frecuencia" + Reng + " option:selected").attr('data-value'));

            if (FD_permitido_Maximo > 0 && AniodeEvaluacion > 0) {

                $.fn.Funcion_ProgressAvance(Anios_Maximo_Permitido, 0);

                var SumaFD = 0,
                    AniosSimulador = 0;

                do {

                    if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_SCC_Sulfuros') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_SCC_Sulfuros');
                        FactordeDanioSeleccionado = 'Agrietamiento SCC-Sulfuros';

                    } else if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_SCC_Politionicos') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_SCC_Politionicos');
                        FactordeDanioSeleccionado = 'Agrietamiento SCC-Politiónicos';

                    } else if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_SCC_Hidrogeno') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_SCC_Hidrogeno');
                        FactordeDanioSeleccionado = 'IBR_Agrietamiento_SCC_Hidrogeno';

                    } else if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_HIC_SOHIC_por_HF') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_HIC_SOHIC_por_HF');
                        FactordeDanioSeleccionado = 'IBR_Agrietamiento_HIC_SOHIC_por_HF';

                    } else if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_SCC_Carbonatos') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_SCC_Carbonatos');
                        FactordeDanioSeleccionado = 'IBR_Agrietamiento_SCC_Carbonatos';

                    } else if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_SCC_Cloruros') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_SCC_Cloruros');
                        FactordeDanioSeleccionado = 'IBR_Agrietamiento_SCC_Cloruros';

                    } else if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_SCC_Aminas') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_SCC_Aminas');
                        FactordeDanioSeleccionado = 'IBR_Agrietamiento_SCC_Aminas';

                    } else if (TipoDeFactorDeDanio == 'IBR_Agrietamiento_SCC_Causticos') {

                        SumaFD = $.fn.SumaAgrietamiento('', AniosSimulador, Efectividad, 'IBR_Agrietamiento_SCC_Causticos');
                        FactordeDanioSeleccionado = 'IBR_Agrietamiento_SCC_Causticos';

                    } else if (TipoDeFactorDeDanio == 'Modulo_IBR_Adelgazamiento') {

                        SumaFD = $.fn.Calcular_Adelgazamiento2daEdicion('', AniosSimulador, Efectividad);
                        FactordeDanioSeleccionado = 'Adelgazamiento';

                    } else if (TipoDeFactorDeDanio == 'IBR_Adelgazamiento_3raEd_Recipientes' || TipoDeFactorDeDanio == 'IBR_Adelgazamiento_3raEd_Tuberias' ||
                        TipoDeFactorDeDanio == 'IBR_Adelgazamiento_3raEd_Tanques_EnvBoq' || TipoDeFactorDeDanio == 'IBR_Adelgazamiento_3raEd_Tanques_Fondo') {

                        SumaFD = $.fn.Calcular_Adelgazamiento_3raEd('', AniosSimulador, Efectividad);
                        FactordeDanioSeleccionado = TipoDeFactorDeDanio;

                    } else {

                        SumaFD = 0;
                        FactordeDanioSeleccionado = TipoDeFactorDeDanio;
                    }

                    if (Simulador_NuevaInspeccion == true) {
                        Vector_FD_Optimizado[Anios] = SumaFD;
                    } else {
                        Vector_FD[Anios] = SumaFD;
                    }


                    Vector_Limite[Anios] = FD_permitido_Maximo;

                    if (TipoDeGrafica == 'Gráfica de POF') {
                        var Prob_falla_nod = SumaFD * Frecc_Falla_generica * 1;
                        Vector_FD[Anios] = Prob_falla_nod;
                        Vector_Limite[Anios] = 0.1;
                    }

                    Salida = '<h3> SIMULADOR ' + TipoDeFactorDeDanio + ' </h3> Año =>' + Anios +
                        " <br> FD Permitido => " + FD_permitido_Maximo +
                        ' <br> Total FD => ' + SumaFD +
                        ' <br> AniosSimulador => ' + AniosSimulador +
                        ' <br> Efectividad =>' + Efectividad +
                        ' <br> Efectividad Optimizada => ' + EfectividadOptimizada;

                    $.fn.Funcion_Memoria_Calculo(false, Salida);

                    AniosSimulador++;

                    if ((SumaFD >= FD_permitido_Maximo || AniosSimulador >= Anios_Maximo_Permitido) && Simulador_NuevaInspeccion == false) {
                        Simulador_ActualInspeccion = false;
                        Simulador_NuevaInspeccion = true;
                        SumaFD = 0;
                        AniosSimulador = 0;

                        if (TipoDeGrafica == 'Gráfica Factor Daño') {
                            //$('#txt_fd_anios_permitidos' + Reng).val(AnioEvaluacion + Anios);
                        }

                        Anios = Anios - 1;

                        Efectividad = EfectividadOptimizada;
                    }

                    VectorAnios[Anios] = AniodeEvaluacion + Anios;

                    Anios++;

                    $.fn.Funcion_ProgressAvance(Anios_Maximo_Permitido, AniosSimulador);

                } while (SumaFD < FD_permitido_Maximo && AniosSimulador <= Anios_Maximo_Permitido)



                // ** Fijar los Nuevos Planes ***//               
                dataString = 'Vector_FD=' + Vector_FD + '&VectorAnios=' + VectorAnios +
                    '&VectorLimite=' + Vector_Limite + '&Vector_FD_Optimizado=' + Vector_FD_Optimizado + '&TipoMawp=&NombreGrafica=' + Grafica +
                    '&Componente=&TipoDeGrafica=' + TipoDeGrafica + '&FD_Limite=' + FD_permitido_Maximo +
                    '&AnioEvaluacion=' + AniodeEvaluacion + '&IdEquipo=&TipoDeFactorDeDanio=' + FactordeDanioSeleccionado +
                    '&EfectividadActual=' + EfectividadActual + '&EfectividadOptimizado=' + EfectividadOptimizada + '&OK';

                //    alert(dataString);

                Salida = "<br> Data : " + dataString;

                $.fn.Funcion_Memoria_Calculo(false, Salida);
 
                $.ajax({
                    type: "POST",
                    url: "Graficas/Examples/Grafica_POF_FD_Individual_Equipos.php",
                    data: dataString,
                    cache: false,
                    success: function (html) {

                        if (TipoDeGrafica == 'Gráfica de POF') {

                            $("#ContenidoModal").html(html);
                            $("#Grafica_POF_IBR_Agrietamiento_SCC_Sulfuros_1").val(Grafica);
                            $("#IMG_Grafica_POF").attr("src", "https://www.tech-inservice.com/NewTech/ToolsCalculos/Graficas/tmp/" + "" + Grafica + "");

                        } else {

                            $("#ContenidoModal").html(html);
                            $("#Grafica_FD_" + TipoDeFactorDeDanio + "_1").val(Grafica);
                            $("#IMG_Grafica_FD_" + TipoDeFactorDeDanio + "_1").attr("src", "https://www.tech-inservice.com/NewTech/ToolsCalculos/Graficas/tmp/" + "" + Grafica + "");
                            $("#IMG_Grafica_FD_" + TipoDeFactorDeDanio + "").attr("src", "https://www.tech-inservice.com/NewTech/ToolsCalculos/Graficas/tmp/" + "" + Grafica + "");

                        }

                    },
                    fail: function () {
                        alert("Error alguno");
                    }
                });

                $.fn.Funcion_Abrir_VentanaModal('');

                return false;

            } else {
                alert("Debe establecer un FD permitido y establecer el Año de la Inspección");
                return false;
            }
        };


        $.fn.SumaAgrietamiento = function (NODO, Anios, Efectividad, TipoDeFactorDeDanioIndividual) {

            try {
                var Mayor = 0;

                var ArrayAgrietamiento = [0, 0];

                var txt_Agrietamiento_SCC_Carbonatos_resultado = 0,
                    txt_Agrietamiento_SCC_Sulfuros_resultado = 0,
                    txt_Agrietamiento_SCC_Hidrogeno_resultado = 0,
                    txt_Agrietamiento_SCC_HIC_SOHIC_resultado = 0,
                    txt_Agrietamiento_SCC_Aminas_resultado = 0,
                    txt_Agrietamiento_SCC_Causticos_resultado = 0,
                    txt_Agrietamiento_SCC_Cloruros_resultado = 0,
                    txt_Agrietamiento_SCC_Politionicos_resultado = 0;

                if (TipoDeFactorDeDanioIndividual == undefined || TipoDeFactorDeDanioIndividual == 'undefined') {

                    if (FD_Agrietamiento_SCC_Carbonatos_chk1_ == true && FD_Agrietamiento_SCC_Carbonatos_chk2_ == true) {
                        txt_Agrietamiento_SCC_Carbonatos_resultado = $.fn.Calcular_Agrietamiento_SCC_Carbonatos(NODO, Anios, Efectividad);
                    }

                    if (FD_Agrietamiento_SCC_Sulfuros_chk1_ == true && FD_Agrietamiento_SCC_Sulfuros_chk2_ == true) {
                        txt_Agrietamiento_SCC_Sulfuros_resultado = $.fn.Calcular_Agrietamiento_SCC_Sulfuros(NODO, Anios, Efectividad);
                    }

                    if (FD_Agrietamiento_SCC_Hidrogeno_chk1_ == true && FD_Agrietamiento_SCC_Hidrogeno_chk2_ == true) {
                        txt_Agrietamiento_SCC_Hidrogeno_resultado = $.fn.Calcular_Agrietamiento_SCC_Hidrogeno(NODO, Anios, Efectividad);
                    }

                    if (FD_Agrietamiento_HIC_SOHIC_chk1_ == true && FD_Agrietamiento_HIC_SOHIC_chk2_ == true) {
                        txt_Agrietamiento_SCC_HIC_SOHIC_resultado = $.fn.Calcular_Agrietamiento_HIC_SOHIC(NODO, Anios, Efectividad);
                    }

                    if (FD_Agrietamiento_SCC_Aminas_chk1_ == true && FD_Agrietamiento_SCC_Aminas_chk2_ == true) {
                        txt_Agrietamiento_SCC_Aminas_resultado = $.fn.Calcular_Agrietamiento_SCC_Aminas(NODO, Anios, Efectividad);
                    }

                    if (FD_Agrietamiento_SCC_Causticos_chk1_ == true && FD_Agrietamiento_SCC_Causticos_chk2_ == true) {
                        txt_Agrietamiento_SCC_Causticos_resultado = $.fn.Calcular_Agrietamiento_SCC_Causticos(NODO, Anios, Efectividad);
                    }

                    if (FD_Agrietamiento_SCC_Cloruros_chk1_ == true && FD_Agrietamiento_SCC_Cloruros_chk1_ == true && FD_Agrietamiento_SCC_Cloruros_chk1_ == true) {
                        txt_Agrietamiento_SCC_Cloruros_resultado = $.fn.Calculas_Agrietamiento_SCC_Cloruros(NODO, Anios, Efectividad);
                    }

                    if (FD_Agrietamiento_POLITIONICOS_chk1_ == true && FD_Agrietamiento_POLITIONICOS_chk2_ == true) {
                        txt_Agrietamiento_SCC_Politionicos_resultado = $.fn.Calcular_Agrietamiento_SCC_Politionicos(NODO, Anios, Efectividad);
                    }

                    ArrayAgrietamiento = [txt_Agrietamiento_SCC_Carbonatos_resultado, txt_Agrietamiento_SCC_Sulfuros_resultado,
                        txt_Agrietamiento_SCC_Hidrogeno_resultado, txt_Agrietamiento_SCC_HIC_SOHIC_resultado, txt_Agrietamiento_SCC_Aminas_resultado,
                        txt_Agrietamiento_SCC_Causticos_resultado, txt_Agrietamiento_SCC_Cloruros_resultado, txt_Agrietamiento_SCC_Politionicos_resultado
                    ];

                    Mayor = $.fn.ObtenerMayordeArray(ArrayAgrietamiento);

                    if (Anios == 0 && Efectividad == undefined) {
                        $('#txt_fd_agrietamiento' + NODO).val(Mayor);
                    }

                } else {

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_SCC_Carbonatos') {
                        txt_Agrietamiento_SCC_Carbonatos_resultado = $.fn.Calcular_Agrietamiento_SCC_Carbonatos(NODO, Anios, Efectividad);
                    }

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_SCC_Sulfuros') {
                        txt_Agrietamiento_SCC_Sulfuros_resultado = $.fn.Calcular_Agrietamiento_SCC_Sulfuros(NODO, Anios, Efectividad);
                    }

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_SCC_Hidrogeno') {
                        txt_Agrietamiento_SCC_Hidrogeno_resultado = $.fn.Calcular_Agrietamiento_SCC_Hidrogeno(NODO, Anios, Efectividad);
                    }

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_HIC_SOHIC_por_HF') {
                        txt_Agrietamiento_SCC_HIC_SOHIC_resultado = $.fn.Calcular_Agrietamiento_HIC_SOHIC(NODO, Anios, Efectividad);
                    }

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_SCC_Aminas') {
                        txt_Agrietamiento_SCC_Aminas_resultado = $.fn.Calcular_Agrietamiento_SCC_Aminas(NODO, Anios, Efectividad);
                    }

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_SCC_Causticos') {
                        txt_Agrietamiento_SCC_Causticos_resultado = $.fn.Calcular_Agrietamiento_SCC_Causticos(NODO, Anios, Efectividad);
                    }

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_SCC_Cloruros') {
                        txt_Agrietamiento_SCC_Cloruros_resultado = $.fn.Calculas_Agrietamiento_SCC_Cloruros(NODO, Anios, Efectividad);
                    }

                    if (TipoDeFactorDeDanioIndividual == 'IBR_Agrietamiento_SCC_Politionicos') {
                        txt_Agrietamiento_SCC_Politionicos_resultado = $.fn.Calcular_Agrietamiento_SCC_Politionicos(NODO, Anios, Efectividad);
                    }

                    ArrayAgrietamiento = [txt_Agrietamiento_SCC_Carbonatos_resultado, txt_Agrietamiento_SCC_Sulfuros_resultado,
                        txt_Agrietamiento_SCC_Hidrogeno_resultado, txt_Agrietamiento_SCC_HIC_SOHIC_resultado, txt_Agrietamiento_SCC_Aminas_resultado,
                        txt_Agrietamiento_SCC_Causticos_resultado, txt_Agrietamiento_SCC_Cloruros_resultado, txt_Agrietamiento_SCC_Politionicos_resultado
                    ];

                    Mayor = $.fn.ObtenerMayordeArray(ArrayAgrietamiento);

                }

                return Mayor;

            } catch (Err) {

            }
        };


        $.fn.Funcion_Generar_Grafica_Agrietamiento = function (comboInspecciones, TipoDeFactorDeDanioIndividual) {

            var EfectividadOptimizada = $('#combo_NuevaInspeccion_' + TipoDeFactorDeDanioIndividual).val();

            var FD_permitido_Maximo = $.fn.Convertir_double($('#txt_FD_Limite_' + TipoDeFactorDeDanioIndividual).val(), $('#txt_FD_Limite_' + TipoDeFactorDeDanioIndividual));
            var AnioEvaluacion = $.fn.Convertir_double($('#txt_anio_Evaluacion_' + TipoDeFactorDeDanioIndividual).val(), $('#txt_anio_Evaluacion_' + TipoDeFactorDeDanioIndividual));

            $("#IMG_Grafica_FD_" + TipoDeFactorDeDanioIndividual + "_1").attr("src", "");

            $.fn.GenerarGrafica_FD_Individual(1, 'Gráfica Factor Daño', TipoDeFactorDeDanioIndividual,
                comboInspecciones, FD_permitido_Maximo, AnioEvaluacion, EfectividadOptimizada);

        };


        $.fn.Funcion_Generar_Grafica_Adelgazamiento = function (ArrayInspecciones, TipoDeFactorDeDanioIndividual) {

            var EfectividadOptimizadaA = $.fn.Convertir_String_To_Double($('#combo_NuevaInspeccion_A_' + TipoDeFactorDeDanioIndividual).val());
            var EfectividadOptimizadaB = $.fn.Convertir_String_To_Double($('#combo_NuevaInspeccion_B_' + TipoDeFactorDeDanioIndividual).val());
            var EfectividadOptimizadaC = $.fn.Convertir_String_To_Double($('#combo_NuevaInspeccion_C_' + TipoDeFactorDeDanioIndividual).val());
            var EfectividadOptimizadaD = $.fn.Convertir_String_To_Double($('#combo_NuevaInspeccion_D_' + TipoDeFactorDeDanioIndividual).val());

            if ('' == 'IBR_Adelgazamiento_3raEd_Tanques_Fondo') {
                EfectividadOptimizadaA = $.fn.LimpiarCadena($('#combo_NuevaInspeccion_A_' + TipoDeFactorDeDanioIndividual).val());
            }

            var ArrayOptimizacion = [EfectividadOptimizadaA, EfectividadOptimizadaB, EfectividadOptimizadaC, EfectividadOptimizadaD];

            var FD_permitido_Maximo = $.fn.Convertir_double($('#txt_FD_Limite_' + TipoDeFactorDeDanioIndividual).val(), $('#txt_FD_Limite_' + TipoDeFactorDeDanioIndividual));
            var AnioEvaluacion = $.fn.Convertir_double($('#txt_anio_Evaluacion_' + TipoDeFactorDeDanioIndividual).val(), $('#txt_anio_Evaluacion_' + TipoDeFactorDeDanioIndividual));

            $("#IMG_Grafica_FD_" + TipoDeFactorDeDanioIndividual + "_1").attr("src", "");

            $.fn.GenerarGrafica_FD_Individual(1, 'Gráfica Factor Daño', TipoDeFactorDeDanioIndividual,
                ArrayInspecciones, FD_permitido_Maximo, AnioEvaluacion, ArrayOptimizacion);

        };

        $.fn.Funcion_Establer_Grafica = function (Informacion, TipoDeFactorDeDanio) {

            var Grafica_FD_ = $.fn.BuscarEnArray(Informacion.split(";"), 'Grafica_FD_' + TipoDeFactorDeDanio + '_1');
            if (Grafica_FD_ != 'undefined' && Grafica_FD_ != '') {
                $("#IMG_Grafica_FD_" + TipoDeFactorDeDanio + "_1").attr("src", "BASE_PATH_GRAFICAS" + Grafica_FD_);
            }

        };


        $.fn.Funcion_Establer_Valor_Campo = function (Informacion, Campo) {


            var Valor = $.fn.BuscarEnArray(Informacion.split(";"), Campo);

            if (Valor != 'undefined' && Valor != '') {
                $("#" + Campo).val(Valor);
            }

        };



        $(document).on("click", '#Btn_Grafica_Individual', function () {
            var TipoGrafica = $(this).attr('data-grafica');
        });




        $.fn.tabla_nuevo_plant_forro_organico = function (campo, tiempo, txt) {

            if (campo == "" || tiempo == "") {
                $("#" + txt).val("");
                return false;
            }

            var dataString = "";
            var resultado = 0;

            dataString = 'GetDataTables=tabla_nuevo_plant_forro_organico&campo=' + campo + '&tiempo=' + tiempo + '&OK';

            $("#" + txt).val("");


            $.ajax({
                type: "POST",
                url: "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    //  $("#SalidaX").append("<br> DataString" + dataString + "<BR> HTML  " + html);
                    //  $("#" + txt).val(parseFloat(html));
                    resultado = parseFloat(html);
                }
            });
            return resultado;
        };


        $.fn.tabla_nuevo_plan_forro_inorganico = function (tiempo, tipo_forro, txt) {

            if (tiempo == "" || tipo_forro == "") {
                $("#" + txt).val("");
                return false;
            }

            var dataString = "";
            var resultado = 0;

            dataString = 'GetDataTables=tabla_nuevo_plan_forro_inorganico&tiempo=' + tiempo + '&tipo_forro=' + tipo_forro + '&OK';

            $("#" + txt).val("");
            //$("#SalidaX").html(dataString);



            $.ajax({
                type: "POST",
                url: "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {

                    Salida += '<p> Resultados Tablas </p>' +
                        ' <br> Tabla => Forro Inorganico ' +
                        ' <br> Resultado => ' + html +
                        ' <br> tiempo => ' + tiempo +
                        ' <br> tipo_forro => ' + tipo_forro;

                    resultado = parseFloat(html);
                }
            });

            return resultado;
        };


        $.fn.tabla_susceptibilidad_FF_AceroAlCarbono = function (curva, mys) {

            var dataString = "";
            var resultado = 0;

            curva = 'curva' + curva;

            dataString = 'GetDataTables=tabla_susceptibilidad_FF_AceroAlCarbono&curva=' + curva + '&mys=' + mys + '&OK';

            $.ajax({
                type: "POST",
                url: "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    // alert(html);
                    //  $("#SalidaX").append("<br> DataString" + dataString + "<BR> HTML  " + html);
                    //  $("#" + txt).val(parseFloat(html));
                    Salida += '<p> Resultados  </p>' +
                        ' <br> Tabla => tabla_susceptibilidad_FF_AceroAlCarbono ' +
                        ' <br> Resultado => ' + html +
                        ' <br> Curso => ' + curva +
                        ' <br> mys => ' + mys;

                    resultado = parseFloat(html);
                }
            });


            return resultado;
        };

        $.fn.tabla_susceptibilidad_FF_AceroBajaAleacion = function (curva, mys) {

            var dataString = "";
            var resultado = 0;

            curva = 'curva' + curva;

            dataString = 'GetDataTables=tabla_susceptibilidad_FF_AceroBajaAleacion&curva=' + curva + '&mys=' + mys + '&OK';

            $.ajax({
                type: "POST",
                url: "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    resultado = parseFloat(html);
                }
            });


            return resultado;
        };



        $.fn.tabla_susceptibilidad_FF_Brittle_Fracture_Sin_PWTH = function (espesor, cet) {

            var dataString = "";
            var resultado = 0;

            dataString = 'GetDataTables=tabla_susceptibilidad_FF_Brittle_Fracture_Sin_PWTH&espesor=' + espesor + '&cet=' + cet + '&OK';

            $.ajax({
                type: "POST",
                url: "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    resultado = parseFloat(html);
                }
            });

            return resultado;
        };

        $.fn.tabla_susceptibilidad_FF_Brittle_Fracture_Con_PWTH = function (espesor, cet) {

            var dataString = "";
            var resultado = 0;

            dataString = 'GetDataTables=tabla_susceptibilidad_FF_Brittle_Fracture_Con_PWTH&espesor=' + espesor + '&cet=' + cet + '&OK';

            $.ajax({
                type: "POST",
                url: "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    resultado = parseFloat(html);
                }
            });


            return resultado;
        };


        $.fn.tabla_API581_3raEd_No_4_7_ThinningDamage = function (efectividad, art) {

            var dataString = "";
            var resultado = 0;

            dataString = 'GetInfoTables=tabla_API581_3raEd_No_4_7_ThinningDamage&efectividad=' + efectividad + '&art=' + art + '&OK';
            //  alert(dataString);

            $.ajax({
                type: "POST",
                url: "Clase_Informacion_Tablas.php", // "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    resultado = parseFloat(html);
                }
            });


            return resultado;
        };




        //Adelgazamiento 

        $.fn.tabla_prth_dano_externo_ferritico = function (prth, medida, txt) {

            if (prth == "" || medida == "") {
                $("#" + txt).val("");
                return false;
            }

            var dataString = "";
            var resultado = 0;

            dataString = 'GetInfoTables=tabla_prth_dano_externo_ferritico&prth=' + prth + '&medida=' + medida + '&OK';

            $("#" + txt).val("");
            //$("#SalidaX").html(dataString);

            $.ajax({
                type: "POST",
                url: "Clase_Informacion_Tablas.php", // "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    // alert(html);
                    //$("#SalidaX").append("<br> DataString" + dataString + "<BR> HTML  " + html);
                    // $("#" + txt).val(parseFloat(html));
                    resultado = parseFloat(html);
                    // console.log("prth : " + resultado + " , medida: " + medida + ' HTML ' + html);

                }
            });

            return resultado;
        };


        $.fn.tabla_coth_dano_externo_ferritico = function (coth, medida, txt) {

            if (coth == "" || medida == "") {
                $("#" + txt).val("");
                return false;
            }

            var dataString = "";
            var resultado = 0;

            dataString = 'SAVE_Operation=tabla_coth_dano_externo_ferritico&coth=' + coth + '&medida=' + medida + '&OK';

            $("#" + txt).val("");
            //$("#SalidaX").html(dataString);

            $.ajax({
                type: "POST",
                url: "SaveData.php",
                data: dataString,
                cache: false,
                async: false,
                success: function (html) {
                    alert(html);
                    //$("#SalidaX").append("<br> DataString" + dataString + "<BR> HTML  " + html);
                    //$("#" + txt).val(parseFloat(html));
                    resultado = parseFloat(html);
                    // console.log("coth : " + resultado + " , medida: " + medida + ' HTML ' + html);

                }
            });
            return resultado;
        };

        $.fn.normalcdf = function (mean, sigma, to) {
            var z = (to - mean) / Math.sqrt(2 * sigma * sigma);

            var t = 1 / (1 + 0.3275911 * Math.abs(z));
            var a1 = 0.254829592;
            var a2 = -0.284496736;
            var a3 = 1.421413741;
            var a4 = -1.453152027;
            var a5 = 1.061405429;
            var erf = 1 - (((((a5 * t + a4) * t) + a3) * t + a2) * t + a1) * t * Math.exp(-z * z);
            var sign = 1;

            if (z < 0) {
                sign = -1;
            }

            return (1 / 2) * (1 + sign * erf);
        };

        function normalcdf(X) { //HASTINGS.  MAX ERROR = .000001

            var T = 1 / (1 + .2316419 * Math.abs(X));
            var D = .3989423 * Math.exp(-X * X / 2);
            var Prob = D * T * (.3193815 + T * (-.3565638 + T * (1.781478 + T * (-1.821256 + T * 1.330274))));
            if (X > 0) {
                Prob = 1 - Prob
            }
            return Prob
        }

        $.fn.compute = function (Valor) {
            var Z = Valor; //eval(form.argument.value)
            var M = 0; //eval(form.mean.value)
            var SD = 1; //eval(form.stdev.value)
            var Prob = 0;

            with (Math) {
                if (SD < 0) {
                    alert("The standard deviation must be nonnegative.")
                } else if (SD == 0) {
                    if (Z < M) {
                        Prob = 0;
                    } else {
                        Prob = 1;
                    }
                } else {
                    Prob = normalcdf((Z - M) / SD);
                    //Prob = round(100000 * Prob) / 100000;
                }
            }
            // form.result.value = Prob;
            return Prob;
        }


    });