//Variables que guardan información necesaria para poder graficar.
var URLDATOS, URLFLUJOREF;
var FLUJO, ATRIBUTOS_SERIES, CODELIST_REF_AND_AGENCY, DATOS, DESCRIPCION_DATAFLOW;
//Función que fue llamada en la página index y la cual obtiene como parametro la url en la cual haremos clic.
function sdmx(urldatos)
{
    //Se guarda el objeto json en una variable temporal por si surgieran cambios en la original o con la que se trabajará
    this.URLDATOS=urldatos;
    //Se separa la url en partes(guardandose en un arreglo) através de un separador "/"
    var url2=urldatos.split("/");
    //Obtenemos la posición 8 que es la posición donde estara el nombre del flujo del cual obtendremos datos.
    this.FLUJO=url2[7];
    // Colocamos el nombre del flujo en la posicion llamada FLUJO dentro de la url y se guarda dentro de una variable que usaremos mas adelante en el código.
    this.URLFLUJOREF='http://www.sdmx.snieg.mx/sistemas/sdmx/restsdmx/Dataflow/ALL/'+FLUJO+'/ALL?references=shallow&alt=json&callback=getflujoref'
    //Instanciamos la clase de la librería jsr_class con la url como parámetro.
    bObj = new JSONscriptRequest(urldatos); 
    // Construimos una etiqueta tipo script dinamicamente
    bObj.buildScriptTag(); 
    // Agregar la etiqueta tipo script a la página
    bObj.addScriptTag();
}

//Función que fue llamada al momento de insertar la etiqueta tipo script através de una función callback, esto es que al momento de la inserción del script se hace el llamado a la función getdatos que fue colocada como parametro en la url de nuestra interfaz de la gráfica esto es: callback=getdatos
function getdatos(datos)
{
    //Variable que guarda la respuesta de la petición que trae nuestros datos en formato compacto SDMX y esta es la url correspondiente: http://www.sdmx.snieg.mx/sistemas/sdmx/restsdmx/Data/DF_SHORT_TERM_M/ALL?key=...C1161+C1162+C5002+C5003&startPeriod=2001-1&endPeriod=2006-1&format=compact&alt=json&callback=getdatos
    DATOS=datos;
    //Mandamos como parametro la variable datos a la función getatributos_serie.(Ir a la función)
    ATRIBUTOS_SERIES=getatributos_serie(datos);
    //Mandamos como parametro la variable datos a la función getatributos_observacion.(Ir a la función)
    ATRIBUTOS_OBSERVACION=getatributos_observacion(datos);
    //Removemos la información con datos SDMX por seguridad del script insertado.
    bObj.removeScriptTag();
    //Instaciamos la clase de la librería jsr_class pero ahora con la siguiente url:
    http://www.sdmx.snieg.mx/sistemas/sdmx/restsdmx/Dataflow/ALL/DF_SHORT_TERM_M/ALL?references=shallow&alt=json&callback=getflujoref
    bObj = new JSONscriptRequest(URLFLUJOREF); 
    bObj.buildScriptTag(); 
    bObj.addScriptTag();
}

//Función llamada con la función callback que fue llamada anteriormente de la misma forma que se explico.Y cuyo objeto contiene todas las referencias que un DSD puede tener, ya sea a Codelist, category schems, etc?.
function getflujoref(flujoref){
    //Función que obtiene las referencias a los Codelist correspondientes y sus agencias de las series.(Ir a getcodelist_ref_and_agency_series)
    CODELIST_REF_AND_AGENCY_SERIES=getcodelist_ref_and_agency_series(flujoref);
    //Función que obtiene las referencias a los codelist correspondientes y sus agencias de las observaciones.(Ir a getcodelist_ref_and_agency_observaciones)
    CODELIST_REF_AND_AGENCY_OBSERVACIONES=getcodelist_ref_and_agency_observaciones(flujoref);
    //Obtención del nombre del DSD del flujo al que se hizo referencia.
    var dsd=flujoref.RegistryInterface.QueryStructureResponse['registry:Dataflows']['structure:Dataflow']['structure:KeyFamilyRef']['structure:KeyFamilyID'];
    //Obtención del nombre completo del flujo al que se hizo referencia.
    DESCRIPCION_DATAFLOW=flujoref.RegistryInterface.QueryStructureResponse['registry:Dataflows']['structure:Dataflow']['structure:Name']['#text'];
    bObj.removeScriptTag();
    //Función que se manda a llamar dentro de otro script llamado descripciones.js(Ir a paso 11)
    sdmxdescrip(CODELIST_REF_AND_AGENCY_SERIES, dsd, DATOS, CODELIST_REF_AND_AGENCY_OBSERVACIONES, DESCRIPCION_DATAFLOW);
}
//Función que obtendrá como resultado el mismo objeto que se obtuvo en la función getatributos_serie(), pero agregando las referencias a sus respectivos Codelist y agencias de los conceptos respectivos.Esto es:
                                                        

function getcodelist_ref_and_agency_series(obj){
    //Función que obtiene las dimensiones de nuestro objeto con referencias
    var dimensiones=obj.RegistryInterface.QueryStructureResponse['registry:KeyFamilies']['structure:KeyFamily']['structure:Components']['structure:Dimension'];
    //Función que obtiene los atributos de nuestro objeto con referencias.
    var atributos=obj.RegistryInterface.QueryStructureResponse['registry:KeyFamilies']['structure:KeyFamily']['structure:Components']['structure:Attribute'];
    var info=[], temporal=[];
    var flagesnoesdimension=false, find=true;
    $.each(ATRIBUTOS_SERIES,function(h,r){
        $.each(r,function(q,n){
            var objnew={
                name:n.name,
                value:n.value,
                codelist:"",
                codelistagency:""
            } 
            if(flagesnoesdimension==false)
            {
                $.each(dimensiones,function(a,k){
                    if(n.name==k['@conceptRef'])
                    {
                        if(dimensiones.length-1==a)
                        {
                            flagesnoesdimension=true;
                            objnew.codelist=k['@codelist'];
                            objnew.codelistagency=k['@codelistAgency'];
                            info.push(objnew);
                            return false
                        }
                        else
                        {
                            objnew.codelist=k['@codelist'];
                            objnew.codelistagency=k['@codelistAgency'];
                            info.push(objnew);
                            return false
                        } 
                    }   
                    else
                        return ;
                }); 
            }
            else
            {
                $.each(atributos,function(f,b){ 
                    if(b['@conceptRef']==n.name)
                    {
                        objnew.codelist=b['@codelist'];
                        objnew.codelistagency=b['@codelistAgency'];
                        info.push(objnew);
                        return false;
                    }
                    else
                        return;
                });
            }
        });
        temporal.push(info);
        flagesnoesdimension=false
        info=[];
    });
    //Regresa el resultado del procesamiento de las variables dimensiones y atributos agregando sus referencias a Codelist.
    return temporal;
}

function getcodelist_ref_and_agency_observaciones(obj)
{
    var temp=[];
    /*Se guardan los atributos de la estructura del DSD del flujo a consultar*/
    var atributos=obj.RegistryInterface.QueryStructureResponse['registry:KeyFamilies']['structure:KeyFamily']['structure:Components']['structure:Attribute'];
    var arr=[],arrfinal=[];
    /*Se obtiene el mismo objeto con la misma estructura que se obtuvo en la funcion getatributos_observacion pero ahora obteniendo además las referencias a sus Codelist de cada observación, si la tiene.Esto es:*/
                                                        

    $.each(ATRIBUTOS_OBSERVACION,function(d,q){
        $.each(q,function(h,i){ 
            $.each(i,function(b,n){
                var obj9={
                    name:n.name,
                    value:n.value,
                    codelist:undefined,
                    codelistagency:undefined
                }
                $.each(atributos,function(b,y){
                    if(y['@conceptRef']==n.name)
                    {
                        obj9.codelist=y['@codelist'];
                        obj9.codelistagency=y['@codelistAgency']; 
                        return false; 
                    }
                    else
                        return
                });
                temp.push(obj9)
            });
            arr.push(temp);
            temp=[];
        });
        arrfinal.push(arr);
        arr=[];
    });
    return arrfinal;
}
//Función que regresará un objeto con una estructura tipo xml, obteniendo el número de series y sus respectivos atributos a nivel de serie,esto es:
                                                        

/*y la estructura original en xml de la consulta dada originalmente(http://www.sdmx.snieg.mx/sistemas/sdmx/
restsdmx/Data/DF_SHORT_TERM/ALL?key=...C1161+C1162+C5002+C5003&startPeriod=2001-1&endPeriod=2006-1&format=
compact&alt=json&callback=getdatos) para traer datos en formato compacto es:*/
                                                        

function getatributos_serie (obj)
{
    //Preguntar si el tamaño de las series es mayor a 1
    if(obj.CompactData['nsi:DataSet']['nsi:Series'].length>1)
    {
        //crear variables que se usarán dentro de la función
        var arr=[];
        var newarr=[];
        var arrfinal=[];
        //Asignación del número o grupo de series de la consulta de datos compacto
        var atrib=obj.CompactData['nsi:DataSet']['nsi:Series'];
        //Función para obtener los atributos de cada serie, puesto que no varían.Esto es:
                                                        

        $.each(atrib[0],function(h){
            if('nsi:Obs'!=h)
                arr.push(h);
            else
                return;
        });
        
        //Función que optimiza el arreglo anterior quitandoles el signo de "@" arroba.
        $.each(arr,function(j){
            var temp= arr[j].split("@");
            $.each(temp,function(l){
                if(temp[l]=="")
                    return;
                else
                    newarr.push(temp[l])
            });
        })
        //Función que determina la estructura tipo xml en un objeto de datos y se regresa el resultado final.Esto es:
                                                        

        var temp=[];
        $.each(atrib,function(d,e){
            $.each(newarr,function(m){
                var obj3={
                    name:newarr[m],
                    value:e['@'+newarr[m]]
                }
                temp.push(obj3);
            });
            arrfinal.push(temp);
            temp=[];
        });
        //Se regresa el objeto de la figura anterior.
        return arrfinal;
        }
        //Este condicional(else{código}) indica que solo existe una serie y se hará todo el procesamiento anterior pero para una sola serie.
        else
        {
            var arr=[];
            var newarr=[];
            var arrfinal=[];
            var atrib=obj.CompactData['nsi:DataSet']['nsi:Series'];
            $.each(atrib,function(h){
                if('nsi:Obs'!=h)
                    arr.push(h);
                else
                    return; 
            });
            $.each(arr,function(j){
                var temp= arr[j].split("@");
                $.each(temp,function(l){
                    if(temp[l]=="")
                        return;
                    else
                        newarr.push(temp[l])
                });
            })
            var temp=[];
            $.each(newarr,function(m){
                var obj3={
                    name:newarr[m],
                    value:atrib['@'+newarr[m]]
                }
                temp.push(obj3);
            });
            arrfinal.push(temp);
            return arrfinal;
        }
    }
    //Función que obtendrá los atributos a nivel de observación del número de series obtenidas en la consulta REST de datos compactos en formato SDMX como tipo xml.Esto es:

                                                        

    /*y el xml es:*/
                                                        

    $.each(atrib[0]['nsi:Obs'][0],function(h){
        arr.push(h); 
    });
    /*Función para elimiar el caracter ?@?*/
    $.each(arr,function(j){
        var temp= arr[j].split("@");
        $.each(temp,function(l){
            if(temp[l]=="")
                return;
            else
                newarr.push(temp[l])
        });
    })
    /*Conjunto de funciones que regresarán el objeto con el formato de número de series y dentro de cada serie el número de observaciones y a su vez el número y cuales observaciones son.Esto es:*/
                                                        

function getatributos_observacion(obj)
{
    /*Inicialización de las variables a utilizar dentro de la función*/
    var arr=[];
    var newarr=[];
    var arrfinal=[];
    var arrobs=[];
    var temp=[];
    /*Verificar si la cantidad de series es mayor a 1*/
    if(obj.CompactData['nsi:DataSet']['nsi:Series'].length>1)
    {
        /*Se asigna el objeto json de las series a una variable*/
        var atrib=obj.CompactData['nsi:DataSet']['nsi:Series'];
        /*Se obtienen el nombre de las observaciones que consta en cada serie de tiempo.Para este ejemplo son:*/
                                                        

        $.each(atrib,function(d,e){
            $.each(e["nsi:Obs"],function(g){
                $.each(newarr,function(m){
                    if(newarr[m]=='TIME_PERIOD'||newarr[m]=='TIME'||newarr[m]=='OBS_VALUE'||newarr[m]=='OBS')
                    {
                        if(newarr[m]=='OBS_VALUE'||newarr[m]=='OBS')
                        {
                            var obj3={
                                name:newarr[m],
                                value:e['nsi:Obs'][g]['@'+newarr[m]]
                            }
                            temp.push(obj3); 
                        }
                        else
                        {
                            var obj3={
                                name:newarr[m],
                                value:""
                            }
                            temp.push(obj3); 
                        }
                    } 
                    else
                    {
                        var obj6={
                            name:newarr[m],
                            value:e['nsi:Obs'][g]['@'+newarr[m]]
                        }
                        temp.push(obj6);
                    }
                });
                arrobs.push(temp);
                temp=[];
            });
            arrfinal.push(arrobs);
            arrobs=[];
        });
        return arrfinal;
    }
    /*Condicional para validar las series con cantidad a 1 */
    else
    {
        /*Valida si la cantidad de observaciones es mayor a 1 y si lo es realiza todo el proceso anterior para obtener el mismo objeto*/
        if(obj.CompactData['nsi:DataSet']['nsi:Series']['nsi:Obs'].length>1)
        {
            var atrib=obj.CompactData['nsi:DataSet']['nsi:Series']['nsi:Obs'][0];
            $.each(atrib,function(h){
                arr.push(h);
            });
            $.each(arr,function(j){
                var temp= arr[j].split("@");
                $.each(temp,function(l){
                    if(temp[l]=="")
                        return;
                    else
                        newarr.push(temp[l])
                });
            })
            var temp=[];
            var atrib_obs=obj.CompactData['nsi:DataSet']['nsi:Series']['nsi:Obs']
            $.each(atrib_obs,function(g,e){
                $.each(newarr,function(m){
                    if(newarr[m]=='TIME_PERIOD'||newarr[m]=='TIME'||newarr[m]=='OBS_VALUE'||newarr[m]=='OBS')
                    {
                        if(newarr[m]=='OBS_VALUE'||newarr[m]=='OBS')
                        {
                            var obj3={
                                name:newarr[m],
                                value:e['@'+newarr[m]]
                            }
                            temp.push(obj3); 
                        }
                        else
                        {
                            var obj3={
                                name:newarr[m],
                                value:""
                            }
                            temp.push(obj3); 
                        }
                    } 
                    else
                    {
                        var obj6={
                            name:newarr[m],
                            value:e['@'+newarr[m]]
                        }
                        temp.push(obj6);
                    }
                });
                arrobs.push(temp);
                temp=[];
            });
            arrfinal.push(arrobs);
            return arrfinal;
        }
        /*Se valida la condicional de que es menor a 1, la cantidad de observaciones y se realiza el mismo proceso para obtener el objeto necesario*/
        else
        {
            var atrib=obj.CompactData['nsi:DataSet']['nsi:Series']['nsi:Obs'];
            $.each(atrib,function(h){
                arr.push(h);
            });
            $.each(arr,function(j){
                var temp= arr[j].split("@");
                $.each(temp,function(l){
                    if(temp[l]=="")
                        return;
                    else
                        newarr.push(temp[l])
                });
            })
            var temp=[];
            $.each(newarr,function(m){
                if(newarr[m]=='TIME_PERIOD'||newarr[m]=='TIME'||newarr[m]=='OBS_VALUE'||newarr[m]=='OBS')
                {
                    var obj3={
                        name:newarr[m],
                        value:""
                    }
                    temp.push(obj3); 
                }
                else
                {
                    var obj3={
                        name:newarr[m],
                        value:atrib['@'+newarr[m]]
                    }
                    temp.push(obj3);
                }
            });
            arrfinal.push(temp);
            return arrfinal;
        }
    }
                                                        

//Variables que servirán durante este script, ya sea para guadar los datos temporalmente si hay cambios dentro de la variable o tener globalmente para nuestro uso.
var OBJ, ATRIBUTOSCONDESCRIPCION, SERIESDATOS, ATRIBUTOSNIVELOBS;
//Función que fue llamada desde el script core_highstock.js y la cual trae como parámetros los atributos de las series con su respectiva referencia a sus Codelist y su agencia, el nombre del DSD al que se hizo referencia al flujo que consultamos, el objeto que contiene los datos de la consulta que trae datos en formato compacto, los atributos de las observaciones con su referencia a sus Codelist y su agencia y el nombre completo del flujo.
function sdmxdescrip(dimen_atrib_codelistref, DSD, datos, atributosnivelobs, descripcion_flujo)
{
    //Hacemos un asignacion de variables para poderlas usar goblamente.
    FLUJONAME=descripcion_flujo;
    ATRIBUTOSNIVELOBS=atributosnivelobs;
    SERIESDATOS=datos;
    OBJ=dimen_atrib_codelistref;
    //Guardamos la url que hace como petición una consulta de estructuras a un DSD y haciendo referencias al mismo.
    var url= 'http://www.sdmx.snieg.mx/sistemas/sdmx/restsdmx/DataStructure/ALL/'+DSD+'/ALL?references=shallow&alt=json&callback=getdescripciones';
    //Instanciamos la librería con la url para hacer la inserción de la etiqueta script y hacer el callback.
    bObj = new JSONscriptRequest(url); 
    bObj.buildScriptTag(); 
    bObj.addScriptTag();
}

//Función que fue llamada a través del callback y recibe como parámetro el objeto json de la estructura de un DSD con referencias.
function getdescripciones(objc)
{
    OBJC=objc;
    var temp=[],arrfinal=[];
    $.each(OBJ,function(b,k){
        $.each(k,function(j,u){
            if(u.codelist!=undefined)
            {
                var obj={
                name:u.name,
                //La función getdescripcion_codelist se le mandan como parámetros del objeto de atributos de serie visto con anterioridad, el nombre del Codelist, agencia y valor del código al que hacen referencia.Esto es:
                                                        

//Variables que servirán durante este script, ya sea para guadar los datos temporalmente si hay cambios dentro de la variable o tener globalmente para nuestro uso.
var OBJ, ATRIBUTOSCONDESCRIPCION, SERIESDATOS, ATRIBUTOSNIVELOBS;
//Función que fue llamada desde el script core_highstock.js y la cual trae como parámetros los atributos de las series con su respectiva referencia a sus Codelist y su agencia, el nombre del DSD al que se hizo referencia al flujo que consultamos, el objeto que contiene los datos de la consulta que trae datos en formato compacto, los atributos de las observaciones con su referencia a sus Codelist y su agencia y el nombre completo del flujo.

function sdmxdescrip(dimen_atrib_codelistref, DSD, datos, atributosnivelobs, descripcion_flujo)
{
    //Hacemos un asignacion de variables para poderlas usar goblamente.
    FLUJONAME=descripcion_flujo;
    ATRIBUTOSNIVELOBS=atributosnivelobs;
    SERIESDATOS=datos;
    OBJ=dimen_atrib_codelistref;
    //Guardamos la url que hace como petición una consulta de estructuras a un DSD y haciendo referencias al mismo.
    var url= 'http://www.sdmx.snieg.mx/sistemas/sdmx/restsdmx/DataStructure/ALL/'+DSD+'/ALL?references=shallow&alt=json&callback=getdescripciones';
    //Instanciamos la librería con la url para hacer la inserción de la etiqueta script y hacer el callback.
    bObj = new JSONscriptRequest(url); 
    bObj.buildScriptTag(); 
    bObj.addScriptTag();
}

//Función que fue llamada a través del callback y recibe como parámetro el objeto json de la estructura de un DSD con referencias.
function getdescripciones(objc)
{
    OBJC=objc;
    var temp=[],arrfinal=[];
    $.each(OBJ,function(b,k){
        $.each(k,function(j,u){
            if(u.codelist!=undefined)
            {
                var obj={
                    name:u.name,
                    //La función getdescripcion_codelist se le mandan como parámetros del objeto de atributos de serie visto con anterioridad, el nombre del Codelist,agencia y valor del código al que hacen referencia.Esto es:
                                                        

                    var temp2=[],arrfinal2=[];
                    $.each(ATRIBUTOSNIVELOBS,function(b,k){
                        $.each(k,function(j,u){
                            if(u.codelist!=undefined)
                            {
                                var obj={
                                    name:u.name,
                                    value:getdescripcion_codelist(u.codelist,u.codelistagency,u.value)
                                }
                                temp2.push(obj);
                            }
                            else
                            {
                                var obj={
                                    name:u.name,
                                    value:u.value
                                } 
                                temp2.push(obj);
                            }
                        });
                        arrfinal2.push(temp2);
                        temp2=[];
                    });
                    bObj.removeScriptTag();
                    //Función que se dirige al script graficar para empezar a construir la gráfica con los datos obtenidos.Y manda como parametros los objetos de serie y observación así como el objeto de datos en formato compacto y el nombre del flujo completo.
                    graficarhighstock(arrfinal,SERIESDATOS,arrfinal2,FLUJONAME);
                }

//Función que devuelve un valor de texto el cual corresponde a la descripción del código que tenia nuestro objeto de atributos de serie.
function getdescripcion_codelist(namecodelist,agencycodelist,valor){
    var descripcion,find=false;
    var codelist=OBJC.RegistryInterface.QueryStructureResponse['registry:CodeLists']['structure:CodeList'];
    $.each(codelist,function(v,t){
        if(t['@id']==namecodelist&&t['@agencyID']==agencycodelist&&find==false)
        {
            if(t['structure:Code'].length>1&&find==false)
            {
                $.each(t['structure:Code'],function(j,k){
                    if(k['@value']==valor)
                    {
                        if(k['structure:Description'].length>1)
                        {
                            $.each(k['structure:Description'],function(e,m){
                                if(m['@xml:lang']!='fr')
                                {
                                    descripcion=m['#text'];
                                    find=true;
                                    return false
                                }
                                else
                                    return;
                            });
                        }
                        else
                        {
                            descripcion=k['structure:Description']['#text'];
                            find=true;
                            return false 
                        }
                    }
                    else
                        return
                });
            }
            else
                t['structure:Code']; 
        }
        else
        {
            if(find==true)
            {
                return false;
            }
            else
                return;
        }
    });
return descripcion
}
                                                        

//Función que se mando llamar desde el script descripciones.js y recibe como parámetros el objeto que contiene las series ya con la descripción de cada concepto de los atributos de series, el objeto que contiene los datos en formato compacto, el objeto que contiene los atributos de las observaciones y el nombre completo del flujo que se consulto.
function graficarhighstock(arr, datos, atributosobs, nameflujo){
    //Función que regresa el objeto con una estructura correcta que lea la librería de la gráfica sin problema.Y manda como parametros, los datos en formato compacto, el objeto con los atributos de las series y los atributos a nivel de observación.
    NAMES=getdatoscondescripcion(datos,arr,atributosobs);
    //Se crean variables que se usarán para graficar.
    var seriesOptions=[],
    yAxisOptions = [], 
    colors = Highcharts.getOptions().colors;
    seriesOptions=NAMES;
    $.each(seriesOptions, function(u) { 
        //Se crea un eje y por cada serie ordenada y además se especifica las características de la gráfica, esto es el color el tamaño, donde empezará a graficar,etc.
        yAxisOptions[u] = {
            alternateGridColor: null,
            gridLineWidth: u ? 0 : 1, 
            opposite: u ? true : false,
            minorGridLineWidth: 0,
            //Se añade color a las líneas de la gráfica
            title: { 
                text: null, 
                style: {
                    color: colors[u]
                }
            },
            //Se crea el apuntador o barra que cuando se desplaze mostrará los valores necesarios.
            cursor:'pointer',
            lineWidth: 2,
            lineColor: colors[u]
            lineWidth: 2,
            lineColor: colors[u]
        }; 
    });
    //Se instancia la clase de la librería para poder graficar. Y se especifican las características de toda la gráfica.
    chart = new Highcharts.StockChart({
        chart: {
            renderTo: 'container',
            events: {
                load: function(event) {
                    alert ('Visualización cargada');
                    /*Se evita que la ventana emergente se quede abierta y se muestre como debe ser*/
                    hs.loading.style.left = '-9999px';
                }
            },
            alignTicks: false
        }, 
        rangeSelector: {
            selected: 'All'
        }, 
        title: {
            text: nameflujo
        }, 
        xAxis: {
            type: 'datetime',
            maxZoom: 14 * 24 * 3600000, 
            title: {
                text: null
            }
        },
        yAxis: yAxisOptions,
        /*Configuración para agregar la funcionalidad de ventana emergente cuando se realiza un clic en algun apuntador del cursor, esto es, algun icono de la series*/
        plotOptions: {
            series: {
                cursor: 'pointer',
                point: {
                    events: {
                        click: function() {
                            hs.htmlExpand(null, {
                                pageOrigin: {
                                    x: this.pageX, 
                                    y: this.pageY
                                },
                                headingText: this.series.name,
                                maincontentText:Highcharts.dateFormat(' %b %e, %Y', this.x)+'
'+"ATRIBUTOS A NIVEL DE OBSERVACIÓN"+'
'+this.options.name2 +'
 ',
                                width: 400
                            });
                        }
                    }
                },
                marker: {
                    lineWidth: 1
                }
            }
        }, 
        series: seriesOptions 
    },

//Función que especifica la creación de la tabla de los metadatos.
function(chart){
    $(chart.series).each(function(i, serie){
        if(seriesOptions.length!=i)
        { 
            var tbl = "<table>";
            tbl += thead2(arr);
            tbl += tbody2(arr,i);
            tbl += "</table>";
            //En esta parte se agrega color a cada renglón de la tabla que construimos y además se relacion con una función click que interactua con la librería de la gráfica para poder aparecer o desaparecer la variedad de líneas que se veran en la gráfica.
            $('<li style="color: '+serie.color+';width:100px;font-size:5px; ">'+tbl+'</li>').click(function(){
            serie.visible ? serie.hide() : serie.show();
            //Este es el contenedor donde se coloca la tabla completa y se hace llamar en el index.html a través de un div con id test.
        }).appendTo('#test') 
    }
    else
        return false;
    });
    }
);
}
//Función que regresa el objeto necesario con la estructura necesaria que requiere la librería para poder graficar adecuadamente, ya con los datos en formato compacto dentro. Esto es:
                                                        

function getdatoscondescripcion(obj,atributos_series,atributosobs){
    var frecuencia;
    var tam=atributos_series[0];
    /*Obtenemos la frecuencia con la que esta el flujo*/
    $.each(tam,function(p){
        if(tam[p].name=='FREQ')
        {
            frecuencia=tam[p].value;
            return false
        }
        else
            return;
    });
    var tamanio=obj.CompactData['nsi:DataSet']['nsi:Series'].length;
    if(tamanio>1)
    {
        var arr = []; 
        $.each( atributosobs, function(ii,rr) {
            var objg = {
                data: [],
                yAxis:ii
            };
            /*Condicionales para la variable frecuencia y así estructurar el objeto que regresaremos de acuerdo a cada periodo de frencuencia obtenido(mensual,trimestral,anual).Durante cada condicional de frecuencia, se hace el mismo proceso variando solo en validar la frecuencia trimestral y annual.Dentro del código se observa mejor la diferencia*/
            if(frecuencia=='Monthly')
            {
                $.each(rr,function(zz,cc){
                    var timeperiod="";
                    $.each(cc,function(dd,tt){ 
                        if(tt.name=='TIME_PERIOD'||tt.name=='TIME')
                            timeperiod=tt.name
                        if(tt.name=='OBS_VALUE'||tt.name=='OBS')
                        {
                            var dia='01-';
                            dia+=obj.CompactData['nsi:DataSet']['nsi:Series'][ii]['nsi:Obs'][zz]["@"+timeperiod];
                            var date = dia.split('-');
                            /*Transformación de la fecha del parametro TIME_PERIOD a un formato UTC que la librería interpretara para asignar una fecha válida*/
                            var x = Date.UTC(date[1], date[2]-1,date[0])
                            objg.data.push({
                                /*La función getobs_grafica regresa como resultado los string correspondientes a las observaciones ya con su descripción de Codelist obtenido, con el formato correspondiente para que se muestre en la gráfica */
                                name: name:'OBS_VALUE',
                                x:x,
                                y:parseFloat(tt.value),
                                /*Función que obtiene las observaciones individuales y mostrarlas en la ventana emergente que se implementó*/
                                name2:getobs_grafica(cc)
                            });
                        }
                        else
                            return
                    }); 
                }); 
            }
            if(frecuencia=='Quarterly')
            {
                $.each(rr,function(zz,cc){
                var timeperiod="";
                $.each(cc,function(dd,tt){ 
                    if(tt.name=='TIME_PERIOD'||tt.name=='TIME')
                        timeperiod=tt.name
                    if(tt.name=='OBS_VALUE'||tt.name=='OBS')
                    {
                        var dia='01-';
                        dia+=obj.CompactData['nsi:DataSet']['nsi:Series'][ii]['nsi:Obs'][zz]["@"+timeperiod];
                        var date = dia.split('-');
                        switch(date[2])
                        {
                            case 'Q1':
                                date[2]='03';
                                break;
                            case 'Q2':
                                date[2]='06';
                                break;
                            case 'Q3':
                                date[2]='09';
                                break;
                            case 'Q4':
                                date[2]='12';
                                break;
                        }
                        var x = Date.UTC(date[1], date[2]-1,date[0])
                        objg.data.push({
                            name:'OBS_VALUE',
                            x:x,
                            y:parseFloat(tt.value),
                            name2:getobs_grafica(cc)
                        });
                    }
                    else
                        return 
                }); 
            }); 
        }
        if(frecuencia=='Annual'||frecuencia=='Two-year average'||frecuencia=='Undeterminated')
        {
            $.each(rr,function(zz,cc){
                var timeperiod="";
                $.each(cc,function(dd,tt){ 
                    if(tt.name=='TIME_PERIOD'||tt.name=='TIME')
                        timeperiod=tt.name
                    if(tt.name=='OBS_VALUE'||tt.name=='OBS')
                    {
                        var dia='01-';
                        dia+='12-'
                        dia+=obj.CompactData['nsi:DataSet']['nsi:Series'][ii]['nsi:Obs'][zz]["@"+timeperiod];
                        var date = dia.split('-');
                        var x = Date.UTC(date[2], date[1]-1,date[0])
                        objg.data.push({
                            name:'OBS_VALUE',
                            x:x,
                            y:parseFloat(tt.value),
                            name2:getobs_grafica(cc)
                        });
                    }
                    else
                    return
                }); 
            }); 
        }
        arr.push(objg);
        });
        return arr;
    }
    /*En esta condicional validamos si fue solo una serie y hacemos el mismo proceso tomando en cuenta que solo existe una serie*/
    else
    {
        var arr2 = []; 
        $.each( atributosobs, function(ii,rr) {
            var objg = {
                data: [],
                yAxis:ii
            };
            if(frecuencia=='Monthly')
            {
                $.each(rr,function(zz,cc){
                    var timeperiod="";
                    $.each(cc,function(dd,tt){ 
                        if(tt.name=='TIME_PERIOD'||tt.name=='TIME')
                            timeperiod=tt.name
                        if(tt.name=='OBS_VALUE'||tt.name=='OBS')
                        {
                            var dia='01-';
                            dia+=obj.CompactData['nsi:DataSet']['nsi:Series']['nsi:Obs'][zz]["@"+timeperiod];
                            var date = dia.split('-');
                            var x = Date.UTC(date[1], date[2]-1,date[0])
                            objg.data.push({
                                name:'OBS_VALUE',
                                x:x,
                                y:parseFloat(tt.value),
                                name2:getobs_grafica(cc) 
                            });
                        }
                        else
                            return
                    }); 
                }); 
                arr2.push(objg);
            }
            if(frecuencia=='Quarterly')
            {
                $.each(rr,function(zz,cc){
                    var timeperiod="";
                    $.each(cc,function(dd,tt){ 
                        if(tt.name=='TIME_PERIOD'||tt.name=='TIME')
                            timeperiod=tt.name
                        if(tt.name=='OBS_VALUE'||tt.name=='OBS')
                        {
                            var dia='01-';
                            dia+=obj.CompactData['nsi:DataSet']['nsi:Series']['nsi:Obs'][zz]["@"+timeperiod];
                            var date = dia.split('-');
                            switch(date[2])
                            {
                                case 'Q1':
                                    date[2]='03';
                                    break;
                                case 'Q2':
                                    date[2]='06';
                                    break;
                                case 'Q3':
                                    date[2]='09';
                                    break;
                                case 'Q4':
                                    date[2]='12';
                                    break;
                            }
                            var x = Date.UTC(date[1], date[2]-1,date[0])
                            objg.data.push({
                                name:'OBS_VALUE',
                                x:x,
                                y:parseFloat(tt.value),
                                name2:getobs_grafica(cc)
                            });
                        }
                        else
                            return
                    }); 
                }); 
                arr2.push(objg);
            }
            if(frecuencia=='Annual'||frecuencia=='Two-year average'||frecuencia=='Undeterminated')
            {
                $.each(rr,function(zz,cc){
                    var timeperiod="";
                    $.each(cc,function(dd,tt){ 
                        if(tt.name=='TIME_PERIOD'||tt.name=='TIME')
                            timeperiod=tt.name
                        if(tt.name=='OBS_VALUE'||tt.name=='OBS')
                        {
                            var dia='01-';
                            var dia+='12-'
                            dia+=obj.CompactData['nsi:DataSet']['nsi:Series']['nsi:Obs'][zz]["@"+timeperiod];
                            var date = dia.split('-');
                            var x = Date.UTC(date[2], date[1]-1,date[0])
                            objg.data.push({
                                name:'OBS_VALUE',
                                x:x,
                                y:parseFloat(tt.value),
                                name2:getobs_grafica(cc) });
                            }
                            else
                                return
                    }); 
                });
                arr2.push(objg);
            }
        });
        return arr2;
    }
}

function thead2(obj ) {
    //var thead = "<thead><tr>"; // empty cell in header
    var thead = "<thead><tr><td></td>";
    var headers=[];
    $.each(obj,function(j,t){
        if(j==0)
        {
            $.each(t,function(h){
                headers.push(t[h].name);
            });
        }
        else
            return false;
    });
    $.each(headers,function(i) {
        thead += "<td>" + headers[i] + "</td>";
    }
    );
    thead += "</tr></thead>";
    return thead;
}

function tbody2(obj,numserie){
    var tbody = "<tbody>";
    $.each(obj,function(k,s){
        if(numserie==k)
        {
            tbody += "<tr BGCOLOR="+"#CCEEFF"+">";
            tbody +="<td >"+"Serie"+k+"</td>";
            $.each(s,function(j){
                tbody += "<td >"+s[j].value+"</td>";
            });
            tbody += "</tr>";
            return false
        }
        else
            return;
    });
    tbody += "</tbody>";
    return tbody;
}

/*Función que regresa un string para colocar en la gráfica como observaciones.Esto es: "OBS_STATUS:Normal;OBS_VALUE"*/
function getobs_grafica(objss){
    var obs="";
    var obs_value="";
    $.each(objss,function(a,xxx){
        if(xxx.name=='OBS_VALUE'||xxx.name=='OBS')
            var lo;
            if(a>=2) 
                obs+=xxx.name+":"+xxx.value+"<br>"; 
    });
    obs+=obs_value;
    return obs;
}