var PanelIzquierdo=1;
var claseboton=null;

function Readsesion() {
        //aqui tambien se leera el username y el password con subcookies, ver YUI
        var leftpaneltempo= YAHOO.util.Cookie.get("siesacookie");         
        if (leftpaneltempo != null) {PanelIzquierdo=leftpaneltempo;}        
}        
                        
//Funcion para añadir controles
function AdicionaControl(topboton,Posconstant,desY,desX,Elemento) {
         var posicion = document.getElementById(Elemento);
         if (topboton==1) {posicion.style.top = desY+"px";}
         if (topboton==2) {posicion.style.bottom = desY+"px";}
         if (Posconstant==1) {posicion.style.left = desX+"px";}
         if (Posconstant==2) {posicion.style.right = desX+"px";}
}

(function() {
    var Dom = YAHOO.util.Dom,
        Event = YAHOO.util.Event;
        var initTopMenu = function() {
                var oMenuBar = new YAHOO.widget.MenuBar("productsandservices", { 
                                                            autosubmenudisplay: true,
							    hidedelay: 750, 
							    submenuhidedelay: 750,
                                                            lazyload: true,
                                                            shadow: false,
							    iframe: true,
							    minscrollheight: 150,
							    keepopen:true
				                        });
                
                var aSubmenuData = [
                
                    {
                        id: "Suelos", 
                        itemdata: [ 
                            [{ text: "Perfiles de Suelos", url: "http://alerts.yahoo.com" }],
                            [{ text: "Clases de Suelos FAO-UNESCO, 1974", url: "javascript:Login();void(0);" },
                             { text: "Clases de Suelos USDA Soil Taxonomy, 1987", url: "javascript:Login();void(0);" },
                             { text: "Clases de Suelos FAO WRB, 1998", url: "javascript:Login();void(0);" }]
                        ]
                    },

                    {
                        id: "Relieve", 
                        itemdata: [
                            [{ text: "Elevación", url: "http://auctions.shopping.yahoo.com" },
                            { text: "Pendiente", url: "http://autos.yahoo.com" },
                            { text: "Aspecto", url: "http://classifieds.yahoo.com" },
                            { text: "Curvatura", 
                                submenu: { 
                                            id: "curvas", 
                                            itemdata: [
                                                { text: "Planta", url: "http://mail.yahoo.com" },
                                                { text: "Perfil", url: "http://addressbook.yahoo.com" },
                                                { text: "Longitudinal",  url: "http://calendar.yahoo.com" },
                                                { text: "Transversal",  url: "http://calendar.yahoo.com" },
						{ text: "Cóncava",  url: "http://calendar.yahoo.com" },
						{ text: "Convexa",  url: "http://calendar.yahoo.com" }
					    ] 
                                         }
			    }],
                            [{ text: "Indice de Humedad", url: "http://yp.yahoo.com" },
                            { text: "Potencia de la Escorrentía", url: "http://yp.yahoo.com" }],
                            [{ text: "Clases Morfométricas del Relieve", url: "http://yp.yahoo.com" }]
                        ]    
                    },
                    
                    {
                        id: "Parental", 
                        itemdata: [ 
                            [{ text: "Clases Litológicas del Mapa Geológico y Minero de Andalucía", url: "http://alerts.yahoo.com" },
	                    { text: "Clases Litológicas del Mapa de Suelos de Andalucía", url: "http://alerts.yahoo.com" }],
                            [{ text: "Clases de Edad Geológica", url: "http://alerts.yahoo.com" },
                            { text: "Clases Geomorfológicas", url: "http://alerts.yahoo.com" }]
                        ]
                    },

                                        
                    {
                        id: "coberturas",
                        itemdata: [
                             [{text: "Indice de Vegetación Mejorado (EVI)",
 				submenu:{
					  id: "evi",
					  itemdata: [
			    			{ text: "Período: 01/01 al 16/01", url: "http://downloads.yahoo.com" },
                            			{ text: "Período: 17/01 al 01/02", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 02/02 al 17/02", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 18/02 al 05/03", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 06/03 al 21/03", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 22/03 al 06/04", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 07/04 al 22/04", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 23/04 al 08/05", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 09/05 al 24/05", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 25/05 al 09/06", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 10/06 al 25/06", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 26/06 al 11/07", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 12/07 al 27/07", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 28/07 al 12/08", url: "http://downloads.yahoo.com" },
			   			{ text: "Período: 13/08 al 28/08", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 29/08 al 13/09", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 14/09 al 29/09", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 30/09 al 15/10", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 16/10 al 31/10", url: "http://downloads.yahoo.com" },
			   		 	{ text: "Período: 01/11 al 16/11", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 17/11 al 02/12", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 03/12 al 18/12", url: "http://downloads.yahoo.com" },
			    			{ text: "Período: 19/12 al 03/01", url: "http://downloads.yahoo.com" }
                        		]
                    		}
			     }],
			     [{text: "Clases de Coberturas CORINE 2000", url: "http://downloads.yahoo.com" },
                             {text: "Clases de Coberturas GlobCover Versión 2.2", url: "http://downloads.yahoo.com" }], 			     
			     [{text: "Clasificación de Serie Temporal del EVI", url: "http://downloads.yahoo.com" }]
			]
		     },
		
		     {
                        id: "Clima", 
                        itemdata: [ 
			    [{text: "Estaciones Climáticas", url: "http://downloads.yahoo.com" }], 
			    
			    [{text: "Temperatura Media Mensual", 
                                submenu: { 
                                            id: "Tmeses", 
                                            itemdata: [
                                                { text: "Enero", url: "http://mail.yahoo.com" },
                                                { text: "Febrero", url: "http://addressbook.yahoo.com" },
                                                { text: "Marzo",  url: "http://calendar.yahoo.com" },
                                                { text: "Abril",  url: "http://calendar.yahoo.com" },
						{ text: "Mayo",  url: "http://calendar.yahoo.com" },
						{ text: "Junio",  url: "http://calendar.yahoo.com" },
						{ text: "Julio",  url: "http://calendar.yahoo.com" },
						{ text: "Agosto",  url: "http://calendar.yahoo.com" },
						{ text: "Septiembre",  url: "http://calendar.yahoo.com" },
						{ text: "Octubre",  url: "http://calendar.yahoo.com" },
						{ text: "Noviembre",  url: "http://calendar.yahoo.com" },
						{ text: "Diciembre",  url: "http://calendar.yahoo.com" }
                                            ] 
                                        }
                            }, 
			    
			    {text: "Temperatura Mínima Mensual", 
                                submenu: { 
                                            id: "Tminmeses", 
                                            itemdata: [
                                                { text: "Enero", url: "http://mail.yahoo.com" },
                                                { text: "Febrero", url: "http://addressbook.yahoo.com" },
                                                { text: "Marzo",  url: "http://calendar.yahoo.com" },
                                                { text: "Abril",  url: "http://calendar.yahoo.com" },
						{ text: "Mayo",  url: "http://calendar.yahoo.com" },
						{ text: "Junio",  url: "http://calendar.yahoo.com" },
						{ text: "Julio",  url: "http://calendar.yahoo.com" },
						{ text: "Agosto",  url: "http://calendar.yahoo.com" },
						{ text: "Septiembre",  url: "http://calendar.yahoo.com" },
						{ text: "Octubre",  url: "http://calendar.yahoo.com" },
						{ text: "Noviembre",  url: "http://calendar.yahoo.com" },
						{ text: "Diciembre",  url: "http://calendar.yahoo.com" }
                                            ] 
                                        }
                            },			    
			    
			    {text: "Temperatura Máxima Mensual", 
                                submenu: { 
                                            id: "Tmaxmeses", 
                                            itemdata: [
                                                { text: "Enero", url: "http://mail.yahoo.com" },
                                                { text: "Febrero", url: "http://addressbook.yahoo.com" },
                                                { text: "Marzo",  url: "http://calendar.yahoo.com" },
                                                { text: "Abril",  url: "http://calendar.yahoo.com" },
						{ text: "Mayo",  url: "http://calendar.yahoo.com" },
						{ text: "Junio",  url: "http://calendar.yahoo.com" },
						{ text: "Julio",  url: "http://calendar.yahoo.com" },
						{ text: "Agosto",  url: "http://calendar.yahoo.com" },
						{ text: "Septiembre",  url: "http://calendar.yahoo.com" },
						{ text: "Octubre",  url: "http://calendar.yahoo.com" },
						{ text: "Noviembre",  url: "http://calendar.yahoo.com" },
						{ text: "Diciembre",  url: "http://calendar.yahoo.com" }
                                            ] 
                                        }
                             }],
                            
                            [{text: "Precipitación Media Mensual", 
                                submenu: { 
                                            id: "Pmeses", 
                                            itemdata: [
                                                { text: "Enero", url: "http://mail.yahoo.com" },
                                                { text: "Febrero", url: "http://addressbook.yahoo.com" },
                                                { text: "Marzo",  url: "http://calendar.yahoo.com" },
                                                { text: "Abril",  url: "http://calendar.yahoo.com" },
						{ text: "Mayo",  url: "http://calendar.yahoo.com" },
						{ text: "Junio",  url: "http://calendar.yahoo.com" },
						{ text: "Julio",  url: "http://calendar.yahoo.com" },
						{ text: "Agosto",  url: "http://calendar.yahoo.com" },
						{ text: "Septiembre",  url: "http://calendar.yahoo.com" },
						{ text: "Octubre",  url: "http://calendar.yahoo.com" },
						{ text: "Noviembre",  url: "http://calendar.yahoo.com" },
						{ text: "Diciembre",  url: "http://calendar.yahoo.com" }
                                            ] 
                                        }
                            },
                            
			    {text: "Evapotranspiración Media Mensual", 
                                submenu: { 
                                            id: "Emeses", 
                                            itemdata: [
                                                { text: "Enero", url: "http://mail.yahoo.com" },
                                                { text: "Febrero", url: "http://addressbook.yahoo.com" },
                                                { text: "Marzo",  url: "http://calendar.yahoo.com" },
                                                { text: "Abril",  url: "http://calendar.yahoo.com" },
						{ text: "Mayo",  url: "http://calendar.yahoo.com" },
						{ text: "Junio",  url: "http://calendar.yahoo.com" },
						{ text: "Julio",  url: "http://calendar.yahoo.com" },
						{ text: "Agosto",  url: "http://calendar.yahoo.com" },
						{ text: "Septiembre",  url: "http://calendar.yahoo.com" },
						{ text: "Octubre",  url: "http://calendar.yahoo.com" },
						{ text: "Noviembre",  url: "http://calendar.yahoo.com" },
						{ text: "Diciembre",  url: "http://calendar.yahoo.com" }
                                            ] 
                                        }
                             }],
                             [{text: "Clases Climáticas", url: "http://downloads.yahoo.com" }]                                             
                        ]
                    },
                   
                    {
                        id: "FisioQuimica", 
                        itemdata: [ 
			    [{text: "Horizonte Superficial", disabled:true, classname:"Titulo_Seccion"},
                            {text: "Textura", 
                                submenu: {                                            
                                            	id: "texsuperficial", 
                                            	itemdata: [
							[{ text: "Arena", 
								submenu: { 
			                                            	id: "Arenasuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Arena", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
							{ text: "Limo", 
								submenu: { 
			                                            	id: "Limosuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Limo", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
                                                			
  							{ text: "Arcilla", 
								submenu: { 
			                                            	id: "Arcillasuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Arcilla", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							}],
							[{ text: "Clases de Textura", url: "http://mail.yahoo.com" }]
                                        	]
						
                                }
                            },
                            
			    {text: "Densidad Aparente", url: "http://mail.yahoo.com"}, 
                             	         
                            {text: "Materia Orgánica", 
                                submenu: {                                              
                                            	id: "MOsuperficial", 
                                            	itemdata: [
							{ text: "Contenido de Materia Orgánica", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
			    },
			     
                            {text: "pH", 
                                submenu: {                                                          
                                            	id: "pHsuperficial", 
                                            	itemdata: [
							{ text: "Valor del pH", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
			    }],
			    
			    [{text: "Horizonte Subsuperficial", disabled:true, classname:"Titulo_Seccion"},
                            {text: "Textura", 
                                submenu: {                                            
                                            	id: "texsubsuperficial", 
                                            	itemdata: [
                                                	[{ text: "Arena", 
								submenu: { 
			                                            	id: "Arenasubsuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Arena", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
							{ text: "Limo", 
								submenu: { 
			                                            	id: "Limosubsuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Limo", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
                                                			
  							{ text: "Arcilla", 
								submenu: { 
			                                            	id: "Arcillasubsuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Arcilla", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							}],
							[{ text: "Clases de Textura", url: "http://mail.yahoo.com" }]
                                        	]
						
                                }
                            },
                            
			    {text: "Densidad Aparente", url: "http://mail.yahoo.com"}, 
                             	         
                            {text: "Materia Orgánica", 
                                submenu: {                                              
                                            	id: "MOsubsuperficial", 
                                            	itemdata: [
							{ text: "Contenido de Materia Orgánica", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
			    },
			     
                            {text: "pH", 
                                submenu: {                                                          
                                            	id: "pHsubsuperficial", 
                                            	itemdata: [
							{ text: "Valor del pH", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
			    }],
                            
                            [{text: "Profundidad del Suelo", 
                                submenu: { 
                                           id: "Profundidad", 
                                           itemdata: [
							{ text: "Clases de Profundidad del Suelo", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						     ]
					  }
			    }]

			]
		    },
		
		
                    {
                        id: "Hidraulicas", 
                        itemdata: [ 
			    [{text: "Horizonte Superficial", disabled:true, classname:"Titulo_Seccion"},
                            {text: "Capacidad de Campo", 
                                submenu: {                                              
                                            	id: "CCsuperficial", 
                                            	itemdata: [
							{ text: "Contenido de Agua en el Suelo a CC", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
			    },
		    	   
                            {text: "Punto de Marchitez Permanente", 
                                submenu: {                                            
                                            	id: "PMPsuperficial", 
                                            	itemdata: [
							{ text: "Contenido de Agua en el Suelo a PMP", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
                                        }
                            },

			    {text: "Retención de Agua", 
                                submenu: {                                            
                                            	id: "Retencionsuperficial", 
                                            	itemdata: [
							{ text: "Capacidad de Retención de Agua", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
                            },
				
			    {text: "Conductividad Hidráulica Saturada", 
                                submenu: {                                              
                                            	id: "Ksatsuperficial", 
                                            	itemdata: [
							{ text: "Valor de la Conductividad Hidráulica", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
                            },

			    {text: "Parámetros de Retención de van Genuchten", 
                                submenu: {                                            
                                            	id: "VGsuperficial", 
                                            	itemdata: [
							{ text: "Agua Residual", 
								submenu: { 
			                                            	id: "Residualsuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Agua Residual", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
							{ text: "Agua de Saturación", 
								submenu: { 
			                                            	id: "Saturacionsuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Agua de Saturación", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
                                                			
  							{ text: "Presión de Entrada de Aire", 
								submenu: { 
			                                            	id: "Presionsuperficial", 
                        			                    		itemdata: [
											{ text: "Inverso de Presión de Entrada de Aire", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
									
							{ text: "Tamaños de Poros", 
								submenu: { 
			                                            	id: "Porosuperficial", 
                        			                    		itemdata: [
											{ text: "Distribución de Tamaños de Poros", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							}
                                        	]
					}
                            },
                        		
			    {text: "Parámetros de Conductividad de Mualem", 
                                submenu: {                                              
                                            	id: "Mualemsuperficial", 
                                            	itemdata: [
							{ text: "Conductividad Saturada Aparente", 
								submenu: { 
			                                            	id: "Aparentesuperficial", 
                        			                    		itemdata: [
											{ text: "Valor de la Conductividad Aparente", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
							{ text: "Tortuosidad/Conectividad de Poros", 
								submenu: { 
			                                            	id: "Tortuosidadsuperficial", 
                        			                    		itemdata: [
											{ text: "Parámetro de Tortuosidad/Conectividad", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							}
                                                ]
					}
                            }],
                            
                            [{text: "Horizonte Subsuperficial", disabled:true, classname:"Titulo_Seccion"},
                            {text: "Capacidad de Campo", 
                                submenu: {                                              
                                            	id: "CCsubsuperficial", 
                                            	itemdata: [
							{ text: "Contenido de Agua en el Suelo a CC", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
			    },
		    	   
                            {text: "Punto de Marchitez Permanente", 
                                submenu: {                                            
                                            	id: "PMPsubsuperficial", 
                                            	itemdata: [
							{ text: "Contenido de Agua en el Suelo a PMP", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
                                        }
                            },

			    {text: "Retención de Agua", 
                                submenu: {                                            
                                            	id: "Retencionsubsuperficial", 
                                            	itemdata: [
							{ text: "Capacidad de Retención de Agua", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
                            },
				
			    {text: "Conductividad Hidráulica Saturada", 
                                submenu: {                                              
                                            	id: "Ksatsubsuperficial", 
                                            	itemdata: [
							{ text: "Valor de la Conductividad Hidráulica", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
                            },

			    {text: "Parámetros de Retención de van Genuchten", 
                                submenu: {                                            
                                            	id: "VGsubsuperficial", 
                                            	itemdata: [
							{ text: "Agua Residual", 
								submenu: { 
			                                            	id: "Residualsubsuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Agua Residual", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
							{ text: "Agua de Saturación", 
								submenu: { 
			                                            	id: "Saturacionsubsuperficial", 
                        			                    		itemdata: [
											{ text: "Contenido de Agua de Saturación", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
                                                			
  							{ text: "Presión de Entrada de Aire", 
								submenu: { 
			                                            	id: "Presionsubsuperficial", 
                        			                    		itemdata: [
											{ text: "Inverso de Presión de Entrada de Aire", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
									
							{ text: "Tamaños de Poros", 
								submenu: { 
			                                            	id: "Porosubsuperficial", 
                        			                    		itemdata: [
											{ text: "Distribución de Tamaños de Poros", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							}
                                        	]
					}
                            },
                        		
			    {text: "Parámetros de Conductividad de Mualem", 
                                submenu: {                                              
                                            	id: "Mualemsubsuperficial", 
                                            	itemdata: [
							{ text: "Conductividad Saturada Aparente", 
								submenu: { 
			                                            	id: "Aparentesubsuperficial", 
                        			                    		itemdata: [
											{ text: "Valor de la Conductividad Aparente", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							},
							{ text: "Tortuosidad/Conectividad de Poros", 
								submenu: { 
			                                            	id: "Tortuosidadsubsuperficial", 
                        			                    		itemdata: [
											{ text: "Parámetro de Tortuosidad/Conectividad", url: "http://mail.yahoo.com" },
                                                					{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }			
										]
									}
							}
                                                ]
					}
                            }],
                            
                            [{text: "Retención de Agua en todo el Perfil del Suelo", 
                                submenu: {                                            
                                            	id: "Retenciontotall", 
                                            	itemdata: [
							{ text: "Capacidad de Retención de Agua", url: "http://mail.yahoo.com" },
                                                	{ text: "Error de Inferencia Espacial",  url: "http://calendar.yahoo.com" }
						]
					}
                            }]
		       ]
	          }
                ];
                oMenuBar.subscribe("beforeRender", function () {
                    if (this.getRoot() == this) {
                        this.getItem(0).cfg.setProperty("submenu", aSubmenuData[0]);
                        this.getItem(1).cfg.setProperty("submenu", aSubmenuData[1]);
                        this.getItem(2).cfg.setProperty("submenu", aSubmenuData[2]);
                        this.getItem(3).cfg.setProperty("submenu", aSubmenuData[3]);
			this.getItem(4).cfg.setProperty("submenu", aSubmenuData[4]);
			this.getItem(5).cfg.setProperty("submenu", aSubmenuData[5]);
			this.getItem(6).cfg.setProperty("submenu", aSubmenuData[6]);
		    }
                });
                oMenuBar.render();         
        };
        
 	Event.onDOMReady(function() {
 	    Readsesion();
 	    var layout = new YAHOO.widget.Layout({
            units: [
		{ position: 'left', width:196, body: 'left1', header: 'Metadatos', gutter: '6px 3px', collapse: true, collapseSize: 25, resize: false, scroll:true,animate:false},
                { position: 'top', height: 111, body: 'top1',gutter: '0px 3px', resize: false, scroll:null, zIndex:1},
		{ position: 'bottom',  body: 'bottom1', height: 24, resize: false, gutter: '0px 3px'},   
                { position: 'center', body: 'center1', gutter: '6px 3px 6px 0px'}			
            ]
	    });
            layout.on('render', function() {
                YAHOO.util.Event.onContentReady("productsandservices", initTopMenu);
                layout.getUnitByPosition('left').on('collapse', function() {PanelIzquierdo=0;}); 
                layout.getUnitByPosition('left').on('expand', function() {PanelIzquierdo=1;});
                if (PanelIzquierdo==0) {layout.getUnitByPosition('left').collapse();}
            });
            layout.render();
            layout.getUnitByPosition('left').set('animate', true); 
            document.getElementById('loading').style.display='none'; 
            AdicionaControl(1,2,2,7,"Logo");
            AdicionaControl(2,2,30,94,"TipoMapa");
            AdicionaControl(2,1,-1,0,"Menu"); 
            AdicionaControl(2,1,6,32,"share");
            AdicionaControl(1,1,2,10,"TOF");
            var posicion = document.getElementById("Copyright");
	       posicion.style.top = "2px";
	       posicion.style.left = "45.4%";	  
            AdicionaControl(1,2,2,10,"Contacto");
        });       
})();

function Login() {
        document.getElementById("Log_in").style.display="block";
        IniciaSesion = new YAHOO.widget.Panel("Log_in", {
	        fixedcenter: true, 
                underlay:"matte", 
	        close:true, 
	        visible:true, 
	        draggable:true,
	        iframe:true,
	        constraintoviewport: true,
		effect:{effect:YAHOO.widget.ContainerEffect.FADE,duration:0.25},
                modal:true}
        );        
        var kl = new YAHOO.util.KeyListener(document, { keys:27 },{
                fn: IniciaSesion.hide,
		scope: IniciaSesion,
		correctScope:true } );
        IniciaSesion.cfg.queueProperty("keylisteners", kl);               
        IniciaSesion.render(document.body);
        
        document.getElementById("ErrorLogin").style.display="none";
        if (claseboton != null) {YAHOO.util.Dom.replaceClass(claseboton, "button_der_new", "button_der");}     
        var correo=document.getElementById("email");
        correo.style.border="solid 1px #aacfe4"; 
        var clave=document.getElementById("psw");
        clave.style.border="solid 1px #aacfe4";
        document.getElementById("ErrorLogin").innerHTML="";
        correo.focus();        
}

function Recupera_Contrasena(){
        IniciaSesion.hide();        
        Recuperar = new YAHOO.widget.Panel("Olvido_psw", {
	        fixedcenter: true, 
	        underlay:"matte", 
	        close:true, 
	        visible:true, 
	        draggable:true,
	        iframe:true,
	        constraintoviewport: true,
		effect:{effect:YAHOO.widget.ContainerEffect.FADE,duration:0.25},
                modal:true}
        );
        var k3 = new YAHOO.util.KeyListener(document, { keys:27 },{
                fn: Recuperar.hide,
		scope: Recuperar,
		correctScope:true } );
        Recuperar.cfg.queueProperty("keylisteners", k3);         
        Recuperar.render(document.body);        
        var correoelectronico=document.getElementById("electronicmail");
        correoelectronico.style.border="solid 1px #aacfe4"; 
        document.getElementById("ErrorEmail").innerHTML="";
        correoelectronico.focus();
}
        
function Registro(){
        IniciaSesion.hide();        
        Registrar = new YAHOO.widget.Panel("Registro", {
	        fixedcenter: true, 
	        underlay:"matte", 
	        close:true, 
	        visible:true, 
	        draggable:true,
	        iframe:true,
	        constraintoviewport: true,
		effect:{effect:YAHOO.widget.ContainerEffect.FADE,duration:0.25},
                modal:true}
        );
        var k2 = new YAHOO.util.KeyListener(document, { keys:27 },{
                fn: Registrar.hide,
		scope: Registrar,
		correctScope:true } );
        Registrar.cfg.queueProperty("keylisteners", k2);         
        Registrar.render(document.body);        
        var nombreusuario=document.getElementById("username");
        nombreusuario.style.border="solid 1px #aacfe4"; 
        document.getElementById("ErrorAlias").innerHTML="";
        var institucion=document.getElementById("instituto");
        institucion.style.border="solid 1px #aacfe4"; 
        document.getElementById("ErrorIntitucion").innerHTML="";
        var correoelectronico=document.getElementById("correo");
        correoelectronico.style.border="solid 1px #aacfe4"; 
        document.getElementById("ErrorEmail").innerHTML="";
        var password=document.getElementById("contrasena");
        password.style.border="solid 1px #aacfe4"; 
        document.getElementById("ErrorContrasena").innerHTML="";
        var password1=document.getElementById("contrasena1");
        password1.style.border="solid 1px #aacfe4"; 
        document.getElementById("ErrorConfirma").innerHTML="";        
        nombreusuario.focus();    
}

function Verifica_Login() {
                var correo=document.getElementById("email");
                var clave=document.getElementById("psw");
                if (claseboton == null) {claseboton = YAHOO.util.Dom.getElementsByClassName('button_der');}
                correo.style.border="solid 1px #aacfe4";
                clave.style.border="solid 1px #aacfe4"; 
                document.getElementById("ErrorLogin").innerHTML="";                 
                
                if (correo.value==null||correo.value=="") {
                        correo.style.border="solid 1px #F50000";
                        document.getElementById("ErrorLogin").style.display="block";
                        YAHOO.util.Dom.replaceClass(claseboton, "button_der", "button_der_new");
                        document.getElementById("ErrorLogin").innerHTML="No puede dejarse vacío ningún campo";
                        correo.focus(); 
                        return;
                }
                var cadena=correo.value;
                var filtro=/^([\w-]+(?:\.[\w-]+)*)@((?:[\w-]+\.)*\w[\w-]{0,66})\.([a-z]{2,6}(?:\.[a-z]{2})?)$/i;        
                if (!filtro.test(cadena)) {
                        correo.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorLogin").style.display="block";
                        YAHOO.util.Dom.replaceClass(claseboton, "button_der", "button_der_new");
                        document.getElementById("ErrorLogin").innerHTML="La dirección de email no parece válida";
                        correo.focus(); 
                        return;                              
                }
                //Aqui se verifica si el email está registrado en la Base de Datos, si no lo está se hace falso la variable emailregistrado
                var emailregistrado=true;
                if (!emailregistrado) {
                        correo.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorLogin").style.display="block";
                        YAHOO.util.Dom.replaceClass(claseboton, "button_der", "button_der_new");
                        document.getElementById("ErrorLogin").innerHTML="El correo electrónico no es válido";
                        correo.focus(); 
                        return;
                }
                if (clave.value==null||clave.value=="") {
                        clave.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorLogin").style.display="block";
                        YAHOO.util.Dom.replaceClass(claseboton, "button_der", "button_der_new");
                        document.getElementById("ErrorLogin").innerHTML="No puede dejarse vacío ningún campo";
                        clave.focus(); 
                        return;
                } 
                //Aqui se verifica si la contraseña cooresponde con el email en la Base de Datos, si no lo está se hace falso la variable pswregistrado
                var pswregistrado=true;
                if (!pswregistrado) {
                        clave.style.border="solid 1px #F50000";
                        document.getElementById("ErrorLogin").style.display="block";
                        YAHOO.util.Dom.replaceClass(claseboton, "button_der", "button_der_new"); 
                        document.getElementById("ErrorLogin").innerHTML="La contraseña no es válida";
                        clave.focus(); 
                        return;
                } 
        
                //Al llegar aqui, quiere decir que todo esta OK
                //Asi que se procede a cambiar el enlace de Iniciar Sesión a Finalizar Sesión y se pone el mensaje de Bienvenido Username y se
                //Esconde el formulario
                IniciaSesion.hide();
                //Y enviar un mensaje de que el proceso de registro ha sido exitoso y ya puede irniciar sesión 
                //con los datos suministrados
                alert("Su sesion se ha iniciado correctamente"); 
}

function Verifica_Recuperacion() {
        var correoelectronico=document.getElementById("electronicmail");
        correoelectronico.style.border="solid 1px #aacfe4"; 
        document.getElementById("ErrorEmail").innerHTML="";
        if (correoelectronico.value==null||correoelectronico.value=="") {
                correoelectronico.style.border="solid 1px #F50000"; 
                document.getElementById("ErrorEmail").innerHTML="Este campo no puede dejarse vacío";
                correoelectronico.focus(); 
                return;
        }
        var str=correoelectronico.value;
        var filter=/^([\w-]+(?:\.[\w-]+)*)@((?:[\w-]+\.)*\w[\w-]{0,66})\.([a-z]{2,6}(?:\.[a-z]{2})?)$/i;        
        if (!filter.test(str)) {
                correoelectronico.style.border="solid 1px #F50000"; 
                document.getElementById("ErrorEmail").innerHTML="Esta dirección de email no parece válida";
                correoelectronico.focus(); 
                return;                              
        }
        //Aqui se verifica si el email está registrado en la Base de Datos, si no lo está se hace falso la variable emailregistrado
        var emailregistrado=true;
        if (!emailregistrado) {
                correoelectronico.style.border="solid 1px #F50000"; 
                document.getElementById("ErrorEmail").innerHTML="Este email no consta en nuestra base de datos";
                correoelectronico.focus(); 
                return;
        }
        //Al llegar aqui, quiere decir que todo esta OK
        //Asi que se procede a enviar un email al usuario con sus datos
        // y se Esconde el formulario
        Recuperar.hide();
        //Y enviar un mensaje de que el proceso de registro ha sido exitoso y ya puede irniciar sesión 
        //con los datos suministrados
        alert("Hemos enviado un email a la dirección facilitada con los datos de su cuenta de SIESA");
}

function Verifica_Registro(campo) {
        if (campo==1||campo==6) {
                var nombreusuario=document.getElementById("username");
                if (nombreusuario.value==null||nombreusuario.value=="") {
                        nombreusuario.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorAlias").innerHTML="Este campo no puede dejarse vacío";
                        if (campo==6) {nombreusuario.focus();} 
                        return;
                } else {
                        nombreusuario.style.border="solid 1px #aacfe4"; 
                        document.getElementById("ErrorAlias").innerHTML="";
                }                         
        }
        if (campo==2||campo==6) {
                var institucion=document.getElementById("instituto");
                if (institucion.value==null||institucion.value=="") {
                        institucion.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorIntitucion").innerHTML="Este campo no puede dejarse vacío";
                        if (campo==6) {institucion.focus();} 
                        return;
                } else {
                        institucion.style.border="solid 1px #aacfe4"; 
                        document.getElementById("ErrorIntitucion").innerHTML="";
                }                         
        }
        if (campo==3||campo==6) {
                var correoelectronico=document.getElementById("correo");
                if (correoelectronico.value==null||correoelectronico.value=="") {
                        correoelectronico.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorEmail").innerHTML="Este campo no puede dejarse vacío";
                        if (campo==6) {correoelectronico.focus();} 
                        return;
                }
                var str=correoelectronico.value;
                var filter=/^([\w-]+(?:\.[\w-]+)*)@((?:[\w-]+\.)*\w[\w-]{0,66})\.([a-z]{2,6}(?:\.[a-z]{2})?)$/i;
                if (filter.test(str)) {
                        correoelectronico.style.border="solid 1px #aacfe4"; 
                        document.getElementById("ErrorEmail").innerHTML="";
                } else {
                        correoelectronico.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorEmail").innerHTML="Esta dirección de email no parece válida";
                        if (campo==6) {correoelectronico.focus();} 
                        return;                              
                }                         
        }
        //FALTA VERIFICAR QUE EL EMAIL NO ESTE YA EN LA BASE DE DATOS
        if (campo==4||campo==6) {
                var password=document.getElementById("contrasena");
                if (password.value==null||password.value=="") {
                        password.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorContrasena").innerHTML="Este campo no puede dejarse vacío";
                        if (campo==6) {password.focus();} 
                        return;
                } 
                var strg=password.value;
                if (strg.search(/\s/)!=-1) {
                        password.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorContrasena").innerHTML="La contraseña no puede contener espacios";
                        if (campo==6) {password.focus();} 
                        return;              
                }
                if (strg.length < 6) {
                        password.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorContrasena").innerHTML="Debe contener 6 caracteres como mínimo";                        
                        if (campo==6) {password.focus();} 
                        return;              
                }
                else {
                        password.style.border="solid 1px #aacfe4"; 
                        document.getElementById("ErrorContrasena").innerHTML="";
                }                         
        }
        if (campo==5||campo==6) {
                var password0=document.getElementById("contrasena");
                var password1=document.getElementById("contrasena1");
                if (password1.value==null||password1.value=="") {
                        password1.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorConfirma").innerHTML="Este campo no puede dejarse vacío";
                        if (campo==6) {password1.focus();} 
                        return;
                }
                var str0=password0.value;
                var str1=password1.value;
                if (str0!=str1) {
                        password1.style.border="solid 1px #F50000"; 
                        document.getElementById("ErrorConfirma").innerHTML="Las contraseñas no coinciden";
                        if (campo==6) {password1.focus();} 
                        return;              
                }
                else {
                        password1.style.border="solid 1px #aacfe4"; 
                        document.getElementById("ErrorConfirma").innerHTML="";
                }
        }
        if (campo==6) {
                //Al llegar aqui, quiere decir que todo esta OK
                //Asi que se procede a guardar los datos en BD
                //Esconder el formulario
                Registrar.hide();
                //Y enviar un mensaje de que el proceso de registro ha sido exitoso y ya puede irniciar sesión 
                //con los datos suministrados
                alert("Se ha registrado correctamente, ya puede proceder a iniciar una sesión con el email y la contraseña escogida");
        }
}

function Updatesesion() {
        YAHOO.util.Cookie.set("siesacookie", PanelIzquierdo);        
}