//Vers. 20081010 of indexLb_pses.js.ydwv, Modelo para crear la libreria de Scripts especifica de la pagina /ps/es/index.html
var ydIndexLb_psesVer="20041222.1";
//. ydBsc.js Copyright infodigital S.L.
var ydBscVer = "20070314.1";

var g_ckINm_s = "ydCkIni";
var g_ckIVlYdAss_s = undefined;
var g_ckLNm_s = "ydCkLgn";
var g_ckLVlYdAss_s = undefined;

var g_atir_nm_s = "atir";
var g_atir_s = g_atir_nm_s;
var g_ca_nm_s = "ca";
var g_h2_nm_s = "h2";
var g_ic_nm_s = "ic";
var g_id_nm_s = "id";
var g_id_s = g_id_nm_s;
var g_ln_nm_s = "ln";
var g_ln_s = g_ln_nm_s;
var g_lu_nm_s = "lu";
var g_nif_nm_s = "nif";
var g_nm_nm_s = "nm";
var g_pr_nm_s = "pr";
var g_pr_s = g_pr_nm_s;
var g_pw_nm_s = "pw";
var g_pw_s = "0.0";
var g_si_nm_s = "si";
var g_si_s = g_si_nm_s;
var g_st_nm_s = "st";
var g_top_s = g_top_s || "DianaCasado_pses.html";
var g_tr_nm_s = "tr";
var g_v_nm_s = "v";
var	g_xf_nm_s = "xf";


var ydChkLg2Ver="20070326.1";
function ydChkLg2(r_Doc)
{
	if(!top.ydBscChk || !top.ydBscChk("0.0")) top.document.location="../index.html";

	if(top.g_ln_s == top.g_ln_nm_s)
	{
		top.g_ln_s = top.ydSsGet(top.document,top.g_ln_nm_s);
	}
	if(top.g_pr_s == top.g_pr_nm_s)
	{
		top.g_pr_s = top.ydSsGet(top.document,top.g_pr_nm_s);
	}
	if(top.g_si_s == top.g_si_nm_s)
	{  
		top.g_si_s = top.ydSsGet(top.document,top.g_si_nm_s);
	}

	if(!top.g_ckIVlYdAss_s)
	{
		top.g_ckIVlYdAss_s = top.ydCkGetFlds(r_Doc, top.g_ckINm_s);
	}

	if(!top.g_ckIVlYdAss_s)
	{
		return ydErr(g_ydChkLgNckI_s);
	}

	if(!top.g_ckLVlYdAss_s)
	{
		top.g_ckLVlYdAss_s = top.ydCkGetFlds(r_Doc, top.g_ckLNm_s);
	}

	if(!top.g_ckLVlYdAss_s)
	{
		return ydErr(g_ydChkLgNckL_s);
	}

	if(top.g_ckIVlYdAss_s[top.g_si_nm_s] != top.g_si_s)
	{
		return ydErr(g_ydChkLgIsi_s + top.g_si_s + ":" + top.g_ckIVlYdAss_s[top.g_si_s] + ").");
	}

	top.g_id_s = top.g_ckIVlYdAss_s[top.g_id_nm_s];

	if(top.g_ckLVlYdAss_s[top.g_id_nm_s] != top.g_id_s)
	{
		return ydErr(g_ydChkLgEcc_s);
	}

	var m_h2_s = top.g_ckLVlYdAss_s[top.g_h2_nm_s];
	if(!m_h2_s)
	{
		return ydErr(g_ydChkLgBpwL_s);
	}

	if(top.g_atir_s == top.g_atir_nm_s)
	{
		top.g_atir_s = top.g_ckLVlYdAss_s[top.g_atir_nm_s];
	}
	var m_tmp_s = top.g_atir_s + m_h2_s + top.g_id_s;
	
	if(top.g_ckLVlYdAss_s[top.g_xf_nm_s]  != (top.ydHc(m_tmp_s).toString()))
	{
		return ydErr(g_ydChkLgCklI_s + '2');
	}

	var m_h1_s = top.g_ckIVlYdAss_s[top.g_pw_nm_s];
	if(!m_h1_s)
	{
		return ydErr(g_ydChkLgBpwI_s);
	}

	var m_pwH2_s = top.ydHc(m_h1_s, 31, 37, 13);
	if(m_h2_s != m_pwH2_s)
	{
		return ydErr(g_ydChkLgIpw_s);
	}

	top.g_pw_s = "2.0";

	return true;
}

function ydErr(r_msg_s)
{
	g_ydMsgAlert_s = r_msg_s;
	if(typeof(g_ydMsgIntInh_b) == "undefined" || !g_ydMsgIntInh_b)
	{
		alert(r_msg_s);
	}
	top.document.location="../index.html";
}


ydChkLg_psesVer="20070321.1";

var g_ydChkLgBpwI_s = "Error, contraseña a blanco en ckI, contactar con Diana Casado. Error de Programacion"; 
var g_ydChkLgBpwL_s = "Error, contraseña a blanco en ckL, contactar con Diana Casado. Error de Programacion"; 
var g_ydChkLgCklI_s = "Error, información de control inconsistente. Error de disco o modificada manualmente. Contactar con Diana Casado S.L.";
var g_ydChkLgEcc_s = "Error, el código de cliente tecleado es incorrecto, revisar y dar el correcto."; 
var g_ydChkLgIpw_s = "Error, el código de cliente y/o la contraseña dados son incorrectos, revisar y dar los correctos."; 
var g_ydChkLgIsi_s = "Error, identificación de sesión inválido (Ss:ckI) = (";
var g_ydChkLgMnytms_s = "Atención, demasiados intentos sin lograr introducir la contraseña. Vuelva a probar despues de arrancar el navegador de nuevo o copia el valor indicado a continuación y contacta con Diana Casado S.L.";
var g_ydChkLgNckI_s = "Error, falta el cookie " + top.g_CkINm_s + ", probablemente debido a que no se ha introducido el código de autorización en este navegador y ordenador, o no se ha entrado correctamente.";
var g_ydChkLgNckL_s = "Error, no se ha encontrado el cookie " + top.g_CkLNm_s + ", probablemente debido a que no se ha introducido el código de autorización en este navegador y ordenador, o no se ha entrado correctamente.";
var g_ydChkLgTMnyTrs_s = "Se ha superado el limite de intentos de introducir la contraseña de acceso. Revise la contraseña o establezca una nueva."

var ydCkLbVer_s="20070319"; // version of ydCkLb.js, Cookie and query or search string library
//. Copyright (c) Francisco Guardiola (francisco@guardiola.net). All rights reserved.
//. Released under the GPL license (http://www.gnu.org/copyleft/gpl.html).


var g_ydCkHdrMax_i = 7600;

var g_ydCkIsMsIe_b = (navigator.appVersion.indexOf("MSIE") >= 0)? true: false;

var g_ydCkMinRfcLen_i = 4096;

var g_ydCkMaxPrp_i = g_ydCkIsMsIe_b? 4090: g_ydCkRfcDom_i * g_ydCkMinRfcLen_i;

var g_ydCkMaxUseLen_i = (g_ydCkMaxPrp_i < g_ydCkMinRfcLen_i)? g_ydCkMaxPrp_i : g_ydCkMinRfcLen_i;

var g_ydCkRfcDom_i = 20;

function ydCkAlert(r_libName_s, r_calledFrom_s, r_msg_s, r_vl_s, r_vlMaxLen_i)
{
	var m_msg_s = 'From lib: ' + r_libName_s + ', function: ' + r_calledFrom_s;

	m_msg_s += '. ' + r_msg_s;

	if (r_vl_s)
	{
		var b_vlMaxLen_i = r_vlMaxLen_i || 100;
		var m_vlEsLn_i = r_vl_s.length; 
		if (m_vlEsLn_i > b_vlMaxLen_i)
		{
			m_msg_s += ' (Of a total length of ' + m_vlEsLn_i + ', first ' + b_vlMaxLen_i + ' bytes of value: ' + r_vl_s.substring(0, b_vlMaxLen_i) + ')';
		}
		else
		{
			m_msg_s += ' (With a length of: ' + m_vlEsLn_i + ', value: ' + r_vl_s +  ')';
		}
	}
	ydMsgAlert(m_msg_s);
	return m_msg_s;
}

function ydCkClear(r_Doc, r_ckNm_s, r_path_s, r_dom_s)
{
 	if (r_ckNm_s === undefined)
	{
	 	 return undefined;
	}
	
	var m_vlUn_s = ydCkGet(r_Doc, r_ckNm_s);
	if (m_vlUn_s === undefined && !r_path_s)
	{
	 	 return undefined;
	}

	r_path_s = ydCkEndPath(r_path_s);

	var m_ck_s = r_ckNm_s + "=" +
		 ((r_path_s) ? "; path=" + r_path_s : "") +
		 ((r_dom_s) ? "; domain=" + r_dom_s : "") + 
		 "; expire=" + ydExpDate(-5000);  
	r_Doc.cookie = m_ck_s;

	if(!m_vlUn_s && r_path_s)
	{
		return m_ck_s;
	}
	else
	{
		return m_vlUn_s;
	}
}



function ydCkDirSep(r_path_s)
{
	if(typeof(r_path_s) == "undefined")
	{
		r_path_s = document.location.pathname;
	}
	var m_path_St = new String(r_path_s);
	var m_sep_s = "/";
	var m_ix_i = m_path_St.lastIndexOf(m_sep_s);
	var m_ix2_i = m_path_St.lastIndexOf("\\");
	if(m_ix2_i >= 0)
	{
			m_ix_i = m_ix2_i;
			m_sep_s = "\\";
	}

	if (m_ix_i < 0)
	{
		r_path_s = document.location.pathname;
		m_path_St = new String(r_path_s);
		m_sep_s = "/";
		m_ix_i = m_path_St.lastIndexOf(m_sep_s);
		m_ix2_i = m_path_St.lastIndexOf("\\");
		if(m_ix2_i >= 0)
		{
				m_sep_s = "\\";
		}
		m_ix_i = -1;
	}
	return new Array(m_sep_s, m_ix_i);
}


function ydCkDocDir(r_Doc)
{
	if(typeof(r_Doc) == "undefined")
	{
		r_Doc = document;
	}

	var m_path_s = r_Doc.location.pathname;

	var m_pathArr_v = ydCkDirSep(m_path_s);

	var m_path_s = m_path_s.substring(0, m_pathArr_v[1] + 1);
	return m_path_s;
}

function ydCkEndPath(r_path_s, r_Doc)
{
	var m_Doc = r_Doc || document;
	if(!r_path_s)
	{
		return r_path_s;
	}

	var m_docPath_s = m_Doc.location.pathname;
	var m_pathArr_v = ydCkDirSep(m_docPath_s);
	var m_sep_s = m_pathArr_v[0];
	var m_path_s = r_path_s;

	if(m_sep_s == '/')
	{
		m_path_s = m_path_s.replace(/\\/gi, "/");
	}
	else if(m_sep_s == '\\' && m_path_s.length > 1)
	{
		m_path_s = m_path_s.replace(/\//gi, "\\");

		if((m_docPath_s.charAt(0) == '/') && (m_path_s.charAt(0) == '\\'))
		{
			m_path_s = "/" +m_path_s.substring(1);
		}
	}

	var m_lstCh_s = m_path_s.charAt(m_path_s.length - 1);
	if(m_lstCh_s != "/" && m_lstCh_s != "\\")
	{
		m_path_s += m_sep_s;
	}
	return m_path_s;
}

function ydCkFormat(r_fldObject_s, r_sepNm_s, r_sepFld_s)
{
	var m_ck_s = "";
	var m_frst_b = true;
	
	
	var m_sepNm_s = r_sepNm_s || ":"; 
	var m_sepFld_s = r_sepFld_s || "|";
	
	var m_ckNm_s = "";
	var m_vl_s = "";
	
	for (m_ckNm_s in r_fldObject_s)
	{
		m_vl_s = r_fldObject_s[m_ckNm_s];
		if ((m_vl_s !== undefined) &&
			(m_vl_s != null) && (typeof(m_vl_s) != "function"))
		{
			if (m_frst_b)
			{
				m_frst_b = false;
			}
			else
			{
				m_ck_s += m_sepFld_s;
			}
			m_ck_s += m_ckNm_s + m_sepNm_s + m_vl_s;
		}
	}
	return m_ck_s;
}	

function ydCkGet(r_Doc, r_ckNm_s)
{
	var m_ck_St = new String(r_Doc.cookie);
	var m_vlEs_s;
	
	if(r_ckNm_s === undefined)
	{
		var b_found_b = false;
		var b_cksObject_s = new Object();
		var b_bgNm_Arr = [0, undefined];
		while (m_vlEs_s = ydCkGetNx(m_ck_St, b_bgNm_Arr))
		{
			b_cksObject_s[b_bgNm_Arr[1]] = unescape(m_vlEs_s);
			b_found_b = true;
		}
		
		if(b_found_b)
		{	
			return (b_cksObject_s);
		}
	}
	else
	{
		m_vlEs_s = ydCkGetEs(m_ck_St, r_ckNm_s);
		if(m_vlEs_s !== undefined && m_vlEs_s !== null)
		{
			return unescape(m_vlEs_s);
		}
	}

	return undefined;
}	

function ydCkGetCkFld(r_Doc, r_ckNm_s, r_flNm_s, r_sepNm_s, r_sepFld_s)
{
	var m_ckVl_s = "";
	
	m_ckVl_s = ydCkGet(r_Doc, r_ckNm_s);
	
	if (!m_ckVl_s)
	{
	 	 return undefined;	
	}

	var m_fld_s = ydGetFld(m_ckVl_s, r_flNm_s, r_sepNm_s, r_sepFld_s);
	
	return m_fld_s;
}	

function ydCkGetEs(r_ck_St, r_ckNm_s, r_calledFrom_s)
{
	var m_calledFrom_s = 'ydCkGetEs';
	if(r_calledFrom_s)
	{
		m_calledFrom_s += ' (called from ' + r_calledFrom_s + ')';
	}

	if(!r_ckNm_s)
	{
		ydCkAlert('ydCkLb.js', m_calledFrom_s, 'Script ERROR 21: the r_ckNm_s parameter evaluates to false, null is returned', undefined, undefined);
		return null;
	}

	var m_nmLen_i = r_ckNm_s.length;
	var m_eqIx_i = 0;
	while(r_ck_St.charAt(m_eqIx_i) != '=')
	{
		m_eqIx_i = r_ck_St.indexOf(r_ckNm_s, m_eqIx_i);
		if(m_eqIx_i < 0)
		{
			return undefined;
		}

		m_eqIx_i += m_nmLen_i;
		while(r_ck_St.charAt(m_eqIx_i) == " ")
		{	m_eqIx_i++;
		}
	}

	var m_vlEs_s = ydGetVl(r_ck_St, m_eqIx_i);

	if(m_vlEs_s)
	{
		return m_vlEs_s;;
	}
	else
	{
		return undefined;
	}
}	

function ydCkGetFldAll(r_Doc, r_sepNm_s, r_sepFld_s)
{
	var m_cksObject_s;
	var m_fldObject_s = new Object();
	var m_fldObject_Object_s = new Object();
	
	m_cksObject_s = ydCkGet(r_Doc);
	
	if (m_cksObject_s !== undefined)
	{
		for (var b_ckNm_s in m_cksObject_s)
		{
			m_vl_s = m_cksObject_s[b_ckNm_s];
			m_fldObject_s = ydGetFld(m_vl_s, undefined, r_sepNm_s, r_sepFld_s);
			
			m_fldObject_Object_s[b_ckNm_s] = m_fldObject_s;
		}
		return m_fldObject_Object_s;
	}
	return undefined;
}	

function ydCkGetFlds(r_Doc, r_ckNm_s, r_sepNm_s, r_sepFld_s)
{
	var m_ckVl_s = "";
	
	m_ckVl_s = ydCkGet(r_Doc, r_ckNm_s);
	
	return ydGetFld(m_ckVl_s, undefined, r_sepNm_s, r_sepFld_s);
}	

function ydCkGetFldFromAll(r_cksObject_Object_s, r_ck_s, r_fld_s)
{
	var m_vl_s = "";
	var m_ckObject_s = r_cksObject_Object_s[r_ck_s];

	if (m_ckObject_s === undefined)
	{
		return "";
	}
	
	m_vl_s = m_ckObject_s[r_fld_s];
	
	if (m_vl_s === undefined)
	{
		return "";
	}
	
	return m_vl_s;
}	

function ydCkGetNx(r_ck_St, u_bgNm_Arr)
{
	var m_beg_i = u_bgNm_Arr[0];
	var m_eq_i  = 0;
	var m_end_i = 0;
	var m_ckNm_s = "";
	var m_vl_s = "";
	
	while ((m_eq_i = r_ck_St.indexOf("=",m_beg_i)) > -1)
	{
		m_ckNm_s = ydGetNm(r_ck_St, m_eq_i);
		m_vl_s = ydGetVl(r_ck_St, m_eq_i);
		m_beg_i = m_eq_i + 1;

		if(m_vl_s)
		{
			m_beg_i += m_vl_s.length;

			u_bgNm_Arr[0] = m_beg_i;
			u_bgNm_Arr[1] = m_ckNm_s;
			return m_vl_s;
		}
	}

	u_bgNm_Arr[0] = -1;
	u_bgNm_Arr[1] = undefined;
	return undefined;
}	

function ydCkNmExists(r_ck_St, r_ckNm_s, r_beg_i)
{
	if(!r_ckNm_s || !r_ck_St)
	{
		return false;
	}

	var m_ckLen_i = r_ck_St.length;
	var m_nmLen_i = r_ckNm_s.length;
	var m_beg_i = (r_beg_i === undefined)? 0 : r_beg_i;
	
	while(m_beg_i < m_ckLen_i)
	{
		var b_ix0Nm_i = r_ck_St.indexOf(r_ckNm_s, m_beg_i);
		if(b_ix0Nm_i < 0)
		{
			return false;
		}

		var b_after_i = b_ix0Nm_i + m_nmLen_i;
		
		while((b_after_i < m_ckLen_i) && (r_ck_St.charAt(b_after_i) <= " "))
		{	b_after_i++;
		}

		if((b_after_i == m_ckLen_i) || (r_ck_St.charAt(b_after_i) == '=') || (r_ck_St.charAt(b_after_i) == ';'))
		{
			var b_before_i = b_ix0Nm_i - 1;

			while((b_before_i >= m_beg_i) && (r_ck_St.charAt(b_before_i) <= " "))
			{	b_before_i--;
			}

			if((b_before_i < 0) || (r_ck_St.charAt(b_before_i) == ";"))
			{
				return true;
			}
		}

		m_beg_i = b_after_i;
	}

	return false;
}	

function ydCkSet(r_Doc, r_ckNm_s, r_vl_s, r_expir_Date, r_path_s, r_dom_s, r_secure_b, r_maxCkLen_i, r_hdrMx_i, r_minUsedInPath_i, r_calledFrom_s)
{
	var m_vlEs_s = escape (r_vl_s);

	var m_calledFrom_s = 'ydCkSet';
	if(r_calledFrom_s)
	{
		m_calledFrom_s += ' (called from ' + r_calledFrom_s + ')';
	}

	return ydCkSetEs (r_Doc, r_ckNm_s, m_vlEs_s, r_expir_Date, r_path_s, r_dom_s, r_secure_b, r_maxCkLen_i, r_hdrMx_i, r_minUsedInPath_i, m_calledFrom_s);
}

function ydCkSetEs(r_Doc, r_ckNm_s, r_vlEs_s, r_expir_Date, r_path_s, r_dom_s, r_secure_b, r_maxCkLen_i, r_hdrMx_i, r_minUsedInPath_i, r_calledFrom_s)
{
	var m_calledFrom_s = 'ydCkSetEs';
	if(r_calledFrom_s)
	{
		m_calledFrom_s += ' (called from ' + r_calledFrom_s + ')';
	}

	var m_maxCkLen_i = r_maxCkLen_i || g_ydCkMaxUseLen_i;
	var m_ckPrp_St = new String(r_Doc.cookie);
	var m_nmExists_b = ydCkNmExists(m_ckPrp_St, r_ckNm_s);
	if(m_nmExists_b)
	{
		ydCkClear(r_Doc, r_ckNm_s, r_path_s, r_dom_s);
		m_ckPrp_St = new String(r_Doc.cookie);
		m_nmExists_b = ydCkNmExists(m_ckPrp_St, r_ckNm_s);
	}

	var m_buffNeed_i = r_ckNm_s.length + 3 + r_vlEs_s.length;

	if(m_buffNeed_i > m_maxCkLen_i)
	{
		ydCkAlert("ydCkLb.js", m_calledFrom_s, "ERROR 12: The cookie: " + r_ckNm_s + " needs a space of " + m_buffNeed_i + ", that exceeds the maximum length for a simple cookie: " + m_maxCkLen_i + ". Try to use ydCkLgSet in ydCkLgLb.js or ydCkVlSet in ydCkVlLb.js. The null value is returned.", r_vlEs_s, 50);
		return null;
	}

	var m_minUsedInPath_i = ydCkUsedInPath(r_Doc, r_path_s, r_minUsedInPath_i, m_nmExists_b, r_ckNm_s);

	var m_hdrLen_i = m_minUsedInPath_i + m_buffNeed_i;

	var m_hdrMx_i = r_hdrMx_i || g_ydCkHdrMax_i;

	if(m_hdrLen_i > m_hdrMx_i)
	{
		ydCkAlert("ydCkLb.js", m_calledFrom_s, "ERROR 13: The cookie: " + r_ckNm_s + " needs a space of " + m_buffNeed_i + ", to be set in the given path: " + r_path_s + ", that together with a minimum used length of: " + m_minUsedInPath_i + ", exceeds the maximum length for the cookie header: " + m_hdrMx_i + ". Try to use ydCkVlSet in ydCkVlLb.js. The null value is returned.", r_vlEs_s, 50);
		return null;
	}

	if(m_hdrLen_i > g_ydCkMaxPrp_i)
	{
		ydCkAlert("ydCkLb.js", m_calledFrom_s, "ERROR 14: The cookie: " + r_ckNm_s + " needs a space of " + m_buffNeed_i + ", to be set in the given path: " + r_path_s + ", that together with a minimum used length of: " + m_minUsedInPath_i + ", exceeds the maximum length for the document.cookie property: " + g_ydCkMaxPrp_i + ". Try to use another navigator or ydCkVlSet in ydCkVlLb.js. The null value is returned.", r_vlEs_s, 50);
		return null;
	}

	return ydCkSetEsBs (r_Doc, r_ckNm_s, r_vlEs_s, r_expir_Date, r_path_s, r_dom_s, r_secure_b);
}

function ydCkSetEsBs (r_Doc, r_ckNm_s, r_vlEs_s, r_expir_Date, r_path_s, r_dom_s, r_secure_b)
{
	r_path_s = ydCkEndPath(r_path_s);

    var m_ck_s = r_ckNm_s + "=" + r_vlEs_s +
                     ((r_path_s) ? "; path=" + r_path_s : "") +
                     ((r_dom_s) ? "; domain=" + r_dom_s : "") +
                     ((r_secure_b) ? "; secure" : "") +
					 ((r_expir_Date) ? "; expires=" + r_expir_Date.toGMTString() : "") ;
	r_Doc.cookie = m_ck_s;
	return m_ck_s;
}

function ydCkUsedInPath(r_Doc, r_path_s, r_minUsedInPath_i, r_nmExists_b, r_ckNm_s)
{
	var m_minUsedInPath_i = r_minUsedInPath_i? r_minUsedInPath_i : 0;
	if(r_path_s)
	{
		var m_docAbsolute_s = ydCkDocDir(r_Doc);
		if((r_path_s.indexOf(m_docAbsolute_s) != 0) && (m_docAbsolute_s.indexOf(r_path_s) != 0))
		{
			return (m_minUsedInPath_i);
		}
	}

	var m_used_i = r_Doc.cookie.length;
	if(r_nmExists_b)
	{
		m_used_i -= r_ckNm_s.length;
		if(g_ydCkIsMsIe_b)
		{
			m_used_i -= 1;
		}
		else
		{
			m_used_i -= 3;
		}
	}

	if(m_used_i < m_minUsedInPath_i)
	{
		m_used_i = m_minUsedInPath_i;
	}
	return m_used_i;
}

function ydExpDate(r_days_n) 
{
	var ckExp_Date = new Date();
	ckExp_Date.setTime (ckExp_Date.getTime() + (24 * 60 * 60 * 1000)*r_days_n);
	return ckExp_Date
}

function ydGetFld(r_vl_s, r_fldNm_s, r_sepNm_s, r_sepFld_s)
{
	var m_vl_St = new String(r_vl_s);
	
	var m_sepNm_s = r_sepNm_s || ":";
	var m_sepFld_s = r_sepFld_s || "|";
	
	var m_beg_i = 0;
	var m_sep_i = 0;
	var m_end_i = 0;
	var m_fldNm_s = "";
	var m_vl_s = "";
	
	if((r_fldNm_s === undefined) && (r_vl_s !== undefined) && (r_vl_s !== null))
	{
		var b_fldObject_s = new Object();
		while ((m_sep_i = m_vl_St.indexOf(m_sepNm_s,m_beg_i)) > -1)
		{
			m_fldNm_s = ydGetNm(m_vl_St, m_sep_i, m_sepFld_s);
			m_vl_s = ydGetVl(m_vl_St, m_sep_i, m_sepFld_s);
			b_fldObject_s[m_fldNm_s] = m_vl_s;
			
			m_beg_i = m_vl_s.length + m_sep_i + 1;
		}

		return(b_fldObject_s);
	}
	else
	{
		while ((m_sep_i = m_vl_St.indexOf(m_sepNm_s,m_beg_i)) > -1)
		{
			m_fldNm_s = ydGetNm(m_vl_St, m_sep_i, m_sepFld_s);
			if (m_fldNm_s == r_fldNm_s)
			{
				m_vl_s = ydGetVl(m_vl_St, m_sep_i, m_sepFld_s);
				return m_vl_s;
			}
			m_beg_i = m_sep_i + 1;
		}
	}

	return undefined;
}	

function ydGetNm(r_ck_St, r_sep_i, r_sep_s)
{
	var m_sep_s = r_sep_s || ";";
	var m_beg_i = 0;
	var m_end_i = r_sep_i - 1;
	var m_nm_s = "";

	if(r_sep_i >= r_ck_St.length || r_sep_i < 0)
	{
		return "";
	}
	
	while ((m_end_i >= 0) && (r_ck_St.charAt(m_end_i) <= " "))
	{
		m_end_i--;
	}

	if(m_end_i < 0)
	{
		return "";
	}

	m_beg_i = m_end_i;
	while (m_beg_i >= 0)
	{
		var b_ch_s = r_ck_St.charAt(m_beg_i);
		if(b_ch_s > " " && b_ch_s != m_sep_s)
		{
			m_beg_i--;
		}
		else
		{
			break;
		}
	}

	m_beg_i++;
	
	m_nm_s = r_ck_St.substring(m_beg_i, m_end_i+1);
	return m_nm_s;
}	

function ydGetVl(r_ck_St, r_sep_i, r_lim_s)
{
	var m_beg_i = r_sep_i + 1;
	var m_end_i = -1;
	var m_vl_s = "";
	var m_ln_i = r_ck_St.length;
	var m_lim1_s = ";";
	var m_lim2_s = ",";
	
	if (r_lim_s !== undefined )
	{
		m_lim1_s = r_lim_s;
	}
	
	while ((m_beg_i < m_ln_i) && (r_ck_St.charAt(m_beg_i) <= " "))
	{
		m_beg_i++;
	}

	m_end_i = r_ck_St.indexOf(m_lim1_s, m_beg_i);
	if(m_end_i < 0)
	{
		m_end_i = m_ln_i;
	}

	if (r_lim_s === undefined )
	{
		var b_end2_i = r_ck_St.indexOf(m_lim2_s, m_beg_i);
		if(b_end2_i < 0)
		{
			b_end2_i = m_ln_i;
		}
		if(b_end2_i < m_end_i)
		{
			m_end_i = b_end2_i;
		}
	}

	while ((m_end_i <= m_ln_i) && (m_end_i >= m_beg_i) && (r_ck_St.charAt(m_end_i - 1) <= " "))
	{
		m_end_i--;
	}
	
	if (m_beg_i >= m_end_i)
	{
		return "";
	}
	else
	{
		m_vl_s = r_ck_St.substring(m_beg_i, m_end_i);
		return m_vl_s;
	}	
}

function ydSsAdd(r_url_s, r_fldNm_s, r_vl_s)
{
	if(r_vl_s != null)
	{
		if(r_url_s.indexOf("?") < 0)
		{
			r_url_s += "?";
		}
		else
		{
			r_url_s += "&";
		}
		r_url_s += r_fldNm_s + "=" + r_vl_s;
	}
	return r_url_s;
}

function ydSsCopy(r_Doc, r_url_s, r_fldNm_s, r_sepNm_s, r_sepFld_s)
{
	var m_vl_s = ydSsGet(r_Doc, r_fldNm_s, r_sepNm_s, r_sepFld_s)
	return ydSsAdd(r_url_s, r_fldNm_s, m_vl_s)
}

function ydSsGet(r_Doc, r_fldNm_s, r_sepNm_s, r_sepFld_s)
{
	var m_qs_s = unescape(r_Doc.location.search.substring(1));
	var m_beg_i = 0;
	var m_eq_i  = 0;
	var m_end_i = 0;
	var m_fldNm_s = "";
	var m_vl_s = "";
	
	var m_sepNm_s = r_sepNm_s || "=";
	var m_sepFld_s = r_sepFld_s || "&";

	if ((m_qs_s === undefined) || (m_qs_s == ""))
	{
		return undefined;
	}

	return ydGetFld(m_qs_s, r_fldNm_s, m_sepNm_s, m_sepFld_s);
}


//. ydLgFrm.js Copyright infodigital S.L.
var ydLgFrmVer="20100205";

var g_ckINm_s = "ydCkIni";
var g_ckIVlYdAss_s = ydCkGetFlds(document, g_ckINm_s);

var g_s_s = g_ckIVlYdAss_s? g_ckIVlYdAss_s["st"] : "0.0";

function ydDrawChgPw(r_Doc)
{
	r_Doc.write('<table id="T4-2" width="200" border="0" align="center" cellpadding="0" cellspacing="0"><TR><td height="1" colspan="4" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td></TR><TR><td width="1" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td>										<TD>&nbsp;</TD>');
	
	if (!navigator.cookieEnabled)
	{
		ydDrawNotCk(r_Doc);
	}
	else
	{
		if ( !g_s_s || g_s_s < "2.0")
		{
			r_Doc.write('<td width="195" height="25" align="center" class="titulo_04">' + g_ydLgFrmnoclient_s + '</td>');
			r_Doc.write('<td width="1"  class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td></tr><tr><td height="1" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td><TD>&nbsp;</TD>');
			r_Doc.write('<td>' + g_ydLgFrmnoclientexp_s + '<p align="center"><a class="titulo_04" href="../../ps/es/solicitud_nuevocliente.html?fromAc=yes">' + g_ydLgFrmnoclientic_s + '</a><br><br></p></td><td height="1" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td>');
		}
		else
		{
			r_Doc.write('<td width="195" height="25" align="center" class="titulo_04">' + g_ydLgFrmchgpwd_s +  '</td>');
			r_Doc.write('<td width="1"  class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td></tr><tr><td height="1" class="fondoazul_05"><img	 src="../../yimg/px.gif" width="1" height="1"></td><TD>&nbsp;</TD>');
			r_Doc.write('<td>'+ g_ydLgFrmpwdexp_s + '<p align="center"><a class="titulo_04" href="chnPw_pses.html">'+ g_ydLgFrmchgpwd_s + '</a><br><br></p></td><td height="1" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td>');
						
		}
	}
	r_Doc.write('</tr><tr><td height="1" colspan="4" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td></tr></table>');
}

function ydDrawLgInpOrCa(r_Doc)
{
	r_Doc.write('<table id="T4-3" width="200" border="0" align="center" cellpadding="0" cellspacing="0"> <tr><td height="1" colspan="4" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td></tr> <tr><td width="1" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td>											<TD>&nbsp;</TD>');
	if (!navigator.cookieEnabled)
	{
		ydDrawNotCk(r_Doc);
	}
	else
	{
		if ( !g_s_s || g_s_s < "2.0")
		{
			r_Doc.write('<td width="195" height="25" align="center" class="titulo_04">' + g_ydLgFrmic2_s + '</td>');
			r_Doc.write('<td width="1"  class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td></tr> <tr>	<td height="1" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td>	<TD>&nbsp;</TD>');
			r_Doc.write('<td>' + g_ydLgFrmexp_s + '<p align="center"><a class="titulo_04" href="inCa_pses.html">' + g_ydLgFrmic_s + '</a><br><br></p></td>');
		}
		else
		{
			r_Doc.write('<td width="195" height="25" align="center" class="titulo_04">&nbsp;' + g_ydLgFrmuc_s +  '</td>');
			r_Doc.write('<td width="1"  class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td></tr> <tr>	<td height="1" class="fondoazul_05"><img	 src="../../yimg/px.gif" width="1" height="1"></td>	<TD>&nbsp;</TD>');
			r_Doc.write('<td><FORM NAME="LGNFRM" onSubmit="return false">' +
			'<TABLE ID="4-3-1"><TR><TD> ' + g_ydLgFrmcc_s + '</TD> <TD><INPUT TYPE="TEXT" AUTOCOMPLETE="OFF" SIZE="10" NAME="IdClnt"></TD><TR><TR><TD>' + g_ydLgFrmpw_s + '</TD><TD><INPUT TYPE="PASSWORD" SIZE="10" NAME="PwClnt"></TD></TR><TR><TD colspan="2" align="center"><a href="#" onClick="ydEnterRs(document);return false;"><img src="../../yimg/' + g_ydLgFrmLn_s + '/bot_entrar.gif" width="55" height="15" border="0"></a></TD></TR></TABLE></FORM></td>');
			r_Doc.write('<SCRIPT language="JavaScript" type="text/JavaScript">	document.LGNFRM.IdClnt.focus();	document.LGNFRM.IdClnt.select(); </SCRIPT>');

			var b_si_s = ydSsGet(r_Doc, g_si_nm_s);
			var b_siCk_s = g_ckIVlYdAss_s[g_si_nm_s];

			if((b_si_s == b_siCk_s) && g_ckIVlYdAss_s[g_id_nm_s])
			{
				r_Doc.forms["LGNFRM"].IdClnt.value = g_ckIVlYdAss_s[g_id_nm_s];
			}
		}
	}
	r_Doc.write('<td height="1" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td>					</tr> <tr><td height="1" colspan="4" class="fondoazul_05"><img src="../../yimg/px.gif" width="1" height="1"></td>					</tr></table>');
}

function ydDrawLgInp(r_Doc)
{
	r_Doc.write('<FORM NAME="LGNFRM" onSubmit="return false"><TABLE BORDER=0>');
	if (!navigator.cookieEnabled)
	{
		ydDrawNotCk(r_Doc);
	}
	else
	{
		if (!g_s_s || g_s_s < "1.5")
		{
			r_Doc.write('<TR><TD>' + g_ydLgFrmsc_s + '</TD></TR>');
		}
		else if (g_s_s < "2.0")
		{
			r_Doc.write('<TR><TD>' + g_ydLgFrmic_s + '</TD></TR>');
		}
		else
		{
			r_Doc.write('<TR><TD>' + g_ydLgFrmcc_s + '</TD><TD><INPUT TYPE="TEXT" AUTOCOMPLETE="OFF" SIZE="10" NAME="IdClnt"></TD></TR>');
			r_Doc.write('<TR><TD>' + g_ydLgFrmpw_s + '</TD><TD><INPUT TYPE="PASSWORD" SIZE="10" NAME="PwClnt"></TD></TR>');
		}

		r_Doc.write('<TR><TD COLSPAN=2 ALIGN="CENTER"><a href="#" onClick="ydEnterRs(document);return false"><img src="../../yimg/' + g_ydLgFrmLn_s + '/bot_entrar.gif" width="55" height="15" border="0"></a></TD></TR>');
		
		if ( g_s_s  && (!(g_s_s < "2.0")))
		{
			r_Doc.write('<SCRIPT language="JavaScript" type="text/JavaScript">	document.LGNFRM.IdClnt.focus();	document.LGNFRM.IdClnt.select(); </SCRIPT>');
		}
			
	}
	r_Doc.write('</TABLE></FORM>');
}

function ydDrawNoAut(r_Doc)
{
	if (!g_s_s || g_s_s < "2.0")
	{
		r_Doc.write('<TABLE ID="TNoCli" border="0" cellspacing="0" cellpadding="0">');
		r_Doc.write('<TR><TD style="background-image: url(../../yimg/separador_04.gif);" height="1" alt="separador"><img src="../../yimg/px.gif" alt="relleno" width="1" height="1"></TD></TR>');
		r_Doc.write('<TR><TD><img src="../../yimg/px.gif" alt="relleno" width="1" height="4"></TD></TR>');						
		r_Doc.write('<TR><TD width="160" align="center" class="titulo_03"> <div align="left">&nbsp;&nbsp;<img src="../../yimg/star.gif" width="11" height="11" alt="estrella adorno"> No Clientes </div></TD></TR>');
		r_Doc.write('<TR><TD><img src="../../yimg/px.gif" alt="relleno" width="1" height="4"></TD></TR>');						
		r_Doc.write('<TR><TD>&iquest;A&uacute;n no eres cliente? Rellena  nuestro <a href="solicitud_nuevocliente.html">formulario de alta de clientes</a> &gt;&gt; (Diana Casado S.L. es una empresa mayorista que s&oacute;lo sirve a clientes que tengan uno o mas establecimientos.)</TD></TR>');
		r_Doc.write('<TR><TD><img src="../../yimg/px.gif" alt="relleno" width="1" height="8"></TD></TR>');
		r_Doc.write('</TABLE>');
	}
}

function ydDrawNotCk(r_Doc)
{
	r_Doc.write('<TR><TD>' + g_ydLgFrmnc_s + '</TD></TR>');
}

function ydEnterRs(r_Doc, r_Form)
{
	var m_prvSiCk_s = null;
	if(g_si_nm_s && g_ckIVlYdAss_s && g_ckIVlYdAss_s[g_si_nm_s])
	{
		m_prvSiCk_s = g_ckIVlYdAss_s[g_si_nm_s];
	}

	var m_Date = new Date(2007, 3, 21);
	var m_date_s = "" + Number(m_Date);
	if(m_prvSiCk_s && m_prvSiCk_s < "1177106400000")
	{
		var b_cklHNm_s = "ydCkHOrd";
		var b_docPath_s = ydCkDocDir(r_Doc);
		var b_sep_s = b_docPath_s.charAt(b_docPath_s.length - 1);

		var b_rs_RegExp = new RegExp("\\" + b_sep_s + "rs" + "\\" + b_sep_s);
		var b_pses_RegExp = new RegExp("\\" + b_sep_s + "ps" + "\\" + b_sep_s + "es" + "\\" + b_sep_s);

		var b_rsIx_i = b_docPath_s.search(b_rs_RegExp);
		if (b_rsIx_i < 0)
		{
			var b_psesIx_i = b_docPath_s.search(b_pses_RegExp);
		}

		var b_parent_s = "/";
		if(b_rsIx_i > 0)
		{
			b_parent_s = b_docPath_s.substring(0, b_rsIx_i +1);
		}
		else if(b_psesIx_i > 0)
		{
			b_parent_s = b_docPath_s.substring(0, b_psesIx_i +1);
		}

		var b_ckPath_s = b_parent_s + "rs" + b_sep_s + "ckh" + b_sep_s;

		if(g_ydCkIsMsIe_b)
		{
			var b_ckName_s = b_cklHNm_s + '_+B-';
			var b_ck_s = ydCkClear(r_Doc, b_ckName_s, b_ckPath_s);
		}

		b_ckName_s = b_cklHNm_s + '_+C-';
		b_ck_s = ydCkClear(r_Doc, b_ckName_s, b_ckPath_s);
		b_ckName_s = b_cklHNm_s + '_+D-';
		b_ck_s = ydCkClear(r_Doc, b_ckName_s, b_ckPath_s);
		b_ckName_s = b_cklHNm_s + '_+E-';
		b_ck_s = ydCkClear(r_Doc, b_ckName_s, b_ckPath_s);
		b_ckName_s = b_cklHNm_s + '_+F-';
		b_ck_s = ydCkClear(r_Doc, b_ckName_s, b_ckPath_s);
		b_ckName_s = b_cklHNm_s + '_+G-';
		b_ck_s = ydCkClear(r_Doc, b_ckName_s, b_ckPath_s);
	}
	
	if(!r_Form)
	{
		r_Form = r_Doc.LGNFRM;
	}
	var m_lctn_s = r_Doc.location.toString();
	var m_pw_s = "";
	var m_ur_s = "accesoClientes_";
	var m_url_s = "";
	if(m_lctn_s.indexOf(m_ur_s) < 0)
	{
		m_url_s = "../../rs/ckl/";
		if (!g_ckIVlYdAss_s)
		{
			g_ckIVlYdAss_s = ydCkGetFlds(r_Doc, g_ckINm_s);
		}
		g_ckIVlYdAss_s = g_ckIVlYdAss_s || new YdAss();
		g_ckIVlYdAss_s[g_tr_nm_s]  = 0;
		var m_vl_s = ydCkFormat(g_ckIVlYdAss_s);
		ydCkSet(r_Doc, g_ckINm_s, m_vl_s, ydExpDate(3000),"/");		
	}
	m_url_s += m_ur_s + g_ydLgFrmPr_s  + g_ydLgFrmLn_s + ".html";

	if (r_Form && r_Form.IdClnt)
	{
		if (r_Form.IdClnt.value.length > 0)
		{	
			if (!g_ckIVlYdAss_s)
			{
				g_ckIVlYdAss_s = ydCkGetFlds(r_Doc, g_ckINm_s);				
			}
						
			var m_pwH_s = "";
			m_pwH_s = ydHc(r_Form.PwClnt.value, 13, 37, 31);
			g_ckIVlYdAss_s[g_pw_nm_s] = m_pwH_s;

			var m_date_s = "" + Number(new Date());
			g_ckIVlYdAss_s[g_id_nm_s]  = r_Form.IdClnt.value;
			g_ckIVlYdAss_s[g_ln_nm_s]  = g_ydLgFrmLn_s;
			g_ckIVlYdAss_s[g_pr_nm_s]  = g_ydLgFrmPr_s;
			g_ckIVlYdAss_s[g_si_nm_s]  = m_date_s;

			var m_vl_s = ydCkFormat(g_ckIVlYdAss_s);
			ydCkSet(r_Doc, g_ckINm_s, m_vl_s, ydExpDate(3000),"/");

			m_url_s += "?"+ g_ln_nm_s + "=" + g_ydLgFrmLn_s + "&"+ g_pr_nm_s + "=" + g_ydLgFrmPr_s + "&" + g_si_nm_s + "=" + m_date_s;
			if(m_lctn_s.indexOf(m_ur_s) < 0)
			{
				r_Form.reset();
				var b_nw_Window = window.open(m_url_s, "ydOrdDc", "width=800, height=600, resizable=yes, scrollbars=yes, status=yes");	
				if (b_nw_Window && b_nw_Window.focus) 
				{
					b_nw_Window.focus();
				}
				return false;
			}
			else
			{
				r_Doc.location=m_url_s;
			}
		}
		else if(m_lctn_s.indexOf(m_ur_s) >= 0)
		{
			alert(g_ydLgFrmppe_s);
			if (r_Form.IdClnt.value.length < 1)
			{
				r_Form.IdClnt.focus();
				r_Form.IdClnt.select();
			}
			else
			{
				r_Form.PwClnt.focus();
				r_Form.PwClnt.select();
			}

			return false;
		}
	}

	var b_nw_Window = window.open(m_url_s, "ydOrdDc", "width=800, height=600, resizable=yes, scrollbars=yes, status=yes");
	if (b_nw_Window && b_nw_Window.focus) 
	{
		b_nw_Window.focus();
	}
	return false;
}

//. ydLgFrm_pses.js Copyright infodigital S.L.
var ydLgFrm_psesVer="20070322.1";

var g_ydLgFrmLn_s = "es";
var g_ydLgFrmPr_s = "ps";

var g_ydLgFrmcai_s = "Clientes con código de autorización introducido";
var g_ydLgFrmcasi_s = "Clientes con código de autorización sin introducir";
var g_ydLgFrmcc_s = "Código de cliente (con ceros iniciales):";
var g_ydLgFrmchgpwd_s = "Cambiar Contraseña";
var g_ydLgFrmen_s = "Entrar";
var g_ydLgFrmfpw_s = "&iquest;Olvidaste tu contrase&ntilde;a?";
var g_ydLgFmrfpwexp_s = "Si has olvidado tu contraseña, puedes crear una a partir de tu clave de acceso";
var g_ydLgFrmfnewpw_s = "Establecer nueva contraseña";
var g_ydLgFrmic_s = "Introducir el código de autorización";
var g_ydLgFrmic2_s = "Introducir el c&oacute;digo de autorizaci&oacute;n enviado por Diana Casado"
var g_ydLgFrmnc_s = "Para entrar en el área de clientes es necesario tener habilitados los cookies. Por favor, si necesitas entrar en el área de clientes, habilítalos en el navegador.";
var g_ydLgFrmoc_s = "&iquest;Olvidaste tu contrase&ntilde;a?";
var g_ydLgFrmppe_s = "Para poder entrar en el area cliente es obligatorio dar un código de cliente y contraseña.";
var g_ydLgFrmexp_s = "Para poder realizar pedidos, y establecer tu contraseña personal. Es necesario introducir el C&oacute;digo de autorización que te ha facilitado Diana Casado."
var g_ydLgFrmpw_s = "Contraseña:";
var g_ydLgFrmpwdexp_s = "Puedes cambiar la contraseña que tienes registrada";
var g_ydLgFrmsc_s = "Obtener o introducir mi código de autorización";
var g_ydLgFrmuc_s = "Introducir c&oacute;digo de cliente y contraseña";	
var g_ydLgFrmnoclientic_s = " Solicitud de nuevo cliente ";
var g_ydLgFrmnoclient_s = "&iquest;A&uacute;n no eres cliente?";
var g_ydLgFrmnoclientexp_s = "Si todav&iacute;a no eres cliente, hazte ahora y podr&aacute;s beneficiarte de todas nuestras ventajas.";
var g_ydLgFrmsinca_s = "Clientes sin c&oacute;digo de autorizaci&oacute;n";
var g_ydLgFrmsincaexp_s = "Si ya eres cliente nuestro pero todav&iacute;a no tienes tu c&oacute;digo de autorizaci&oacute;n o lo has perdido, debes solicitarlas para poder hacer tus pedidos a trav&eacute;s de internet.";
var g_ydLgFrmsca_s = "Solicitar mi c&oacute;digo de autorizaci&oacute;n";


var ydMmLbVer="20060920"; // version of ydMmLb.js, with some image related infodigital and Macromedia DreamWeaver functions. See also ydMmRsLb.js.

function ydLdImg(r_imgNm_s, r_imgUrl_s)
{
	var m_Img = document.images.namedItem(r_imgNm_s);
	if(m_Img && r_imgUrl_s)
	{	m_Img.src=r_imgUrl_s;
	}
}
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}


var ydStLbVer="20070326.1"; //version of ydStLb.js, String Library
//. Copyright (c) Francisco Guardiola (francisco@guardiola.net). All rights reserved.
//. Released under the GPL license (http://www.gnu.org/copyleft/gpl.html).


if(typeof g_ydMsgAlert_s == 'undefined')
{
	var g_ydMsgAlert_s = "";
}

function YdAss()
{
	var m_argLen_i = arguments.length;
	if(m_argLen_i > 0)
	{
		for(var b_i = 0; b_i < m_argLen_i; b_i++)
		{
			var b_arg_s = arguments[b_i];
			var b_namValArr_s = b_arg_s.split(":");
			var b_nam_s = b_namValArr_s[0];
			b_nam_s = ydTrm(b_nam_s);
			if(b_nam_s.length > 0)
			{
				if(b_namValArr_s.length > 1)
				{
					this[b_nam_s] = b_namValArr_s[1];
				}
				else
				{
					this[b_nam_s] = null;
				}
			}
		}
	}
}


function ydFillL(r_s, r_len_i, r_fill_s)
{
	var m_s = "" + r_s;
	var m_len_i = r_len_i? r_len_i: 0;
	var m_fill_s = (r_fill_s === undefined)? " " : r_fill_s;
	
	if(m_fill_s == " ")
	{
		m_fill_s = "                ";
	}
	else if(m_fill_s == "0")
	{
		m_fill_s = "0000000000000000";
	}
	else if(m_fill_s == "-")
	{
		m_fill_s = "----------------";
	}
	else if(m_fill_s == "*")
	{
		m_fill_s = "****************";
	}
	
	var m_penLn_i = m_len_i - m_s.length;
	if(m_penLn_i < 1)
	{
		return m_s;
	}
	
	var m_fillLn_i = m_fill_s.length;
	if(m_penLn_i <= m_fillLn_i)
	{
		return m_fill_s.substring(0, m_penLn_i) + r_s;
	}
	else
	{
		return ydFillL(m_s, m_len_i, m_fill_s + m_fill_s);
	}
}

function ydSize(r_Obj)
{
	var m_q_i = 0;
	for (var m_p in r_Obj)
	{	
		m_q_i++;
	}	
	return m_q_i;	
}

function ydSplitQuoted(r_in_s, r_delim_s, r_trim_b, r_quote_s)
{
	if(r_in_s === undefined || r_in_s === null)
	{
		g_ydMsgAlert_s = 'From ydSplitQouted in ydStLb.js, error, the r_in_s is: ' + r_in_s;
		if(typeof g_ydMsgIntInh_b == "undefined" || !g_ydMsgIntInh_b)
		{	alert(g_ydMsgAlert_s);
		}
		return null;
	}

	if(r_delim_s === undefined || r_delim_s === null || r_delim_s == "")
	{
		g_ydMsgAlert_s = 'From ydSplitQouted in ydStLb.js, error, the r_delim_s is invalid: ' + r_delim_s;
		if(typeof g_ydMsgIntInh_b == "undefined" || !g_ydMsgIntInh_b)
		{	alert(g_ydMsgAlert_s);
		}
		return null;
	}

	var m_trim_b = r_trim_b === undefined? true : r_trim_b;
	var m_qoute_s = r_quote_s === undefined? "\"" : r_quote_s;

	var m_outArr_s = new Array();

	var  m_pending_St = new String(r_in_s);
	while(true)
	{
		m_pending_St = ydTrmL(m_pending_St);
		if(m_pending_St.length == 0)
		{
			break;
		}
		
		var b_delimIx_i = m_pending_St.indexOf(r_delim_s);
		var b_quoteIx_i = m_pending_St.indexOf(m_qoute_s);

		if(b_delimIx_i < 0)
		{
			b_delimIx_i = m_pending_St.length;
		}

		while(b_quoteIx_i >= 0 && b_quoteIx_i < b_delimIx_i)
		{
			var b_openQuote_i = b_quoteIx_i;
			b_quoteIx_i = m_pending_St.indexOf(m_qoute_s, b_quoteIx_i + 1);

			if(b_quoteIx_i < 0)
			{
				var b_contextLen_i = (m_pending_St.length - b_openQuote_i) > 30? 30 : (m_pending_St.length - b_openQuote_i);
				g_ydMsgAlert_s = 'From ydSplitQouted in ydStLb.js, error, pending quote starting at: ' + m_pending_St.substring(b_openQuote_i, b_openQuote_i + b_contextLen_i) + ' ... does not have a clossing quote';
				if(typeof g_ydMsgIntInh_b == "undefined" || !g_ydMsgIntInh_b)
				{	alert(g_ydMsgAlert_s);
				}
				return null;
			}
			else
			{
				var b_delimIx_i = m_pending_St.indexOf(r_delim_s, b_quoteIx_i + 1);
				var b_quoteIx_i = m_pending_St.indexOf(m_qoute_s, b_quoteIx_i + 1);

				if(b_delimIx_i < 0)
				{
					b_delimIx_i = m_pending_St.length;
				}
			}
		}

		var b_val_s = m_pending_St.substring(0, b_delimIx_i);
		if(m_trim_b)
		{
			b_val_s = ydTrmR(b_val_s);
		}
		m_outArr_s.push(b_val_s);
		if(b_delimIx_i < m_pending_St.length)
		{
			m_pending_St = m_pending_St.substring(b_delimIx_i + 1);
		}
		else
		{
			break;
		}
	}

	return m_outArr_s;
}

function ydStAppend(r_val_s)
{
	this.m_val_s += r_val_s;
	return this;
}

function ydStGet()
{
	return this.m_val_s;
}

function ydStSet(r_val_s)
{
	this.m_val_s = "" + r_val_s;
	return this;
}


function ydStToString()
{
	return this.m_val_s;
}

function YdSt(r_val_s)
{
	if(typeof(r_val_s) == "undefined")
	{
		this.m_val_s = "";
	}
	else
	{
		this.m_val_s = "" + r_val_s;
	}

	this.append = ydStAppend;
	this.get = ydStGet;
	this.set = ydStSet;
	this.toString = ydStToString;
}



function ydToString(r_Obj, r_sp_s, r_nm_s, r_objOrArr_s)
{
	var m_sp_s = r_sp_s || "; ";
	var m_nm_s = r_nm_s || " = ";
	var m_objOrArr_s = (r_objOrArr_s === undefined? "-" : r_objOrArr_s);
	var m_frst_b = true;
	var m_ret_s = "";
	var m_val_s = "";
	var m_Obj = null;
	var m_typeof_s = null;

	if (arguments.length == 0)
	{
		m_Obj = this;
	}
	else
	{
		m_Obj = r_Obj;
	}

	if(m_Obj === undefined)
	{
		return "undefined";
	}
	else if(m_Obj === null)
	{
		return "null";
	}

	m_typeof_s = typeof(m_Obj);
	if((m_typeof_s == "number") && (isNaN(m_Obj)))
	{
		return "NaN";
	}
		
	if(m_typeof_s != "object")
	{
		return m_Obj.toString();
	}

	var m_isArr_b = m_Obj instanceof Array;
	for (var b_propNm_s in m_Obj)
	{
	 	m_prp_Obj = m_Obj[b_propNm_s];
		m_typeof_s = typeof(m_prp_Obj);

		if((m_typeof_s != "function") && !(m_isArr_b && m_prp_Obj === undefined))
		{
			if(m_frst_b)
			{
				m_frst_b = false;
			}
			else
			{
				m_ret_s += m_sp_s;
			}

			m_ret_s += b_propNm_s;
			if(m_objOrArr_s)
			{
				if(m_prp_Obj instanceof Array)
				{
					m_ret_s += m_objOrArr_s + "array" + m_nm_s + "[";
					m_ret_s += ydToString(m_prp_Obj, r_sp_s, r_nm_s, r_objOrArr_s);
					m_ret_s += "]"
				}
				else if((m_typeof_s == "object") && (m_prp_Obj !== null))
				{
					m_ret_s += m_objOrArr_s + m_typeof_s + m_nm_s + "{";
					m_ret_s += ydToString(m_prp_Obj, r_sp_s, r_nm_s, r_objOrArr_s);
					m_ret_s += "}"
				}
				else
				{
					m_ret_s += m_nm_s + ydToString(m_prp_Obj, r_sp_s, r_nm_s, r_objOrArr_s);
				}
				
			}
			else
			{
				m_ret_s += m_nm_s + ydToString(m_prp_Obj, r_sp_s, r_nm_s, r_objOrArr_s);
			}
		}
	}
	return m_ret_s;
}

function ydTrm(r_s)
{
	return (""+r_s).replace(/(^\s*)|(\s*$)/g,"");
}

function ydTrmL(r_s)
{
	return (""+r_s).replace(/^\s*/g,"");
}

function ydTrmR(r_s)
{
	return (""+r_s).replace(/\s*$/g,"");
}


var ydUthLbVer="20040910.1"; // Version of ydUtLb.js, Utility hash libary.
//. Copyright (c) Francisco Guardiola (francisco@guardiola.net). All rights reserved.
//. Released under the GPL license (http://www.gnu.org/copyleft/gpl.html).


function ydHa(r_s, r_minLen_i, r_shif_i)
{
	var m_St = new String(r_s);
	if (r_s === undefined || m_St.length == 0)
	{
		m_St = new String("_");
	}
	var m_sLen_i = m_St.length;
	
	var m_minLen_i = 0;
	if (r_minLen_i !== undefined)
	{
		m_minLen_i = r_minLen_i;
	}

	var m_shif_i = 31;
	if (r_shif_i !== undefined)
	{
		m_shif_i = r_shif_i;
	}
	
	var m_shifLen_i = m_shif_i + m_sLen_i;

	if(m_sLen_i < m_minLen_i)
	{
		var b_c_St = new String("abcdefghijklmnopqrstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZab");
		var b_dif_i = m_minLen_i - m_sLen_i;
		var b_new_i = -1;
		var b_s = "$";
		for(b_i = 0; b_i < b_dif_i; b_i++)
		{
			var b_new_i = 0x3f & (m_shifLen_i + b_i + m_St.charCodeAt(b_i));
			b_s = m_St.toString() + b_c_St.charAt(b_new_i);
			m_St = new String(b_s);
		}
	}

	return m_St.toString();
}

function ydHc(r_s, r_minLen_i, r_mult_i, r_hInit_i, r_mask_i)
{
	var m_St = new String(r_s);
	if (r_s === undefined || m_St.length == 0)
	{
		m_St = new String("_");
	}
	var m_sLen_i = m_St.length;
	
	var m_minLen_i = 0;
	if (r_minLen_i !== undefined)
	{
		m_minLen_i = r_minLen_i;
	}

	var m_mult_i = 31;
	if (r_mult_i !== undefined)
	{
		m_mult_i = r_mult_i;
	}

	var m_h_i = 0;
	if (r_hInit_i !== undefined)
	{
		m_h_i = r_hInit_i;
	}

	var m_mask_i = 0xffffffff;
	if (r_mask_i !== undefined)
	{
		m_mask_i = r_mask_i;
	}

	if(m_sLen_i < m_minLen_i)
	{
		m_St = new String(ydHa(m_St.toString(),m_minLen_i, m_mult_i));
		m_sLen_i = m_minLen_i;
	}

	for(b_i = 0; b_i < m_sLen_i; b_i++)
	{
		m_h_i = m_mask_i & (m_mult_i * m_h_i + m_St.charCodeAt(b_i));
	}
	
	return m_h_i;
}


var ydWindowLbVer="20071120"; //version of ydWindowLb.js with functions related with the document.window object.
//. Copyright (c) Francisco Guardiola (francisco@guardiola.net). All rights reserved.
//. Released under the GPL license (http://www.gnu.org/copyleft/gpl.html).



var g_ydPop_Window;

function ydOpenPopup(r_ulr_s, r_winNam_s, r_width_i, r_height_i, r_scrolBarYesNo_s, r_resizableYesNo_s)
{
	if (g_ydPop_Window)
	{
		g_ydPop_Window.close();
	}

	var m_scroll_s = r_scrolBarYesNo_s || "yes";
	var m_resize_s = r_resizableYesNo_s || "yes";
	g_ydPop_Window=window.open(r_ulr_s, r_winNam_s, 'width='+r_width_i+', height='+r_height_i+', scrollbars='+m_scroll_s+', location=no, menubar=no, directories=no, toolbar=no, resizable='+m_resize_s+', status=no');
	   
	if(g_ydPop_Window && g_ydPop_Window.focus) g_ydPop_Window.focus();
}


function ydShowPopUp(r_Doc, r_url_s, r_winNam_s, r_width_i, r_height_i, r_scrolBarYesNo_s, r_ckNm_s, r_popId_s, r_maxQ_i, r_expDays_i)
{
	var m_popIdNm_s = "ydPopId";
	var m_popQNm_s = "ydPopQ";

	if (!navigator.cookieEnabled || !r_ckNm_s || !r_popId_s || !r_maxQ_i)
	{
		var b_url_s = ydSsAdd(r_url_s, m_popIdNm_s, "" + r_popId_s);
		ydOpenPopup(b_url_s, r_winNam_s, r_width_i, r_height_i, r_scrolBarYesNo_s);
		return true;
	}
	else
	{
		var m_ckFldsObject_s = ydCkGetFlds(r_Doc, r_ckNm_s);

		if(!m_ckFldsObject_s)
		{
			m_ckFldsObject_s = new Object();
		}

		var b_popId_s = m_ckFldsObject_s[m_popIdNm_s] || "";
		var b_popQ_i = m_ckFldsObject_s[m_popQNm_s] || 0;
		b_popQ_i = parseInt(b_popQ_i);
		if(isNaN(b_popQ_i))
		{
			b_popQ_i = 0;
		}

		if((b_popId_s > r_popId_s) || ((b_popId_s = r_popId_s) && (b_popQ_i >= r_maxQ_i)))
		{
			return false;
		}
		
		b_popQ_i++;
		m_ckFldsObject_s[m_popIdNm_s] = r_popId_s;
		m_ckFldsObject_s[m_popQNm_s] = b_popQ_i;
		var m_vl_s = ydCkFormat(m_ckFldsObject_s);
		
		var m_expDays_i = isNaN(r_expDays_i)? 365: r_expDays_i;
		var m_exp_Date = (m_expDays_i == 0)? undefined :  ydExpDate(m_expDays_i);

		ydCkSet(r_Doc, r_ckNm_s, m_vl_s, m_exp_Date);

		var b_url_s = ydSsAdd(r_url_s, "ydCkNm", r_ckNm_s);
		b_url_s = ydSsAdd(b_url_s, m_popIdNm_s, r_popId_s);
		b_url_s = ydSsAdd(b_url_s, m_popQNm_s, b_popQ_i);
		b_url_s = ydSsAdd(b_url_s, "ydMaxQ", r_maxQ_i);
		ydOpenPopup(b_url_s, r_winNam_s, r_width_i, r_height_i, r_scrolBarYesNo_s);

		return true;
	}
}