i_form_nVersion=1.555;typeof oIGZ=="undefined"&&document&&alert(document.location.pathname+"\n[i_form "+i_form_nVersion+"] Falta 'i_core.js' o 'i_igz.js'.\n Estas libs se requieren desde la v1.324");oIGZ.f_loadLib("i_form",i_form_nVersion);oIGZ.f_require("i_core",0.919);oIGZ.f_require("i_igz",0.747);oIGZ.f_require("i_lang_"+ICore.m_sLang,1.024);g_bShield=1;g_sShieldBGColor="#F0F0F0";g_sShieldInner="<FONT color='#505050' size='2'><B>"+oIGZ.f_langText("TextoShield")+" . . .</B></FONT>";
g_nShieldAlpha=80;g_sTecladoFuncion="ComprobarForm";g_bSelectSubmit=0;g_bControlKeys=1;g_bTextareaTabKey=0;g_bAutofixM=g_bAutoFocus=1;g_bNullAs0M=0;g_bInitEnabler=[0,[0,0,0,0]];g_bSubmitEnabler=[0,[0,0,0,0]];g_bInputMismoNombre=g_bRellenarAll=g_nAllErrors=0;g_sParentNodeVisible="";g_bAvisarCambios=0;g_a_sAvisarCambios=[];g_bAddPrefix=1;g_bClearAutoCheckbox=0;g_bIFile_clearAll=1;g_sFormatoFechaInG=g_sFormatoFechaInF=g_sFormatoFechaInD="";
g_sFormatoFechaShowG=g_sFormatoFechaShowF=g_sFormatoFechaShowD="nDD/nMM/nYYYY";g_sFormatoFechaG=g_sFormatoFechaF=g_sFormatoFechaD="";g_nFormatoFechaF=g_nFormatoFechaD=0;g_nY2K=20;sColorForm="#ffffff";sColorOK="#e7e7e7";sColorActivo="#c4c4c4";sColorError="#ffc4c4";sColorObligatorio="#f0f080";g_a_sNoValidar=[];g_a_sSiValidar=[];g_a_sSiValidarExt=[];a_cValidos_B=[" ","_","Á","É","Í","Ó","Ú","Ñ",",",";",".",":","+","-","@"];a_sError=[];a_vTamanoLimitado=[];a_vValorLimitado=[];g_a_sAutoCorregir=[];
g_ma_sInitValues=[["name","value"],[]];g_bInitValuesSinPrefijo=0;g_sAlertas="";var g_vTimeoutID,g_sColorForm,g_bCamposVacios,g_sErrorFormName,g_sErrorInputName,g_sErrorInput,g_sErrorValue,g_sErrorText,g_sAllErrorsText,g_ErrorTipo,g_oInputError,g_a_vFixAtSubmit=[],g_bSubmitOn=0;
IForm=new function(){this.m_sObj="IForm";this.m_nVersion=i_form_nVersion;this.m_oForm=null;this.m_sInputName="";this.m_maValues=[];this.m_nFile2Text=0;this.bTrimSpaces=this.bForceDateFormat=1;this.m_a_oForms=[];this.f_init=function(a,b,c,d,e){if(IsNull(c))c=1;if(GetType(a)==String)a=IForm.f_getForm(a);InitForm(a,d,e,c,b)};this.f_refresh=function(a){var b,c;if(!a)a=this.m_oForm;for(b=0;b<a.length;b++){c=a[b];IInput.f_refresh(c)}};this.f_clearForm=function(a){if(!a)a=this.m_oForm;for(var b=0;b<a.length;b++)CheckInput(a[b],
0,1)&&a[b].name.indexOf("xbd_")!=0&&IInput.f_clearInputValue(a[b])};this.f_initInputText=function(a){var b;b=String(a.type).toUpperCase();if(b=="TEXT"||b=="TEXTAREA"||b=="PASSWORD"){b=a.getAttribute("_titulo");if(b!=null){oIInput.f_init(a);oIInput.f_restoreTitulo(a)}}};this.f_getForm=function(a){var b=document.forms[a];if(IsNull(b)){b=document.forms;for(var c=[],d=0,e=b.length;d<e;d++)c.push(b[d].name);ErrorJS("No existe el FORM ["+a+"] en la página\nFORMs ("+b.length+")["+c+"]");b=null}return b};
this.f_initInput=function(a){var b,c;b=CheckTipoForm(a.name);c=a.value;if(b=="D"&&!c){c=(b=IInput.f_getDateFormatShow(a))?(new Date).f_drawFormat(b):FechaHoy(0);a.value=c}};this.f_getNewInputValues=function(a){a=GetForm(a);for(var b=0;b<a.length;b++){oInput=a.elements[b];ValidarInput(oInput,1,g_bInitValuesSinPrefijo)&&g_ma_sInitValues.f_maGetRegIf("name",oInput.name)==-1&&g_ma_sInitValues.f_maNewRow([oInput.name,GetInputValue(oInput)])}};this.f_updateInputValue=function(a){if(ValidarInput(a,1,g_bInitValuesSinPrefijo)){var b=
g_ma_sInitValues.f_maGetRegIf("name",a.name);b!=-1?g_ma_sInitValues.f_maSetVal("value",GetInputValue(a),b):g_ma_sInitValues.f_maNewRow([a.name,GetInputValue(a)])}};this.m_sRellenarPre="(";this.m_sRellenarPost=")";this.f_getNombreCampo=function(a,b){var c="";if(a||this.m_sRellenarPre||this.m_sRellenarPost){a=this.f_removeDTO(a);a=RemovePrefijoSufijo(a);if(b){c=["fkid","cd","ds","fc","idx"];for(var d=0;d<c.length;d++)a=a.replace(RegExp("^"+c[d],"i"),"")}c=this.m_sRellenarPre+a;if(this.m_sRellenarPost)c+=
this.m_sRellenarPost}return c};this.f_removeDTO=function(a){if(a){var b=a.indexOf("@");if(b!=-1)a=a.substring(0,b)}return a};this.m_sDebug=""};
oIInput=IInput=new function(){this.m_a_oInputs=[];this.f_clearInputValue=function(a){if(typeof a=="object"){var b;switch(a.type){case "radio":case "checkbox":var c=a.length;if(c)for(i=0;i<c;i++){b=a[i].getAttribute("_noClear");if(!b)a[i].checked=false}else{b=a.getAttribute("_noClear");if(!b)a.checked=false}break;case "button":break;default:(b=a.getAttribute("_noClear"))||SetInputValue(a,"",0)}b||this.f_refresh(a)}};this.f_refresh=function(a){var b=BuscaArray(IForm.m_maValues[0],a.name,1);if(b!=-1&&
a.type!="file"){a=a.value;IForm.m_maValues[1][b]=a;a_vFormValues[b]=a}};this.f_getDateFormat=function(a,b){var c;switch(a.name.substring(0,1).toUpperCase()){case "D":c=b=="IN"?g_sFormatoFechaInD:b=="SHOW"?g_sFormatoFechaShowD:g_sFormatoFechaD;break;case "F":if(b=="IN")DateFormat=g_sFormatoFechaInF;else c=b=="SHOW"?g_sFormatoFechaShowF:g_sFormatoFechaF;break;case "G":c=b=="IN"?g_sFormatoFechaInG:b=="SHOW"?g_sFormatoFechaShowG:g_sFormatoFechaG}return c};this.f_getDateFormatIn=function(a){var b;if(!IsNull(a)){b=
a.getAttribute("_dateFormatIn");if(IsNull(b))b=a.getAttribute("formato_in")}if(IsNull(b))b=this.f_getDateFormat(a,"IN");return b};this.f_getDateFormatShow=function(a){var b;if(!IsNull(a)){b=a.getAttribute("_dateFormatShow");if(IsNull(b))b=a.getAttribute("formato")}if(IsNull(b))b=this.f_getDateFormat(a,"SHOW");return b};this.f_getDateFormatOut=function(a){var b;if(!IsNull(a)){b=a.getAttribute("_dateFormatOut");if(IsNull(b))b=a.getAttribute("formato_out")}if(IsNull(b))b=this.f_getDateFormat(a,"OUT");
return b};this.f_init=function(a){this.m_a_oInputs.push(a);var b=a.getAttribute("_classNameTit");IsNull(b)&&a.setAttribute("_classNameTit",a.className);a.maxLength>0?a.setAttribute("_maxLength",a.maxLength):a.setAttribute("_maxLength",1E4);a.maxLength=1E4;String(a.type).toUpperCase();var c=a.onfocus,d=a.onblur;a.onfocus=function(){oIInput.f_cleanTitulo(this);c&&c()};a.onblur=function(){oIInput.f_restoreTitulo(this);d&&d()}};this.f_cleanTitulo=function(a){if(a.value==a.getAttribute("_titulo")){a.className=
String(a.getAttribute("_classNameTit"));a.maxLength=a.getAttribute("_maxLength");a.value=""}};this.f_restoreTitulo=function(a){if(!a.value){a.className=a.getAttribute("_classNameTit");a.maxLength=1E4;a.value=a.getAttribute("_titulo")}};this.f_restoreAll=function(){for(var a,b=0,c=this.m_a_oInputs.length;b<c;b++){a=this.m_a_oInputs[b];this.f_restoreTitulo(a)}}};
oIFile=IFile=new function(){this.f_clearAll=function(a){if(g_bIFile_clearAll)for(var b,c=0,d=a.length;c<d;c++)(b=a[c])&&b.type&&b.type.toUpperCase()=="FILE"&&this.f_clear(b)};this.f_clear=function(a){var b=document.createElement("INPUT");b.setAttribute("name",a.name);if(!a.id)a.id=a.name;b.id=a.id;b.setAttribute("type",a.type);b.setAttribute("className",a.className);a.disabled&&b.setAttribute("disabled",a.disabled);a.parentNode.replaceChild(b,a)};this.m_sKeyName="[i_form v"+i_form_nVersion+" : IFile] - ";
this.f_drawText=function(a,b,c,d){b=oIGZ.m_sRootPath+"pix/ico_docs/";b+=a.substring(a.lastIndexOf("."),a.length);b+=".gif";a="<TABLE cellpadding=0 cellspacing=0 border=0><TR><TD style='cursor: pointer;'><IMG src='"+b+"' border=0 /></TD><TD>"+a+"</TD>";if(d)a+="<TD onclick='"+d+"'>"+oIGZ.f_drawItem("ICO_DEL")+"</TD>";a+="</TR></TABLE>";return a}};
oISelect=ISelect=new function(){this.m_sKeyName="[i_form v"+i_form_nVersion+" : ISelect] - ";this.f_add=function(a,b,c){b=new Option(b,c);a.options[a.options.length]=b};this.f_del=function(a,b,c,d){b=this.f_indexOf(a,b,c,d);if(b!=-1)a.options[b]=null};this.f_set=function(a,b,c,d){b=this.f_indexOf(a,b,c,d);if(b!=-1)a.selectedIndex=b};this.f_indexOf=function(a,b,c,d){a=a.options;var e=-1,g=a.length,h=e;if(!IsNull(b)&&!IsNull(c))if(IsNull(d)||!d)for(;h==-1&&++e<g;){if(a[e].text==b&&a[e].value==c)h=e}else for(;h==
-1&&++e<g;){if(a[e].text==b||a[e].value==c)h=e}else if(IsNull(b)){if(!IsNull(c))for(;h==-1&&++e<g;)if(a[e].value==c)h=e}else for(;h==-1&&++e<g;)if(a[e].text==b)h=e;return h};this.f_draw=function(a,b,c,d,e,g){return DrawCombo(a,b,c,d,e,g)};this.f_print=function(a,b,c,d,e,g){document.write(this.f_draw(a,b,c,d,e,g))};this.m_a_sSelects=[];this.m_a_oSelects=[];this.f_init=function(){for(var a=null,b=0,c=this.m_a_sSelects.length;b<c;b++){a=GetElement("SPAN_"+this.m_a_sSelects[b]+"_Tools");a!=null&&this.f_initTools(this.m_a_sSelects[b])}};
this.m_oSPAN_Tools=null;this.m_maConfig=[["StyleAdd","StyleEdit","StyleSave","StyleCancel","StyleDel"],["ISELECT_Add","ISELECT_Edit","ISELECT_Save","ISELECT_Cancel","ISELECT_Del"]];this.f_printTools=function(a,b,c,d){document.write(this.f_drawTools(a,b,c,d))};this.f_drawTools=function(a,b,c,d){var e="";if(IsNull(d))d="";if(IsNull(c))ErrorJS(this.m_sKeyName+" f_printTools : No has definido un nombre para el campo descripción del SELECT '"+a+"', no se pintaran SelectTools");else e="<SPAN id='SPAN_"+
a+"_Tools' m_sNameComboTarget='"+a+"' m_sPageXBD='"+b+"' m_sDsColName='"+c+"' m_sIdColName='"+d+"'>"+this.f_drawInnerTools(a)+"</SPAN>";return e};this.f_drawInnerTools=function(a){var b=GetElement("SELECT_"+a);GetElement("SPAN_"+a+"_Tools");var c="";c+="<TABLE cellpadding=1 cellspacing=1 border=0>";c+="<TR>";if(!IsNull(b)&&!IsNull(b.getAttribute("m_bEditing"))&&b.getAttribute("m_bEditing")=="1"?1:0){c+="<TD onclick='oISelect.f_toolsSave(\""+a+"\")' class='"+this.m_maConfig.f_maGetVal("StyleSave",
0)+"'>save</TD>";c+="<TD onclick='oISelect.f_toolsCancel(\""+a+"\")' class='"+this.m_maConfig.f_maGetVal("StyleCancel",0)+"'>cancel</TD>"}else{c+="<TD onclick='oISelect.f_toolsAdd(\""+a+"\")' class='"+this.m_maConfig.f_maGetVal("StyleAdd",0)+"'>add</TD>";if(!IsNull(b)&&b.selectedIndex>0){c+="<TD onclick='oISelect.f_toolsEdit(\""+a+"\")' class='"+this.m_maConfig.f_maGetVal("StyleEdit",0)+"'>edit</TD>";c+="<TD onclick='oISelect.f_toolsDel(\""+a+"\")' class='"+this.m_maConfig.f_maGetVal("StyleDel",0)+
"'>del</TD>"}}c+="</TR>";c+="</TABLE>";return c};this.f_drawBoxTools=function(a){a=this.f_initTools(a);var b="",c="",d=a.style.width,e=a.selectedIndex;if(e>0){b=a[e].text;c=a[e].value}return"<INPUT type='text' name='zzIForm_ISelect_Tools_Name' id='INPUT_IForm_ISelect_Tools_Name' style='width: "+d+";' value='"+b+"' /><INPUT type='hidden' name='zzIForm_ISelect_Tools_Value' id='INPUT_IForm_ISelect_Tools_Value' value='"+c+"' /> "};this.f_initTools=function(a){var b=GetElement("SELECT_"+a);if(IsNull(b))ErrorJS(this.m_sKeyName+
" f_initTools : No existe ningún SELECT con name='"+a+"'");else{if(IsNull(this.m_oSPAN_Tools)){this.m_oSPAN_Tools=document.createElement("SPAN");b.parentNode.insertBefore(this.m_oSPAN_Tools,b)}if(IsNull(b.getAttribute("m_bEditing"))){var c=GetElement("SPAN_"+a+"_Tools");b.setAttribute("m_bEditing",0);var d=b.onchange;b.onchange=function(){oISelect.f_changeTarget(a);IsNull(d)||d()};var e=c.getAttribute("m_sIdColName");if(!e||IsNull(e)){var g=b.name,h=g.indexOf("@");if(h!=-1){e=g.substring(h+1,g.length);
e="id"+e+"@"+e}else ErrorJS(this.m_sKeyName+" f_initTools : El nombre del select "+g+" no contiene @ y no se definio sIdColName en oISelect.f_drawTools("+a+")")}b.setAttribute("m_sIdColName",e);b.setAttribute("m_sDsColName",c.getAttribute("m_sDsColName"));c=c.getAttribute("m_sPageXBD");b.setAttribute("m_sPageXBD",c)}}return b};this.f_toolsRefresh=function(a){GetElement("SPAN_"+a+"_Tools").innerHTML=this.f_drawInnerTools(a)};this.f_toolsAdd=function(a){this.f_initTools(a).selectedIndex=0;this.f_toolsEdit(a)};
this.f_toolsEdit=function(a){var b=this.f_initTools(a);b.setAttribute("m_bEditing",1);b.style.display="none";this.m_oSPAN_Tools.innerHTML=this.f_drawBoxTools(a);this.m_oSPAN_Tools.style.display="block";this.f_toolsRefresh(a)};this.f_toolsSave=function(a){this.f_initTools(a).setAttribute("m_bEditing",0);this.f_toolSendXBD(a,1)};this.f_toolsCancel=function(a){var b=this.f_initTools(a);b.setAttribute("m_bEditing",0);this.m_oSPAN_Tools.style.display="none";this.m_oSPAN_Tools.innerHTML="";b.style.display=
"block";this.f_toolsRefresh(a)};this.f_toolsDel=function(a){this.f_initTools(a).setAttribute("m_bEditing",0);this.m_oSPAN_Tools.innerHTML=this.f_drawBoxTools(a);this.f_toolSendXBD(a,-1)};this.f_changeTarget=function(a){this.f_toolsRefresh(a)};this.f_toolSendXBD=function(a,b){var c=this.f_initTools(a),d=c.getAttribute("m_sPageXBD"),e=c.getAttribute("m_sDsColName"),g=GetElement("INPUT_IForm_ISelect_Tools_Name").value;c=c.getAttribute("m_sIdColName");var h=GetElement("INPUT_IForm_ISelect_Tools_Value").value;
oXBD.f_submit(d+"?xbd_action="+b+"&"+e+"="+g+"&"+c+"="+h,function(){})};oIGZ.m_a_sStartUps.push("oISelect.f_init()")};var g_oOnErrorEvent=window.onerror,oUserAgent=window.navigator.userAgent.toLowerCase();bNS=bGecko=oUserAgent.indexOf("gecko")!=-1;bIE=oUserAgent.indexOf("msie")!=-1&&oUserAgent.indexOf("opera")==-1&&oUserAgent.indexOf("webtv")==-1;new oIGZ.f_keyEvent(["ENTER"],TeclaPulsada);new oIGZ.f_keyEvent(["CTRL","F7"],TeclaPulsadaF7);new oIGZ.f_keyEvent(["CTRL","F8"],TeclaPulsadaF8);
new oIGZ.f_keyEvent(["CTRL","F9"],TeclaPulsadaF9);new oIGZ.f_keyEvent(["CTRL","F10"],TeclaPulsadaF10);bIE&&new oIGZ.f_keyEvent(["SHIFT","TAB"],TeclaPulsadaTAB);
function InitForm(a,b,c,d,e){oCore.f_debugLoad("[i_form]InitForm()");if(IsNull(d))d=1;a=GetForm(a);if(typeof a!="object")typeof a!="undefined"&&ErroresForm("[i_form.InitForm] No existe el FORM de nombre '"+a+"' pasado a 'InitForm()'");else{var g="INPUT";if(bIE)g="<INPUT name='zzIFormNoSubmitInput' />";g=document.createElement(g);g.name="zzIFormNoSubmitInput";g.style.display="none";g.style.visibility="hidden";a.appendChild(g);g_bClearAutoCheckbox&&IForm.f_clearAutoCheckmark(a);if(typeof a_sFormNames!=
"undefined"||typeof maFormNamesValues!="undefined"||e){if(!e&&typeof maFormNamesValues!="undefined")e=maFormNamesValues;RellenarForms(a,e,d);g_bInitEnabler[0]&&InputEnabler(g_bInitEnabler[1][0],g_bInitEnabler[1][1],g_bInitEnabler[1][2],g_bInitEnabler[1][3],a)}AutoInitInput();if(g_bAvisarCambios){if(oIGZ.m_bInitialized)GetInitValues();else oIGZ.m_a_sPostStartUps[oIGZ.m_a_sPostStartUps.length]="GetInitValues();";StartSalirSinGuardar()}c&&InitColor(a);b&&FormResize(a,b);InitTextAreaMaxLength();g_bAutoFocus&&
AutoFocus(a)}}function StartSalirSinGuardar(){window.onbeforeunload=SalirSinGuardar}function StopSalirSinGuardar(){window.onbeforeunload=null}function SalirSinGuardar(){var a=CompareInitValues();if(a){var b="";if(a>1)b="s";return oIGZ.f_langText("SalirSinGuardar",[a,b])+IForm.f_debug()}}function GetInitValues(a){var b;a=GetForm(a);g_ma_sInitValues[1]=[];for(var c=0;c<a.length;c++){b=a.elements[c];ValidarInput(b,1,g_bInitValuesSinPrefijo)&&g_ma_sInitValues.f_maNewRow([b.name,GetInputValue(b)])}}
function CompareInitValues(a){var b,c,d,e=0,g=0;a=GetForm(a);for(var h=0;h<a.length;h++){b=a.elements[h];if(ValidarInput(b,1,g_bInitValuesSinPrefijo)){c=b.name;if(g_bAvisarCambios>=2){d=BuscaArray(g_a_sAvisarCambios,c);if(g_bAvisarCambios==2&&d==-1||g_bAvisarCambios==3&&d!=-1){g++;continue}}b=GetInputValue(b);d=c==g_ma_sInitValues.f_maGetVal("name",g)?g:g_ma_sInitValues.f_maGetRegIf("name",c);if(!CompareValues(b,g_ma_sInitValues.f_maGetVal("value",d))){e++;IForm.m_sDebug+=c+" OLD=["+g_ma_sInitValues.f_maGetValIf("value",
"name",c)+"] NOW=["+b+"]\n"}g++}}return e}function InitDateFormat(a,b,c,d){var e,g;for(e=0;e<b.length;e++){g=BuscaArray(a,b[e]);if(g!=-1&&a_vFormValues[g])a_vFormValues[g]=a_vFormValues[g].f_toDateDraw(c,d)}}function GetForm(a){if(!a)if(IForm.m_oForm)a=IForm.m_oForm;else{var b=document.forms.length;if(b){a=document.forms[0];if(a.name=="FORM_iCalendar")a=document.forms[1];if(b>1)g_sAlertas+="* Esta página tiene "+b+" FORMs\n"}}return IForm.m_oForm=a}
function SubmitForm(a,b,c,d,e){var g=g_bAvisarCambios;if(c==1)g=1;else{g=0;StopSalirSinGuardar()}if(g_bSubmitOn){ErrorJS("[i_form.SubmitForm] g_bSubmitOn=1 ","",5);return 0}g_bSubmitOn=1;a=GetForm(a);if(typeof a!="object"){ErroresForm("[i_form.SubmitForm] No existe el FORM de nombre '"+a+"' pasado a 'SubmitForm()'");return g_bSubmitOn=0}else{c==2&&GetInitValues(a);FixAtSubmit(a);g_bSubmitEnabler[0]&&InputEnabler(g_bSubmitEnabler[1][0],g_bSubmitEnabler[1][1],g_bSubmitEnabler[1][2],g_bSubmitEnabler[1][3]);
g_sTecladoFuncion="";if(IsNull(b))b=g_bShield;window.onerror=function(h,j,k){h="[i_form.SubmitForm] al hacer el SUBMIT con METHOD='"+a.method+"'\n\n"+j+"\nLinea "+k+" : "+h+"\nRevisar nombre del FORM por caracteres especiales como (_+*/...)";if(a.method.toUpperCase()=="GET")h+=" o estemos usando GET con demasiados datos";ErroresForm(h,a,4);return true};if(g)g_bSubmitOn=0;if(d)switch(d){case 1:b&&IFormShield.f_setShow();oXJS.f_load(a.action+"?xjs=1&",function(){g_bSubmitOn=0;b&&IFormShield.f_setHide();
e&&e()},a);break;case 2:a.target="_blank";a.action+="?xjs=1";a.submit()}else a.submit();if(b){IFormShield.f_setShow();g_bSubmitOn=1}c==2&&RellenarForms(a,[g_ma_sInitValues.f_maGetCol("name"),g_ma_sInitValues.f_maGetCol("value")])}}IForm.f_afterSubmit=function(a){a=GetForm(a);IForm.f_resetFixAtSubmit(a);IForm.f_resetColor(a);IFormShield.f_setHide();g_bSubmitOn=0};function InitFormValidar(a,b,c){status+="[i_form.js] Usar InitForm()";InitForm(a,b,c)}
function InitValidarForm(a,b){InitFormValidar(a,b,1)}
function ValidarForm(a,b){var c,d,e=false;if(g_bSubmitOn){ErrorJS("[i_form.ValidarForm] g_bSubmitOn=1 ","",5);return e}a=GetForm(a);if(typeof a!="object"){ErroresForm("[i_form.ValidarForm] No existe el FORM de nombre '"+a+"' pasado a 'ValidarForm()'");return e}InitFixAtSubmit();ResetCampo();InitColor(a);g_bCamposVacios=1;var g=0,h=0;for(g_sAllErrorsText=g_oInputError="";(!g||g&&g_nAllErrors)&&h<a.length;){c=a[h];oIInput.f_cleanTitulo(c);if(!b||b.f_indexOf(c.name)!=-1){e=GetInputValue(c);if(e=ValidaCampo(c,
e,1)){g++;d||(d=c);CampoErrorT(c)}}h++}if(g){if(g>1)g_sAllErrorsText="Hay "+g+" campos incorrectos:\n\n"+g_sAllErrorsText;if(g_oInputError)d=g_oInputError;CampoError(d);e=1}return!e}function ValidarCampo(a){ResetCampo();var b=ValidaCampo(a);b&&CampoError(a);return b}function ActivarCampo(a){if(!bNS){ResetCampo();var b=a.name;g_sColorForm=a.form[b].style.backgroundColor=a.style.backgroundColor;sColorActivo&&sColorForm&&CicloColores(b,sColorForm,sColorActivo,20,40,0)}}
function ValidarCheckmarks(a){for(var b=0;b<a.length;)IForm.f_validarCheckmark(a[b++])}IForm.f_validarCheckmark=function(a){var b,c;if(CheckInputName(a)){b=a.name.substr(0,1);if(b=="K"||b=="k"&&a.checked){c=0;if(a.checked){c=1;if((b=a.value)&&!(b=="0"||b=="False"||b=="Falso"||b=="on"))c=b;a.setAttribute("K_auto",0)}else b=="K"&&a.setAttribute("K_auto",1);a.checked=true;a.value=c}}};
IForm.f_resetAutoCheckmark=function(a){for(var b,c,d=0;d<a.length;){b=a[d++];if(b.type=="checkbox"&&CheckInputName(b)){c=GetObjAttribute(b,"K_auto");if(!isNaN(c)&&Number(c))b.checked=false}}};IForm.f_clearAutoCheckmark=function(a,b){for(var c,d=0;d<a.length;){c=a[d++];if(CheckInputName(c)&&(b||c.name.substr(0,1)=="K"))c.checked=false}};IForm.f_printComboEXML2Text=function(a,b,c,d,e){document.write(IForm.f_drawComboEXML2Text(a,b,c,d,e))};
IForm.f_drawComboEXML2Text=function(a,b,c,d,e){var g="";if(IsUndefined(e)&&typeof maFormNamesValues!="undefined"){var h=IForm.f_getInitName(a);IsNull(h)||(e=maFormNamesValues.f_maGetVal(h,0,null))}if(!IsNull(e)){d=b.f_maGetReg(d,e);if(d!=-1){g+=ParseEXMLs(c,"",b,d);g+="<INPUT name='"+a+"' type='hidden' value='"+e+"'>"}}return g};
IForm.f_getInitName=function(a){var b=maFormNamesValues.f_maGetColPos(a);if(b==-1){a=RemovePrefijoSufijo(a);b=maFormNamesValues.f_maGetColPos(a);if(b==-1){var c=a.indexOf("@");if(c!=-1){a=a.substring(0,c);b=maFormNamesValues.f_maGetColPos(a)}if(b==-1)a=null}}return a};IForm.f_debug=function(a,b,c){var d="";if(oCore.m_sServer=="DEV"||c){d+="\n\n"+InfoDevPage();if(a)d+=InfoDevForm(a.form)+InfoDevInput(a);if(b)d+="\n"+b;if(this.m_sDebug){d+="\n"+this.m_sDebug;this.m_sDebug=""}}return d};
function InitCheckmarks(a){var b,c,d=0;for(a=GetForm(a);d<a.length;){b=a[d];if(CheckInputName(b)){c=b.name.substr(0,1);if(c=="K"&&b.checked&&b.value==0)b.checked=false}d++}}function FormResize(a,b){var c=0;if(!bNS)for(;c<a.length;){var d=a[c].type;if(d=="text"||d=="textarea"){d=a[c].size;d+=Math.ceil(d*b/100);a[c].size=d}c++}}
function ValidaCampo(a,b,c){var d=0;if(g_sParentNodeVisible==""||ParentNodeVisible(a,g_sParentNodeVisible))if(CheckInputName(a,0,1,0)){if(typeof b=="undefined")b=a.value;var e=a.name;GetForm(a.form);IForm.m_sInputName=e;d=ValidaValor(e,b,a,c);b=e.substr(1,1);if(!d&&(b=="_"||b=="x"))ColorForm(a,1)}if(!d)if(a=GetObjAttribute(a,"m_sErrorTextElementId")){a=document.getElementById(a);if(a!=null)a.innerHTML=""}return d}
function ParentNodeVisible(a,b){var c=1,d=GetParentNode(a,b);if(d&&(d.style.visibility=="hidden"||d.style.display=="none"))c=0;return c}
function GetPrefixFromType(a){var b;switch(GetObjAttribute(a,"tipo").toLowerCase()){case "alfanumérico":case "alfanumerico":case "cadena":b="A";break;case "numérico":case "numerico":case "numero":case "número":b="M";break;case "correo":case "email":b="E";break;case "codigo postal":case "cp":case "código postal":b="C";break;case "fecha":b="G";break;case "hora":b="H";break;case "password":case "contraseña":b="P";break;default:try{switch(typeof a.length!="undefined"&&typeof a.name=="undefined"?"radio":
a.type.toLowerCase()){case "text":case "password":case "file":b="a";break;case "checkbox":b="k";break;case "select-one":case "select-multiple":b="s";break;case "radio":b="r";break;default:b=""}}catch(c){b=""}}return b}function GetObjAttribute(a,b){sReturn=null;IsNull(a)||(sReturn=a.getAttribute(b));return sReturn}function SetObjAttribute(a,b,c){IsNull(a)||a.setAttribute(b,c)}
function EsCampoNumerico(a){var b=a.name.substr(0,1);if(GetObjAttribute(a,"tipo")!=null)b=GetPrefixFromType(a);switch(b.toUpperCase()){case "M":case "N":case "Q":case "O":return true}return false}
function ValidaValor(a,b,c,d){var e,g,h=false,j=0,k=0;if(IsNull(c)){c=null;if(CheckInput(a,0,1))k=1}else{a=c.name;g=c.type.toLowerCase();k=CheckInput(c,0,1);e=c.form}IForm.m_sInputName=a;var l=a.substr(1,1),n=a.substr(0,1),m=BuscaArray(g_a_sSiValidarExt,a);if(m!=-1){if(g_a_sSiValidarExt[m+1])n=g_a_sSiValidarExt[m+1];j=1}if(l=="_"||l=="x")j=1;l=GetObjAttribute(c,"validar");if(l!=null)j=l=="no"||l=="0"?0:1;if(GetObjAttribute(c,"tipo")!=null)j=1;if(GetObjAttribute(c,"funcion_validar")!=null||GetObjAttribute(c,
"expresion_validar")!=null)j=1;if(j&&g=="file"&&b=="")b=GetFormValue(c);if(j){if(EsCampoNumerico(c))b=b.f_trim();n.toUpperCase()=="Y"&&AddFixAtSubmit(a,"Tipo_Y");if(n=="r"&&CheckRadios(c))g_bCamposVacios=0;if(n.toUpperCase()=="K"&&GetInputValue(c))g_bCamposVacios=0;if(GetObjAttribute(c,"tipo")!=null)n=GetPrefixFromType(c);if(n==n.toLowerCase()&&!b&&n!="f"&&n!="l"||n=="r")j=0;if((sAttObligatorio=GetObjAttribute(c,"obligatorio"))!=null)if(sAttObligatorio=="si"||sAttObligatorio==1)j=true;else if(sAttObligatorio!=
"no"&&sAttObligatorio!="0"){var p;try{p=eval(sAttObligatorio)}catch(q){}if(typeof p=="boolean")j=p;else try{oInputRelacionado=e[c.obligatorio];if(typeof oInputRelacionado.length!="undefined"||CheckInput(oInputRelacionado,0,1))switch(typeof oInputRelacionado.length!="undefined"&&typeof oInputRelacionado.name=="undefined"?"radio":oInputRelacionado.type.toLowerCase()){case "text":case "password":case "hidden":case "file":j=!EsCampoNumerico(oInputRelacionado)&&oInputRelacionado.value!=""||g_bNullAs0M&&
Texto2Numero(oInputRelacionado.value)!=0;break;case "checkbox":case "select-one":case "select-multiple":j=GetInputValue(oInputRelacionado);break;case "radio":j=CheckRadios(oInputRelacionado)?1:0}else j=b==""?false:true}catch(r){j=b==""?false:true}}else j=b==""?false:true}if(BuscaArray(g_a_sNoValidar,a)!=-1)j=0;if(BuscaArray(g_a_sSiValidar,a)!=-1)j=1;if(j){if(oIForm.bTrimSpaces&&(new String(b)).f_trim()=="")b="";bSaltarValidacion=h=false;if((sAttMinLength=GetObjAttribute(c,"minlength"))!=null){g=parseInt(sAttMinLength);
if(b&&b.length<g){h=true;g_sErrorText=oIGZ.f_langText("CorregirLongitud",[g])}}if((sAttIncVal=GetObjAttribute(c,"incluir_valores"))!=null){eval("var a_nIncluir = [ "+sAttIncVal+" ]");if(BuscaArray(a_nIncluir,b)>=0)bSaltarValidacion=true}if((sAttFuncVal=GetObjAttribute(c,"funcion_validar"))!=null){bSaltarValidacion=1;eval("sError = "+sAttFuncVal+"( vValueForm )");if(o){h=true;g_sErrorText=o}}else if((sAttExprVal=GetObjAttribute(c,"expresion_validar"))!=null){bSaltarValidacion=1;o=eval("re="+sAttExprVal);
if(!b.match(o)){h=true;g_sErrorText=oIGZ.f_langText("CorregirCampo")}}if((sAttExclVal=GetObjAttribute(c,"excluir_valores"))!=null){eval("var a_nExcluir = [ "+sAttExclVal+" ]");if(BuscaArray(a_nExcluir,b)>=0){bSaltarValidacion=h=true;g_sErrorText=oIGZ.f_langText("CorregirValor",[b])}}n=n.toUpperCase();if(n!="F"&&n!="K"&&k&&c.type!="hidden")g_bCamposVacios=0;if(!h&&!bSaltarValidacion)switch(n){case "A":if(b==""){h=true;g_sErrorText=oIGZ.f_langText("RellenarCampo",[oIForm.f_getNombreCampo(a,1)])}if((sAttCharVal=
GetObjAttribute(c,"caracteres_validos"))!=null){o=RegExp("[^A-Z0-9"+sAttCharVal+"]","i");if(cInvalido=b.match(o)){h=true;g_sErrorText=oIGZ.f_langText("CorregirCaracter",[cInvalido])}}break;case "B":if(b==""){h=true;g_sErrorText=oIGZ.f_langText("RellenarCampo",[oIForm.f_getNombreCampo(a,1)])}if(cInvalido=ValidarCadena(b,a_cValidos_B)){h=true;if(cInvalido=="\r"||cInvalido=="\n")cInvalido="NEWLINE";g_sErrorText=oIGZ.f_langText("CorregirCaracter",[cInvalido])}break;case "C":o=/^\d{4,5}$/;if(!b.match(o)||
!IsNumberRange(c,1)){h=true;g_sErrorText=oIGZ.f_langText("CorregirCP")}break;case "D":e=IInput.f_getDateFormatShow(c);if(b==""){b=(new Date).f_drawFormat(e);if(k&&d)c.value=b}else if(IForm.f_validaFecha(b,e))IsDateRange(c,1)||(h=true);else{h=true;g_sErrorText=oIGZ.f_langText("CorregirFecha",[String(e).f_replace("n",""),b])}if(!h)(d=IInput.f_getDateFormatOut(c))&&AddFixAtSubmit(a,b.f_toDateDraw(e,d));break;case "E":o=/^[A-Za-z0-9]\w*([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/;if(!b.match(o)){h=true;
g_sErrorText=oIGZ.f_langText("CorregirEMail")}break;case "F":if(o=ValidarFecha(c)){h=true;g_sErrorText=o}break;case "G":e=IInput.f_getDateFormatShow(c);if(IForm.f_validaFecha(b,e)){IsDateRange(c,1)||(h=true);if(!h)(d=IInput.f_getDateFormatOut(c))&&AddFixAtSubmit(a,b.f_toDateDraw(e,d))}else{h=true;g_sErrorText=oIGZ.f_langText("CorregirFecha",[String(e).f_replace("n",""),b])}break;case "H":o=/^([0-1]?\d|2[0-3])(:[0-5]\d(:[0-5]\d)?)$/;if(!b.match(o)){h=true;g_sErrorText=oIGZ.f_langText("CorregirHora",
[b])}break;case "I":d=b.substring(6,8);k=b.substring(4,6);e=b.substring(0,4);if(!ValidaFecha(d,k,e)){h=true;g_sErrorText=oIGZ.f_langText("CorregirFecha",["aaaammdd",b])}break;case "J":o=b.substring(4,5);g=b.substring(7,8);d=b.substring(8,10);k=b.substring(5,7);e=b.substring(0,4);if(o!="/"&&g!="/"&&!ValidaFecha(d,k,e)){h=true;g_sErrorText=oIGZ.f_langText("CorregirFecha",["aaaa/mm/dd",b])}break;case "_J":e=new Number(b);if(isNaN(e)||e<=0||b/1E3!=Math.ceil(b/1E3)){h=true;g_sErrorText="Por favor, introduce un número multiplo de 1000";
g_sErrorText=oIGZ.f_langText("CorregirMultiplo1000")}else if(k&&d)c.value=parseFloat(b);break;case "L":ValidarCC(a,b,e)||(h=true);break;case "M":o=e=null;g=true;l=p=j=false;m=GetObjAttribute(c,"forzar_numero");if(m!=null)l=m=="si";m=GetObjAttribute(c,"autofix");if(m!=null)p=m=="si";m=GetObjAttribute(c,"minvalue");if(m!=null)e=m;m=GetObjAttribute(c,"maxvalue");if(m!=null)o=m;m=GetObjAttribute(c,"tipo_numero");if(m!=null)j=m=="entero";m=GetObjAttribute(c,"puntos_miles");if(m!=null)g=m=="si"||m=="1";
m=b.length==0&&(!g_bNullAs0M||!p)?NaN:new Number(b);p||(p=g_bAutofixM);if(g){if(m)m=Texto2Numero(b,~p&1)}else m=new Number(b);if(!isNaN(m)&&j){nNumeroEntero=parseInt(m);if(isNaN(m)||m!=nNumeroEntero)m=p?0:NaN}if(isNaN(m)){h=true;g_sErrorText=oIGZ.f_langText("NumeroFormato",[j,g])}else{if(e!=null&&m<e||o!=null&&m>o){h=true;g_sErrorText=oIGZ.f_langText("NumeroLimite",[e,o])}if(k&&(p||l)&&d)AddFixAtSubmit(a,parseFloat(m))}break;case "N":o=/^[0-9]+(\.[0-9]+)?$/;if(o.test(b)){e=b.f_toNumber("I.");if(b==
""||isNaN(e)||e<0){h=true;g_sErrorText=oIGZ.f_langText("CorregirNumeroN")}else if(IsNumberRange(c,1))k&&d&&AddFixAtSubmit(a,parseFloat(b));else h=true}else{h=true;g_sErrorText=oIGZ.f_langText("CorregirNumeroN")}break;case "O":e=Number(b);if(b==""||isNaN(e)||e<0||e!=parseInt(e)){h=true;g_sErrorText=oIGZ.f_langText("CorregirNumeroO")}else if(IsNumberRange(c,1))k&&d&&AddFixAtSubmit(a,parseFloat(b));else h=true;break;case "P":if(b==""){h=true;g_sErrorText=oIGZ.f_langText("RellenarPass")}else{t_sNameForm2=
a.substr(0,1)+"x"+a.substr(2);if(d=e[t_sNameForm2]){t_vValueForm2=d.value;if(b!=t_vValueForm2){h=true;g_sErrorText=oIGZ.f_langText("CorregirPass")}}}break;case "Q":e=Number(b);if(b==""||isNaN(e)){h=true;g_sErrorText=oIGZ.f_langText("CorregirNumeroQ")}else if(IsNumberRange(c,1))k&&d&&AddFixAtSubmit(a,parseFloat(b));else h=true;break;case "R":if(!CheckRadios(c)){h=true;g_sErrorText=oIGZ.f_langText("RellenarRadio",[oIForm.f_getNombreCampo(a,1)])}break;case "S":if(b==""&&!c.selectedIndex){h=true;g_sErrorText=
oIGZ.f_langText("RellenarSelect",[oIForm.f_getNombreCampo(a,1)])}break;case "T":if(isNaN(b)||b<6E8||b>999999999||b.length!=9){h=true;g_sErrorText=oIGZ.f_langText("CorregirTF")}break;case "U":if(!ValidarNIF(b)){h=true;g_sErrorText=oIGZ.f_langText("CorregirNIF")}break;case "V":d=b.substring(0,1);if(d=="K"||d=="L"||d=="X")b=b.substring(1);if(!ValidarCIF(b))if(!ValidarNIF(b))if(!ValidarDNI(b)){h=true;g_sErrorText=oIGZ.f_langText("CorregirDNICIFNIF")}break;case "W":if(b==""){h=true;g_sErrorText=oIGZ.f_langText("RellenarSelectMultiple",
[oIForm.f_getNombreCampo(a,1)])}break;case "X":if(typeof ValidaNumeroTarjeta=="undefined")alert("ERROR: Necesitas cargar la libreria 'wm_form_tarjetas.js'");else if(!ValidaNumeroTarjeta(0,b)){h=true;g_sErrorText=oIGZ.f_langText("CorregirTarjetaCredito")}break;case "Y":if(!c.length){h=true;g_sErrorText=oIGZ.f_langText("RellenarSelectMultiple",[oIForm.f_getNombreCampo(a,1)])}break;case "Z":m=BuscaArray(g_a_sSiValidarExt,a);if(m!=-1){var o=eval(g_a_sSiValidarExt[m+2]);if(o){h=true;g_sErrorText=o}}}if(!h&&
c&&c.type=="textarea"&&c.maxlength!="undefined")h=TextareaLen(c)}h||(h=LimiteTamano(a,b));h||(h=LimiteValor(a,b));g_sErrorValue=b;g_ErrorTipo=n;if(h&&c){a=c.getAttribute("texto_error");if(typeof a!="undefined"&&a!=null)g_sErrorText=a}return h}function CheckRadios(a){var b=false;if(typeof a=="object"){if(String(a.length)=="undefined")a=a.form[a.name];var c=a.length;if(c)for(i=0;i<c;i++){if(a[i].checked)b=true}else if(a.checked)b=true}return b}
function LimiteTamano(a,b){var c=false,d=BuscaArray(a_vTamanoLimitado,a);if(d!=-1){var e=a.substr(0,1);if(b!=""||e==e.toUpperCase()){if((t_nSizeMin=a_vTamanoLimitado[d+1])&&t_nSizeMin>b.length){c=true;g_sErrorText="Por favor, este campo no puede ser menor de "+t_nSizeMin+" caracteres (ahora tiene "+b.length+")"}if((t_nSizeMax=a_vTamanoLimitado[d+2])&&t_nSizeMax<b.length){c=true;g_sErrorText="Por favor, este campo no puede ser mayor de "+t_nSizeMax+" caracteres (ahora tiene "+b.length+")"}}}return c}
function LimiteValor(a,b){var c=false,d=BuscaArray(a_vValorLimitado,a);if(d!=-1){var e=a.substr(0,1);if(b!=""||e==e.toUpperCase()){if((t_nValorMin=a_vValorLimitado[d+1])&&t_nValorMin>b){c=true;g_sErrorText="Para ser socio debes tener mas de "+t_nValorMin+" años."}if((t_nValorMax=a_vValorLimitado[d+2])&&t_nValorMax<b){c=true;g_sErrorText="Por favor, este campo no puede ser mayor de "+t_nValorMax}}}return c}
function CampoError(a,b){if(g_sAllErrorsText)g_sErrorText=g_sAllErrorsText;b||(b=GetObjAttribute(a,"m_sErrorText"));if(b)g_sErrorText=b;ColorForm(a,0);FocusInput(a);g_sErrorText+=IForm.f_debug(a);var c=GetObjAttribute(a,"m_sErrorTextElementId");if(c){c=document.getElementById(c);if(c!=null)c.innerHTML=g_sErrorText}else oIGZ.f_showMsg(g_sErrorText)}
function CampoErrorT(a,b){var c=a.name;if(b)g_sErrorText=b;else{nPosicion=BuscaArray(a_sError,c);if(nPosicion!=-1)g_sErrorText=a_sError[nPosicion+1]}if(g_nAllErrors==2)g_sAllErrorsText+="["+c.substring(2)+"] ";g_sAllErrorsText+=g_sErrorText+"\n"}
function ValidarFecha(a){var b="",c=GetForm(),d=IForm.m_sInputName,e=d.substr(2),g=c["Dz"+e].value,h=c["Mz"+e].value,j=c["Az"+e].value;if(d.substr(0,1)=="f"&&g==""&&h==""&&j==""){c[d].value="";ColorForm(c["Dz"+e],1);ColorForm(c["Mz"+e],1);ColorForm(c["Az"+e],1);return b}if(j<g_nY2K)j=2E3+parseInt(j);if(j<100)j=1900+parseInt(j);j>1900&&j<=3E3||(b="A");h>=1&&h<=12||(b="M");g>=1&&g<=31||(b="D");if(b==""){var k=new Date(j,h-1,g);if(j!=k.getFullYear())b="A";if(h!=k.getMonth()+1)b="M";if(g!=k.getDate())b=
"D"}if(b==""){if(!IsNull(a)&&IInput.f_getDateFormatOut(a))c[d].value=k.f_drawFormat(IInput.f_getDateFormatOut(a));else{if(g_nFormatoFechaF==2){g="0"+g.toString();h="0"+h.toString();a=g.substr(g.length-2)+"/"+h.substr(h.length-2)+"/"+j.toString()}else if(g_nFormatoFechaF==4){g="0"+g.toString();h="0"+h.toString();a=g.substr(g.length-2)+"-"+h.substr(h.length-2)+"-"+j.toString()}else a=g+"/"+h+"/"+j;c[d].value=a}ColorForm(c["Dz"+e],1);ColorForm(c["Mz"+e],1);ColorForm(c["Az"+e],1)}else{d=b+"z"+e;g_oInputError=
c[d];switch(b){case "D":b=oIGZ.f_langText("CorregirFechaDD");break;case "M":ColorForm(c["Dz"+e],1);b=oIGZ.f_langText("CorregirFechaMM");break;case "A":ColorForm(c["Dz"+e],1);ColorForm(c["Mz"+e],1);b=oIGZ.f_langText("CorregirFechaYY")}}return b}IForm.f_GetFormatoFecha=function(a,b,c){var d=null;if(c)d=GetObjAttribute(a,c);if(IsNull(d))d=GetObjAttribute(a,"formato");IsNull(d)||(b=d);return b};IForm.f_validaFecha=function(a,b){var c=0;IsNull(a.f_toDate(b,this.bForceDateFormat))||(c=1);return c};
function EsFecha(a){var b=-1,c=-1,d,e,g,h,j,k,l=g=a.length;e=a.indexOf("/");var n=a.indexOf("/",e+1);if(n==-1)return false;var m=a.indexOf(" ",n+1);if(m!=-1){g=m;b=a.indexOf(":",m+1);if(b!=-1){c=a.indexOf(":",b+1);if(c!=-1)l=c}}d=a.substring(0,e);e=a.substring(e+1,n);g=a.substring(n+1,g);if(m!=-1)h=a.substring(m+1,b);if(b!=-1)j=a.substring(b+1,l);if(c!=-1)k=a.substring(c+1);return ValidaFecha(d,e,g,h,j,k)}
function ComparaFechas(a,b,c){var d=0;c||(c="/");a=Fecha2Date(a,c);b=Fecha2Date(b,c);if(a>b)d=1;if(a<b)d=-1;if(a==b)d=0;return d}function Fecha2Date(a,b){dFecha=new Date;if(a){a=CambiaFecha(a,b);dFecha=new Date(a)}return dFecha}
function ValidaFecha(a,b,c,d,e,g){if(!a||!b||!c)return false;if(isNaN(a)||isNaN(b)||isNaN(c))return false;c=Number(c);if(c<g_nY2K)c=2E3+c;if(c<100)c=1900+c;d||(d=0);e||(e=0);g||(g=0);var h=new Date(c,b-1,a,d,e,g);if(d!=h.getHours())return false;if(e!=h.getMinutes())return false;if(g!=h.getSeconds())return false;if(a!=h.getDate())return false;if(b!=h.getMonth()+1)return false;if(c!=h.getFullYear())return false;return true}
function FechaDifDias(a,b){dFecha1=Fecha2Date(a);dFecha2=Fecha2Date(b);tFecha1=dFecha1.getTime()-dFecha1.getTimezoneOffset()*60*1E3;tFecha2=dFecha2.getTime()-dFecha2.getTimezoneOffset()*60*1E3;interval=tFecha2-tFecha1;msecondsPerDay=864E5;return days=Math.ceil(interval/msecondsPerDay)}
function ValidarCC(a,b,c){var d,e,g,h,j,k,l=c[a],n="",m=["Entidad","Ez",4,"Sucursal","Sz",4,"Dígito de Control","Dz",2,"Número de Cuenta","Cz",10],p=/[^0-9]/gi;d=m.length/3;e=a.substr(2);if(a.substr(0,1)=="L"||GetObjAttribute(l,"obligatorio")!=null)g=1;for(j=0;j<d;j++){k=j*3;h=m[k+1]+e;if(eval("typeof(oForm['"+h+"'])")=="object"){l=c[h];h=l.value;if(h!=""||g){g=1;h=h.replace(p,"");if(h.length!=m[k+2]){g_oInputError=l;g_sErrorText="El valor "+m[k]+" debe tener "+m[k+2]+" caracteres numéricos";return false}}n+=
h}}if(l){b=n;l=c[m[1]+e];eval("typeof(oForm['"+a+"'])")=="object"&&AddFixAtSubmit(IForm.m_sInputName,n)}if(!g&&b=="")return true;b=b.replace(p,"");if(b==null||b.length!=20||isNaN(b)){g_oInputError=l;g_sErrorText="El número de cuenta debe tener 20 caracteres numéricos ["+b+"]";return false}a=b.substr(0,4);c=b.substr(4,4);d=b.substr(10);a=get_control_digit(a,c,d);b=b.substr(8,2);if(a!=b){g_oInputError=l;g_sErrorText="Por favor, el Dígito de Control es incorrecto. Revise todos los datos";return false}return true}
function get_control_digit(a,b,c){a=Number(a);b=Number(b);var d=Number(c);c=Array;c[0]=Math.floor(a/1E3);a-=c[0]*1E3;c[1]=Math.floor(a/100);a-=c[1]*100;c[2]=Math.floor(a/10);a-=c[2]*10;c[3]=Math.floor(a);c[4]=Math.floor(b/1E3);b-=c[4]*1E3;c[5]=Math.floor(b/100);b-=c[5]*100;c[6]=Math.floor(b/10);b-=c[6]*10;c[7]=Math.floor(b);c[8]=Math.floor(d/1E9);d-=c[8]*1E9;c[9]=Math.floor(d/1E8);d-=c[9]*1E8;c[10]=Math.floor(d/1E7);d-=c[10]*1E7;c[11]=Math.floor(d/1E6);d-=c[11]*1E6;c[12]=Math.floor(d/1E5);d-=c[12]*
1E5;c[13]=Math.floor(d/1E4);d-=c[13]*1E4;c[14]=Math.floor(d/1E3);d-=c[14]*1E3;c[15]=Math.floor(d/100);d-=c[15]*100;c[16]=Math.floor(d/10);d-=c[16]*10;c[17]=Math.floor(d);a=c[7]*6+c[6]*3+c[5]*7+c[4]*9+c[3]*10+c[2]*5+c[1]*8+c[0]*4;a=Math.floor(11-a%11);a=a==11?0:a;a=a==10?1:a;c=c[17]*6+c[16]*3+c[15]*7+c[14]*9+c[13]*10+c[12]*5+c[11]*8+c[10]*4+c[9]*2+c[8]*1;c=Math.floor(11-c%11);c=c==11?0:c;c=c==10?1:c;return a.toString()+c.toString()}
function ValidarDNI(a){var b=false,c=a;c=c.replace(/\s/g,"");c=c.replace(/\./g,"");var d=c=c.replace(/-/g,"");a=new Number(a);if(!isNaN(a)&&a>0&&c>=1&&c<=99999999){b=true;BuscaArray(g_a_sAutoCorregir,IForm.m_sInputName)!=-1&&AddFixAtSubmit(IForm.m_sInputName,d)}return b}
function ValidarNIF(a){var b,c,d=false;a=a.replace(/\s/g,"");a=a.replace(/\./g,"");a=a.replace(/-/g,"");b=a.substring(a.length-1,a.length).toUpperCase();c=b.charCodeAt(0);if(c<65||c>90){b=a.substring(0,1).toUpperCase();c=b.charCodeAt(0);a=a.substring(1,a.length)}if(c>=65&&c<=90){nNIF=Texto2Numero(a);if(b=="TRWAGMYFPDXBNJZSQVHLCKEF".substr(nNIF%23,1)){d=true;BuscaArray(g_a_sAutoCorregir,IForm.m_sInputName)!=-1&&AddFixAtSubmit(IForm.m_sInputName,nNIF+b)}}return d}
function ValidarCIF(a){var b=false;a=a.replace(/\s/g,"");a=a.replace(/\./g,"");a=a.replace(/-/g,"");if(a.length==9){a.substring(0,1).toUpperCase();sIdentificacion=a;if(perteneceA(sIdentificacion.charAt(0),"ABCDEFGHKLMPQSXZ"))if(valV10(sIdentificacion.substr(1,sIdentificacion.length-2))){b=true;var c=sIdentificacion.substr(1,sIdentificacion.length-2),d=7-c.length;for(i=0;i<d;i++)c="0"+c;d=sIdentificacion.charAt(sIdentificacion.length-1);var e=Number(c.charAt(1))+Number(c.charAt(3))+Number(c.charAt(5)),
g=0;for(i=0;i<8;i+=2){aux1=String(Number(c.charAt(i))*2);aux2=aux1.length>1?Number(aux1.charAt(0))+Number(aux1.charAt(1)):Number(aux1);g+=aux2}c=String(e+g);c.charAt(1);c=c.length>1?c.charAt(1)=="0"?0:10-Number(c.charAt(1)):10-Number(c);if(perteneceA(d,mayusculas)){if(c!=mayusculas.indexOf(d)+1)b=false}else if(perteneceA(d,digitos)){if(c!=d)b=false}else b=false}}b&&BuscaArray(g_a_sAutoCorregir,IForm.m_sInputName)!=-1&&AddFixAtSubmit(IForm.m_sInputName,a);return b}
var digitos="0123456789",mayusculas="ABCDEFGHIJKLMNOPQRSTUVWXYZ";function perteneceA(a,b){for(var c=false,d=0;d<b.length;d++)if(a==b.charAt(d)){c=true;break}return c}function valV10(a){for(var b,c=true,d=0;d<a.length;d++){b=a.charAt(d);if(!perteneceA(b,digitos)){c=false;break}}return c}
function ValidarCadena(a,b,c){var d,e,g=a.toUpperCase(),h=a.length;for(d=0;d<h;d++){e=g.charAt(d);nCaracterPos=BuscaArray(b,e);if(c){if(nCaracterPos!=-1)return a.charAt(d)}else if(!(nCaracterPos!=-1||e>="A"&&e<="Z"||e>="0"&&e<="9"))return a.charAt(d)}return 0}
function ValidarExtension(a,b,c,d,e){var g=a.value;if(!g&&a.type.toLowerCase()=="file"){nPos=BuscaArray(IForm.m_maValues[0],a.name,1);if(nPos!=-1)g=IForm.m_maValues[1][nPos]}if(g=CheckExtension(g,b)){d||(d=oIGZ.f_langText("ValidarExtension",[g,b]));CampoError(a,d)}else if(c){b=a_cValidos_B;a_cValidos_B=c;c=a.value;if(e)c=c.substring(c.lastIndexOf("\\")+1);if(ValidaValor("B_",c)){CampoError(a);g="error"}a_cValidos_B=b}return g}
function CheckExtension(a,b){var c=a.lastIndexOf("."),d=a.substr(c+1);if(c==-1||d=="")d=oIGZ.f_langText("CheckExtension");else{c=BuscaArray(b,d,1);if(c!=-1)d=0}return d}IForm.f_resetColor=function(a){var b=0;if(sColorForm)for(;b<a.length;){CheckInput(a[b])&&ColorForm(a[b],1,sColorForm);b++}};
function InitColor(a){var b=0,c,d,e,g;if(!bNS&&typeof a=="object")for(;b<a.length;){c=0;if(CheckInput(a[b])){e=a[b].name;if(typeof e!="undefined"){g=e.substr(1,1);if(g=="_"||g=="x")c=1;if(g=="y"||g=="z")c=0;g=null;try{g=a[e];if(BuscaArray(g_a_sNoValidar,g.name)!=-1)c=0;if(typeof g.validar!="undefined"&&g.validar!=null)if(g.validar=="no"||g.validar=="0")c=0}catch(h){c=0}if(c&&CheckColorForm(e)){c=e.substr(0,1);c=c==c.toUpperCase()&&c.match(/[A-Z]/i);if(typeof g.obligatorio!="undefined"&&g.obligatorio!=
null)if(g.obligatorio=="si"||g.obligatorio=="1")c=1;if(c)d=sColorObligatorio;else if(sColorForm)d=sColorForm;ColorForm(a[b],1,d)}}}b++}}
function ColorForm(a,b,c){GetForm(a.form);var d=a.name;if(!bNS){ResetCampo();var e=d.substr(0,1).toUpperCase();if(typeof a.type!="undefined"&&a.type!=null||typeof a.length!="undefined")if(typeof a.type!="undefined"&&a.type=="checkbox")e="K";else if(typeof a.type=="undefined"||a.type=="radio")e="R";if(sColorForm&&e!="R"&&e!="K"){if(!c){c=sColorError;if(b)c=sColorOK;c||(c=sColorForm)}if(c){a.style.backgroundColor=c;if(CheckColorForm(d)){window.onerror=function(g,h,j){g="[i_form.ColorForm] Nombre de INPUT inexistente o duplicado: "+
d+"\n\n"+h+"\nLinea "+j+" : "+g;ErroresForm(g,a);return true};g_sColorForm="IForm.m_oForm['"+d+"'].style.backgroundColor = '"+c+"'";eval(g_sColorForm);window.onerror=g_oOnErrorEvent;b||CicloColores(d,sColorForm,sColorError,20,40,0)}}}}}function ResetCampo(){g_vTimeoutID&&clearTimeout(g_vTimeoutID);if(g_sColorForm){var a=g_sColorForm.substring(g_sColorForm.indexOf("IForm.m_oForm")+14,g_sColorForm.indexOf(".style.backgroundColor"));CheckColorForm(a)&&eval(g_sColorForm)}}
function RemovePrefijoSufijo(a,b){var c=a.substr(1,1).toLowerCase();if(b!=2&&(c=="_"||c=="x"||c=="y"||c=="z"))a=a.substr(2);c=a.length;if(b!=1&&a.charAt(c-1)=="_"){c=a.lastIndexOf("_",c-2);if(c!=-1)a=a.substr(0,c)}return a}function GetFormValue(a){var b="";a=BuscaArray(IForm.m_maValues[0],a.name,1);if(a!=-1)b=IForm.m_maValues[1][a];return b}
function RellenarForms(a,b,c){var d="",e,g,h,j,k,l;if(!b&&typeof maFormNamesValues!="undefined")b=maFormNamesValues;if(b)if(IsArray(b)){b.length!=2&&ErroresForm("El array de RellenarForms tiene "+(b.length-1)+" registros\n\n"+b.f_maDebug());a_sFormNames=b[0];a_vFormValues=b[1]}else if(typeof b=="string"){a_sFormNames=eval("a_s"+b);a_vFormValues=eval("a_v"+b)}else if(IsMArray(b))if(b.f_length()!=1){b.f_length()>1&&ErroresForm("El MArray de RellenarForms tiene "+b.f_length()+" registros\n\n"+b.f_debug());
a_vFormValues=[]}else{a_sFormNames=b.m_a_sCOLs;a_vFormValues=b.m_a_aROWs[0]}if(a_vFormValues.length==0)return 0;IForm.m_maValues[0]=a_sFormNames.concat();IForm.m_maValues[1]=a_vFormValues.concat();var n=1;if(!a)n=document.forms.length;for(b=0;b<n;b++){if(!a||b>0)a=document.forms[b];if(c){for(g=0;g<a.length;g++)if(ValidarInput(a[g],1)){h=a[g].name;if(h!=e){e=h;j=RemovePrefijoSufijo(h);k=a_sFormNames.f_indexOf(j,"",1);if(k==-1){k=j.indexOf("@");if(k!=-1)k=a_sFormNames.f_indexOf(j.substring(0,k),"",
1)}if(k!=-1){IForm.m_maValues[0][k]=h;if(g_bAddPrefix)a_sFormNames[k]=h}else if(a_sFormNames.f_indexOf(h,"",1)==-1)d+=h+" / "}}if(d)g_sAlertas+="* INPUTS sin values:"+d+"\n"}for(j=0;j<a.length;j++){g=a[j];k=IForm.m_maValues[0].f_indexOf(g.name,"",1);if(k!=-1&&g.type!="file"){h=IForm.m_maValues[0][k];k=a_vFormValues[k];if(IsNull(k)||k.toString().toLowerCase()=="null")k="";if(g_bRellenarAll&&!g.value)g.value=k;if(ValidarInput(g,1)){l=h.substr(0,1).toUpperCase();if(GetObjAttribute(g,"tipo")!=null)l=
GetPrefixFromType(g);switch(l){case "D":if(h=IInput.f_getDateFormatIn(g))k=k.f_toDateDraw(h,IInput.f_getDateFormatShow(g));g.value=k;break;case "F":if(h=IInput.f_getDateFormatIn(g))k=k.f_toDateDraw(h,IInput.f_getDateFormatShow(g));RellenarInputTipo(g,l,k);break;case "G":if(h=IInput.f_getDateFormatIn(g))k=k.f_toDateDraw(h,IInput.f_getDateFormatShow(g));g.value=k;break;case "K":h=false;l=k;if(g_bInputMismoNombre){k=oIForm.m_maValues[0].f_subIndexOf(g.name,1);k=a_vFormValues.f_subVal(k).f_indexOf(g.value);
if(k==-1)l=0}if(IsArray(l))for(k=0;k<l.length;k++){if(g.value==l[k])h=true}else if(l){l=l.toString().toLowerCase();if(l!="0"&&l!="false"&&l!="falso"&&l!="null")h=true}g.checked=h;break;case "L":RellenarInputTipo(g,l,k);break;case "M":h=k;k=2;l=GetObjAttribute(g,"tipo_numero");if(l!=null&&l=="entero")k=0;l=GetObjAttribute(g,"puntos_miles");if(h&&(l==null||l=="si"||l=="1"))h=Numero2Texto(h,k,1,1,0);g.value=h;break;case "P":g.value=k;g=h.substr(0,1)+"x"+h.substr(2);if(g=a[g])g.value=k;break;case "R":if((l=
k)&&!(l=="False"||l=="Falso"||l=="null"))if(g.value==l)g.checked=true;break;case "S":SetInputValue(g,k);break;case "W":SelectOptions(a,h,0);k=k;if(typeof k=="string")k=k.split(", ");SetInputValue(g,k);break;case "Y":SelectOptions(a,h,0);k=k;if(typeof k=="string")k=k.split(", ");SelectOptions(a,h,1,k);DelSelected(a,h,0,0);SelectOptions(a,h,0);break;default:g.value=k}}else SetInputValue(g,k)}else if(k!=-1&&g.type=="file"&&IForm.m_nFile2Text){h=document.createElement("SPAN");h.innerHTML="<BR />"+a_vFormValues[k];
g.parentNode.appendChild(h);IForm.m_nFile2Text==1&&g.parentNode.removeChild(g)}}}}
function RellenarInputTipo(a,b,c){var d=RemovePrefijoSufijo(a.name),e=a.form;switch(b){case "F":a.value=c;a=c.split("/");if(typeof a[2]=="undefined"){a[0]="";a[1]="";a[2]=""}e["Dz"+d].value=a[0];e["Mz"+d].value=a[1];e["Az"+d].value=a[2];break;case "L":c=c.replace(/[^0-9]/gi,"");a.value=c;e["Ez"+d].value=c.substr(0,4);e["Sz"+d].value=c.substr(4,4);e["Dz"+d].value=c.substr(8,2);e["Cz"+d].value=c.substr(10);break;default:a.value=c}}
function AutoFill(a,b){var c,d,e,g,h,j,k="",l=document.body.innerHTML.replace(/[^0-9^a-z]/gi,""),n=["C",28010,"H",(new Date).f_drawFormat("nHH24:nMMN"),"I",(new Date).f_drawFormat("nYYYYnMMnDD"),"J",(new Date).f_drawFormat("nYYYY/nMM/nDD"),"L","0078 0050 26 4000000737","M",9.1,"N",19.123,"O",29,"Q",-91.789,"T","900900900","U","2618976N","V","B81402059"],m=1;if(!a)m=document.forms.length;m==0&&DebugForm();for(c=0;c<m;c++){if(!a||d>0)a=document.forms[c];for(d=0;d<a.length;d++){GetForm(a);j=a[d];if(CheckInputName(j,
0,0)&&j.type!="file"){sInputName=j.name;h="";g=CheckTipoForm(sInputName,0);b||(g=g.toUpperCase());if(GetObjAttribute(j,"tipo")!=null)g=GetPrefixFromType(j);sAttOblig=GetObjAttribute(j,"obligatorio");if(sAttOblig!=null)if(sAttOblig=="si"||sAttOblig=="1")g=g.toUpperCase();else if(b)g=g.toLowerCase();if(j.value&&g!="S"&&g!="K"&&g!="R")g="";if(BuscaArray(g_a_sNoValidar,sInputName)!=-1)g="";e=GetObjAttribute(j,"validar");if(e!=null&&(e=="no"||e=="0"))g="";if(g){e="';alert(1);\";alert(2);';alert(3); [áño'\"€\\n''] ("+
GetMaxLength(j)+")_";switch(g){case "A":h=sInputName+e;sAttCharVal=GetObjAttribute(j,"caracteres_validos");if(sAttCharVal!=null){e=RegExp("[^A-Z0-9"+sAttCharVal+"]","gi");h=h.replace(e,"")}break;case "B":h=sInputName+" ("+GetMaxLength(j)+")";e="";for(var p=0;p<a_cValidos_B;p++)e+=a_cValidos[p];e=RegExp("[^A-Z0-9"+e+"]","gi");h=h.replace(e,"");break;case "D":h=(new Date).f_drawFormat(IInput.f_getDateFormatShow(j));break;case "E":e=RegExp("@","gi");h=sInputName.replace(e,"_")+"_"+GetMaxLength(j)+"@igz.biz";
break;case "F":RellenarInputTipo(j,g,FechaHoy(0));break;case "G":h=(new Date).f_drawFormat(IInput.f_getDateFormatShow(j));break;case "K":j.checked=1;break;case "L":e=BuscaArray(n,g);RellenarInputTipo(j,g,n[e+1]);break;case "P":h="P_"+sInputName.substring(2)+e;case "R":j.checked=1;break;case "S":e=GetInputValue(j);if((e==""||e=="null")&&j.length>1)j.selectedIndex=1;break;case "W":case "Y":j.length||InsertOption(a,j,1,sInputName);for(e=0;e<j.options.length;e++)j.options[e].selected=1;break;default:e=
BuscaArray(n,g);if(e!=-1){p=0;if("MNOQ".indexOf(g)!=-1)p=1;if(p)n[e+1]+=p;h+=n[e+1]}}if(h){if("ABEPUV".indexOf(g)!=-1){e=GetMaxLength(j);if(!e){k+="["+j.name+"] no tiene MAXLENGTH\n";e=8E3}if("ABPU".indexOf(g)!=-1){if(j.type=="textarea")e-=10;h=(h+"_____"+l).substr(0,e)}}j.value=h;if("CMNOQ".indexOf(g)!=-1&&!IsNumberRange(j))j.value=GetValueRange(j);if("G".indexOf(g)!=-1&&!IsDateRange(j))j.value=GetValueRange(j)}}}}}k&&ErrorJS(k,null,4,1)}
function SqlTextLen(a){var b=a.length;if(a=a.match(RegExp("'","gi")))b+=a.length;return b}function AutoFocus(a){var b,c=0;if(a=GetForm(a))for(;c<a.length;){b=a[c++];if(CheckInput(b,0,0,0)&&(b.type=="text"||b.type=="textarea")){FocusInput(b);break}}}
function FocusInput(a){if(CheckInput(a,0,0,0,0)&&(!bIE||a.clientTop||a.type.indexOf("select-")!=-1)){window.onerror=function(b,c,d){b="[i_form.FocusInput] Imposible hacer focus en el INPUT '"+a.name+"' de tipo '"+a.type+"'\nAviso:"+g_sErrorText+"\n"+c+"\nLinea "+d+" : "+b;ErroresForm(b,a);return true};a.focus();window.onerror=g_oOnErrorEvent}}function ChangeComboValue(a,b,c){SetInputValue(a,b,c)&&typeof a.onchange=="function"&&a.onchange()}
function ClearInputValue(a,b){IsArray(b)||(b=[b]);for(var c=0;c<b.length;c++)IInput.f_clearInputValue(a[b[c]])}
function SetInputValue(a,b,c){var d,e=0;if(typeof a=="object")switch(a.type){case "select-one":if(IsNull(c))for(d=0;d<a.length;d++)if(a[d].value==b||a[d].text==b){c=d;break}if(!IsNull(c)){a.selectedIndex=c;e=1}break;case "select-multiple":if(c)IsArray(c)||(c=[c]);else{c=[];var g=b;IsArray(b)||(g=[b]);for(b=0;b<g.length;b++)for(d=0;d<a.options.length;d++)if(a[d].value==g[b]||a[d].text==g[b]){c.push(d);break}}for(d=0;d<a.options.length;d++)if(a.options[d].selected){if(c.f_indexOf(d)==-1){a.options[d].selected=
false;e=1}}else if(c.f_indexOf(d)!=-1){a.options[d].selected=true;e=1}break;default:a.value=b;e=1}return e}function GetInputValue(a,b){return GetInputValueChecked(a,1,b)}
function GetInputValueChecked(a,b,c){var d="";if(CheckInput(a,0,1,1)){var e;e=a.type;if(!IsUndefined(a.length)&&IsUndefined(e))e=a[0].type;switch(e.toLowerCase()){case "radio":case "checkbox":if(c=a.length)for(e=0;e<c;e++){if(a[e].checked){a=a[e];d=true;break}}else if(a.checked)d=true;if(d&&b)d=a.value;break;case "select-one":e=a.selectedIndex;if(e!=-1)d=c?a[e].text:a[e].value;break;case "select-multiple":if(a.length){b=[];var g=0;for(e=0;e<a.length;e++)if(a[e].selected)if(c)b[g++]=a[e].text;else b[g++]=
a[e].value;if(b.length)d=b}break;default:d=a.value}}return d}function SwapAllChecked(a,b){var c=a.length;if(c){if(b==null){b=1;if(a[0].checked)b=0}for(i=0;i<c;i++)a[i].checked=b}}
function CheckInput(a,b,c,d,e,g){var h=0;if(b)h=1;else if(a)if(typeof a=="object"){h=1;if(!d&&a.disabled)return 0;sInputTag=""+a.tagName;sInputTag=sInputTag.toLowerCase();if(sInputTag=="fieldset")return 0;if(sInputTag=="object"&&!g)return 0;if(b=a.type)b=b.toLowerCase();if(!e&&b=="button")return 0;if(a.style&&(a.style.visibility=="hidden"||a.style.display=="none"))b="hidden";if(!c&&b=="hidden")return 0}return h}
function CheckInputName(a,b,c,d,e){var g=0;if(g=CheckInput(a,b,c,d,e))if(typeof a.name=="undefined"||a.name=="")g=0;return g}function ValidarInput(a,b,c){var d=0;b||(b=0);if(CheckInputName(a,0,b))if(c)d=1;else{a=a.name.substr(1,1);if(a=="_"||a=="x")d=1}return d}
function CheckColorForm(a){var b=0;window.onerror=function(d,e,g){d="[i_form.CheckColorForm] FORM invalido '"+IForm.m_oForm+"' o nombre de INPUT erroneo: '"+a+"'\n\n"+e+"\nLinea "+g+" : "+d;ErroresForm(d);return true};var c=IForm.m_oForm[a];window.onerror=g_oOnErrorEvent;if(CheckInput(c)&&(isNaN(c.length)||c.length<2)){b=1;a.substr(0,1).toUpperCase()}return b}function CheckTipoForm(a,b){if(a){var c="",d=a.substr(1,1);if(b||d=="_"||d=="x")c=a.substr(0,1);return c}}
function DebugForm(a,b){ErrorJS(DebugFormInfo(a,b,1),null,4,1)}function DebugFormInfo(a,b,c){var d=InfoDevPage();if(b)d+=DebugInput(a[b]);else{b=1;if(!a)b=document.forms.length;if(b==0)d+="\nEsta página no tiene ningún <FORM> válido.";for(var e=0;e<b;e++){if(!a||e>0)a=document.forms[e];d+=InfoDevForm(a);for(var g=0;g<a.length;g++)d+=DebugInput(a[g],c)+"\n"}}return d}
function DebugInput(a,b){var c,d,e="";e+=a.name+" / ";c=a.type;if(!c)c=a.tagName;e+=c+" / ";e+=(a.disabled?"disabled":"enabled")+" / ";if(a.style&&a.style.visibility=="hidden")e+="visibility: hidden / ";d=" / (";for(var g=0;g<a.attributes.length;g++)if(a.attributes[g].specified)d+=a.attributes[g].nodeName+":"+a.attributes[g].nodeValue+",";d+=")";if(c=="select-one"||c=="select-multiple"){c=a.length;e+="("+a.length+" opciones)";e+=" ["+GetInputValue(a)+"]";e+=d;if(c)e+="\n";g="";if(b&&c>3){c=3;g=""}for(d=
0;d<c;d++)e+=DebugOption(a,d,g);if(a.length>c){e+="\t. . . .";e+=DebugOption(a,a.length-1,g)}}else{if(d=GetMaxLength(a))e+=" ("+SqlTextLen(a.value)+"/"+d+") ";e+=" ["+GetInputValue(a)+"]";if(a.checked)e+=" checked"}return e}function DebugOption(a,b,c){var d="";if(a.options[b].selected)d=" selected";c=c+"\t"+(b+1)+". "+a.options[b].text+" ";c+="["+a.options[b].value+"]"+d;return c}
function GetMaxLength(a){var b=0;if(a.attributes.maxlength)b=a.attributes.maxlength.nodeValue;else if(typeof a.maxLength!="undefined")b=a.maxLength;else if(typeof a.maxlength!="undefined")b=a.maxlength;if(b>1E6||b<0)b=0;return b}
function CheckIntegrity(a){var b,c,d,e,g,h,j,k,l="",n=1;if(!a)n=document.forms.length;if(n==0)l+="\nEsta página no tiene ningún <FORM> válido.";for(c=0;c<n;c++){if(!a||c>0)a=document.forms[c];l+="- "+a.name+" -\n";d=0;k=[];for(b=0;b<a.length;b++)if(CheckInput(a[b],0,1,0,1))if(CheckInputName(a[b],0,1,0,1)){e=a[b].name;k[d++]=e;g=e.substr(1,1);h=g.toLowerCase();if(h!="_"&&h!="x"&&h!="y"&&h!="z")l+="ERROR\t["+e+"]\tModo de validacion '"+g+"' desconocido\n";if(e.indexOf(" ")!=-1)l+="ERROR\t["+e+"]\tTiene espacios en el nombre\n";
if(e.toLowerCase()=="submit")l+="ERROR\t["+e+"]\tHay un INPUT con name='"+e+"'\n";j=e.substr(0,1).toLowerCase();if(j=="p"&&g=="X")l+="ERROR\t["+e+"]\tEl modo de validacion es 'X' y debe ser 'x' en minuscula\n";if(h!="z"&&(j=="a"||j=="b"||j=="c"||j=="e"||j=="p"||j=="u"||j=="v"))if(GetMaxLength(a[b])==0)l+="WARN\t["+e+"]\tNo tiene definido el 'maxlength'\n"}else l+="ERROR\t[...]\tHay un INPUT de tipo '"+a[b].type+"' sin 'name' definido\n";else{e=a[b].name;if(CheckInput(a[b],0,1,1))l+="WARN\t["+e+"]\tEsta 'disabled'\n"}if(k.length){b=
k.f_subDistinct(0,0,1);if(b.length)l+="ERROR !\t["+b+"]\tEstos INPUTs tienen el nombre repetido\n"}}l+="\n\n"+g_sAlertas;return l}function TeclaPulsadaF7(){TeclaPulsada("",118)}function TeclaPulsadaF8(){TeclaPulsada("",119)}function TeclaPulsadaF9(){TeclaPulsada("",120)}function TeclaPulsadaF10(){TeclaPulsada("",121)}function TeclaPulsadaTAB(){TeclaPulsada("",9)}
function TeclaPulsada(a,b){var c,d,e,g=1;d=bIE?event.srcElement:a.target;e=d.tagName.toUpperCase();if(!b){g=0;if(bIE){b=window.event.keyCode;if(g_bControlKeys&&window.event.ctrlKey)g=1}else b=a.which}if(b==13){c=1;if(bIE&&event.srcElement.protocol=="javascript:")c=0;if(!g_bSelectSubmit&&e=="SELECT"||e=="TEXTAREA")c=0;if(c&&g_sTecladoFuncion&&g_bSubmitOn==0){window.onerror=function(h,j,k){h="[TeclaPulsada] No existe o da error la funcion: '"+g_sTecladoFuncion+"'\n\n"+j+"\nLinea "+k+" : "+h;ErroresForm(h);
return true};if((c=bIE?event.srcElement.form:a.target.form)&&c.length&&CountInputsByType(c,"text")+CountInputsByType(c,"password")==1)ErroresForm("AVISO 1",c);else{IForm.m_oForm=c;eval(g_sTecladoFuncion+"(IForm.m_oForm)")}window.onerror=g_oOnErrorEvent}}if(g)switch(b){case 118:DebugForm();break;case 119:ErrorJS(CheckIntegrity()+"\n"+DebugInitValues(),null,4,1);break;case 120:AutoFill("",1);break;case 121:AutoFill();break;case 9:if(g_bTextareaTabKey&&e=="TEXTAREA"){d.selection=document.selection.createRange();
d.selection.text=String.fromCharCode(9);event.returnValue=false}}}function CountInputsByType(a,b){for(var c=0,d=0;d<a.length;d++)a[d].type==b.toLowerCase()&&c++;return c}function DebugInitValues(){var a="";if(typeof IForm.m_maValues[0]!="undefined"&&IForm.m_maValues[1].length){a+="[maFormNamesValues]\n";for(f=0;f<IForm.m_maValues[0].length;f++)a+=f+1+".\t"+IForm.m_maValues[0][f]+"\t=\t'"+a_vFormValues[f]+"'\n"}else a+="No estan definidos los arrays 'a_sFormNames' y 'a_vFormValues'";return a}
function InitTextAreaMaxLength(){for(var a=document.getElementsByTagName("TEXTAREA"),b=-1,c=a.length;++b<c;){oIGZ.m_bFF&&a[b].addEventListener("onkeyup",TextAreaMaxLength,true);a[b].onkeyup=TextAreaMaxLength}}function TextAreaMaxLength(a,b){var c=this;if(oIGZ.m_bFF)c=a.currentTarget;if(c.getAttribute("maxlength")&&c.value.length>c.getAttribute("maxlength")){if(b)c.value=c.value.substring(0,c.getAttribute("maxlength"));ColorForm(c,0)}}
function TextareaLen(a){var b=GetMaxLength(a);a=SqlTextLen(a.value);var c=0;if(b&&a>b){c=1;g_sErrorText=oIGZ.f_langText("CorregirLongitudMaxima",[a-b])}return c}function AddSelected(a,b,c,d,e){a=typeof a=="object"?a:document.forms[a];b=typeof b=="object"?b:a[b];c=typeof c=="object"?c:a[c];for(a=0;a<b.length;)if(e||b[a].selected)if(SearchPosInArray(c,b[a].value,"value")==-1){c.options[c.length]=new Option(b[a].text,b[a].value);if(d)b[a]=null;else a++}else a++;else a++}
function DelSelected(a,b,c,d,e){a=typeof a=="object"?a:document.forms[a];b=typeof b=="object"?b:a[b];if(typeof d=="undefined")d=1;if(e>=0)b[e]=null;else for(e=0;e<b.length;)if(c||b[e].selected==d)b[e]=null;else e++}function DelDuplicated(a,b,c){var d,e;a=typeof a=="object"?a:document.forms[a];b=typeof b=="object"?b:a[b];c=typeof c=="object"?c:a[c];if(!IsNull(b)&&!IsNull(c))for(a=0;a<b.length;){e=b[a].value;for(d=0;d<c.length;)if(c.options[d].value==e)c[d]=null;else d++;a++}}
function SelectOptions(a,b,c,d,e){var g,h,j,k,l=null;if(typeof b!="object"){if(typeof a!="object")a=document.forms[a];b=a[b]}if(e){h=1;l=e}if(d){g=1;l=d}if(IsNull(l))for(a=0;a<b.length;){b.options[a].selected=c;a++}else for(var n=0;n<l.length;n++){a=0;for(k=j=-1;a<b.length;){if(h&&b.options[a].text==e[n])j=a;if(g&&b.options[a].value==d[n])k=a;a++}nOpcion=-1;if(!h&&k!=-1)nOpcion=k;if(!g&&j!=-1)nOpcion=j;if(h&&g&&k==j&&k!=-1)nOpcion=j;if(nOpcion!=-1)b.options[nOpcion].selected=c}}
function AddSelectedArray(a,b,c,d,e,g){a=typeof a=="object"?a:document.forms[a];b=typeof b=="object"?b:a[b];c=typeof c=="object"?c:a[c];SelectOptions(a,b,1,d,e);AddSelected(a,b,c,g)}function Select2MArray(a){for(var b=0,c=[[0],[0]];b<a.length;){c[0][b]=a.options[b].text;c[1][b]=a.options[b].value;b++}return c}function CompararCIAI(a,b){return a.f_compare(b)}
function OrdenarSelect(a,b,c){if(a.options.length){b||(b=0);var d=a.form,e=Select2MArray(a),g=e[b].concat();g.sort(c?CompararCIAI:null);var h=[];SelectOptions(d,a,1);DelSelected(d,a,1);for(var j=0;j<g.length;j++){c=BuscaArray(e[b],g[j],0);h[j]=e[1-b][c]}b?Array2Select(g,h,d,a):Array2Select(h,g,d,a)}}function Array2Select(a,b,c,d,e){var g,h,j,k;c=typeof c=="object"?c:document.forms[c];k=typeof d=="object"?d:c[d];d=b.length;for(g=0;g<d;g++){h=g;if(a)h=a[g];j=h;if(b)j=b[g];InsertOption(c,k,h,j,e)}}
function InsertOption(a,b,c,d,e){if(a=typeof a=="object"?a:document.forms[a]){b=typeof b=="object"?b:a[b];if(!IsNull(b)){if(e)for(e=0;e<b.length;)if(b.options[e].value==c)b[e]=null;else e++;b.options[b.length]=new Option(d,c)}}}function UpdateSelect(a,b,c,d,e,g,h){var j=a.form;a=a.value;if(IsNull(h))h=["- elegir -",""];d=c.f_maGetRegsIf([d],[a]);e=[h[0]].concat(c.f_maGetVal(e,d));c=[h[1]].concat(c.f_maGetVal(g,d));DelSelected(j,b,1);Array2Select(c,e,j,b);j[b].onchange&&j[b].onchange()}
function GrupoInputs(a,b,c,d){var e;IsArray(b)||(b=[b]);for(var g=0,h=0,j=0,k=0;k<b.length;){var l=a[b[k++]];if(GetInputValue(l)){g=1;j++}}a=g_a_sNoValidar;if(c)a=g_a_sSiValidar;if(SearchPosInArray(a,b[0],"")!=-1)h=1;if(d){if(g==h)e=g&&h?"Del":"Add"}else if(g!=h)e=g^c?"Del":"Add";if(e){if(e=="Add")a=a.concat(b);else for(k=0;k<b.length;k++)a=DelElement(a,b[k],"");if(c)g_a_sSiValidar=a;else g_a_sNoValidar=a}return j}
function FechaHoy(a){var b=new Date,c=b.getDate(),d=b.getMonth()+1;b=b.getFullYear();var e=c+"/"+d+"/"+b;c="0"+c.toString();d="0"+d.toString();if(a==1)e=b.toString()+d.substr(d.length-2)+c.substr(c.length-2);if(a==2)e=c.substr(c.length-2)+"/"+d.substr(d.length-2)+"/"+b.toString();if(a==3)e=c.substr(c.length-2)+d.substr(d.length-2)+b.toString();if(a==4)e=c.substr(c.length-2)+"-"+d.substr(d.length-2)+"-"+b.toString();return e}
function HoraHoy(){var a=new Date,b=a.getHours();a="0"+a.getMinutes();return b+":"+a.substr(a.length-2)}function CambiaFecha(a,b){var c,d,e;a||(a=FechaHoy(0));if(!b){b=a.substr(1,1);isNaN(b)||(b=a.substr(2,1));isNaN(b)||(b="/")}c=a.indexOf(b);d=a.lastIndexOf(b);if(c!=-1||d!=-1){e=a.substring(0,c);c=a.substring(c+1,d);d=a.substring(d+1);a=c+b+e+b+d}return a}g_vCicloInputValue=null;
function CicloColores(a,b,c,d,e,g){if(CheckColorForm(a)){var h=IForm.m_oForm[a];if(!h.clientTop){var j,k,l="#";if(IsNull(g_vCicloInputValue))g_vCicloInputValue=h.value;if(g_vCicloInputValue!=h.value)g_vCicloInputValue=null;else{g++;if(g!=d){for(f=0;f<3;f++){j=parseInt("0x"+b.substr(1+f*2,2));k=parseInt("0x"+c.substr(1+f*2,2));j=Math.round(j+(k-j)*g/d);if(j<16)l+="0";l+=j.toString(16)}a="CicloColores('"+a+"','"+b+"','"+c+"',"+d+","+e+","+g+")"}else{l=c;g=0;a="CicloColores('"+a+"','"+c+"','"+b+"',"+
d+","+e+","+g+")"}g_vTimeoutID=setTimeout(a,e);h.style.backgroundColor=l}}}}function AutoInitInput(a){var b,c,d,e=1;if(!a)e=document.forms.length;for(b=0;b<e;b++){if(!a||b>0)a=document.forms[b];for(c=0;c<a.length;c++){d=a[c];IForm.f_initInput(d);IForm.f_initInputText(d)}}}function BuscaArray(a,b,c){var d,e,g;e=-1;if(IsArray(a)&&b){d=a.length;if(c)b=b.toLowerCase();for(;e<--d;){g=a[d];if(c)g=g.toLowerCase();if(g==b){e=d;break}}}return e}
function SearchPosInArray(a,b,c){var d=-1;if(IsArray(a))for(var e=a.length;d<--e;)if(c){if(eval("a_vArray[nLen]."+c)==b)d=e}else if(a[e]==b)d=e;return d}function DelElement(a,b,c){b=SearchPosInArray(a,b,c);if(b!=-1)a=DelOfArray(a,b,1);return a}function DelOfArray(a,b,c){c||(c=a.length-b);var d=a.slice(0,b);a=a.slice(b+c);return d.concat(a)}
function ErroresForm(a,b,c){a="["+IForm.m_sObj+" v"+IForm.m_nVersion+"]\n"+a;if(b){var d,e=b;if(b.form){e=b.form;d=b}if(e)a+="\nFORM:\n "+InfoDevForm(e);if(d)a+="\nINPUT:\n "+DebugInput(d,0)}ErrorJS(a,null,c,1)}function Texto2NumeroLib(a){a=""+a;reg=/[\x2e\x25\s]/g;importe_sin_puntos=a.replace(reg,"");importe_coma2punto=importe_sin_puntos.replace(",",".");return importe_retorno=1*importe_coma2punto}
function Texto2Numero(a,b){var c,d,e,g;a=new String(a);if(bExponente=a.toLowerCase().indexOf("e")>0){c=parseFloat(a);if(!isNaN(c))return c}a=""+a;c=a.replace(/[^0-9 .,-]/gi,"");if(b&&a!=c)return a;if(c=="")c="0";e=c.lastIndexOf(".");d=c.lastIndexOf(",");if(d>e){e=c.indexOf(",");g=/[\x2e]/g;c=c.replace(g,"");if(e==d){g=/[\x2c]/g;c=c.replace(g,".")}else{g=/[\x2c]/g;c=c.replace(g,"")}}else{d=c.indexOf(".");g=/[\x2c]/g;c=c.replace(g,"");if(d!=e){g=/[\x2e]/g;c=c.replace(g,"")}}e=c.lastIndexOf(".");if(new Number(c.substring(0,
e))!=0&&e==c.length-4&&(c.length<=7||c.length==8&&parseFloat(c)<0)){g=/[\x2e]/g;c=c.replace(g,"")}return parseFloat(c)}
function Numero2Texto(a,b,c,d,e){var g=[0,".",",",""],h=[0,",",".","."],j="";if(e){if(isNaN(parseFloat(a)))a=0}else a=Texto2Numero(a);if(c==null)c=1;if(a<0){j="-";a=Math.abs(a)}if(b){a=Math.round(a*Math.pow(10,b));a/=Math.pow(10,b);sNumeroEntero=Math.floor(a).toString()}else sNumeroEntero=Math.round(a).toString();sNumero=a.toString();nInicioDec=sNumeroEntero.length+1;sDecimales=sNumero.substring(nInicioDec,nInicioDec+b);if(d)for(i=sDecimales.length;i<b;i++)sDecimales+="0";for(sEntero="";sNumeroEntero>=
1E3;){sEntero=g[c]+sNumeroEntero.substring(sNumeroEntero.length-3,sNumeroEntero.length)+sEntero;sNumeroEntero=sNumeroEntero.substring(0,sNumeroEntero.length-3)}sEntero=sNumeroEntero+sEntero;return sNumeroEntero=sDecimales.length?j+sEntero+h[c]+sDecimales:j+sEntero}function HoraSplit(a,b){var c=eval("oForm.hzHora"+b+".value");if(c){c.split(":");eval("oForm.S_Hora"+b+".value=parseFloat(sHoras[0])");eval("oForm.S_Mins"+b+".value=sHoras[1]")}}
function HoraJoin(a,b){sHora=eval("oForm.S_Hora"+b+".value");sMins=eval("oForm.S_Mins"+b+".value");sHoras=sHora+":"+sMins;eval("oForm.hzHora"+b+".value=sHoras")}function InputEnabler(a,b,c,d,e){var g,h,j=1;if(!e)j=document.forms.length;for(g=0;g<j;g++){if(!e||g>0)e=document.forms[g];for(h=0;h<e.length;h++)if(!a||CheckInput(e[h],0,d,1))if(e[h].disabled)if(e[h].value){if(b)e[h].disabled=0}else if(c)e[h].disabled=0}}
function ChangeFieldsState(a,b,c,d){var e,g,h,j,k="";if(a.form)a=a.form;else a.tagName.toUpperCase()!="FORM"&&ErroresForm("[i_form.ChangeFieldsState] No se encontró el objeto FORM");if(a)for(e=0;e<b.length;e++)if(h=a[b[e]]){if(!h.length||!h[0].name)h=[h];for(g=0;g<h.length;g++){j=h[g];j.disabled=c;if(d)j.className=d}}else k+=b[e]+"\n";k&&ErroresForm("No se encontrarón los campos:\n"+k)}function EnabledFields(a,b,c){ChangeFieldsState(a,b,0,c)}
function DisabledFields(a,b,c){ChangeFieldsState(a,b,1,c)}
function SetObjState(a,b,c,d){if(document.forms.length>1&&GetType(a)==String)if(c){if(GetType(c)==String)c=document.forms[c];a=c[a]}else alert("SetObjState: Debes indicar un <FORM> para el elemento '"+a+"' porque existen varios <FORM> en la página.");else if(GetType(a)==String)a=document.forms[0][a];b||(b=a.getAttribute("oldClassName")?a.getAttribute("oldClassName"):a.getAttribute("className"));a.setAttribute("oldClassName",a.getAttribute("className"));a.setAttribute("className",b);a.disabled=d?0:
1}function SetObjEnabled(a,b,c){SetObjState(a,b,c,1)}function SetObjDisabled(a,b,c){SetObjState(a,b,c,0)}function SetAllState(a,b,c){if(a&&GetType(a)==String)a=document.forms[a];else a||(a=document.forms[0]);for(var d=0;d<a.length;d++)SetObjState(a[d],b,"",c)}function SetAllEnabled(a,b){SetAllState(a,b,1)}function SetAllDisabled(a,b){SetAllState(a,b,0)}
function CheckNeedFull(a,b){var c=a;if(a.form)c=a.form;else a.tagName.toUpperCase()!="FORM"&&ErroresForm("No se encontró el objeto FORM");if(c){for(var d,e="",g=0;g<b.length;g++){d=c[b[g]];CheckInput(d)||(e+=b[g]+"\n")}e&&ErroresForm("No se encontrarón los campos:\n"+e)}}
function DrawCombo(a,b,c,d,e,g,h){oISelect.m_a_sSelects.push(a);var j,k,l=0;d||(d=[]);if(e==-1){e=d;l=1}if(IsArray(d)&&IsArray(d[0]))d=GetCol(d[0],d[1],d[2]);if(IsArray(e)&&IsArray(e[0]))e=GetCol(e[0],e[1],e[2]);if(typeof e=="number"){k=e;e=[];for(j=0;j<d.length;j++)e[j]=j+k}k=[];a='<SELECT name="'+a+'" id="SELECT_'+a+'" ';if(b)a+=" "+b;a+=">";k[k.length]=a;if(c!=""){b=c;var n=j="";if(IsArray(c)){b=c[0];j=c[1];if(c[2])n=" "+c[2]}a="<OPTION value='"+j+"'";a+=n;if(g&&(b==g||j==g))a+=" selected";a+=
">"+b+"</OPTION>";k[k.length]=a}for(j=0;j<d.length-l;j+=1+l)if(d[j]){a="<OPTION ";if(IsArray(e)){a+='value="'+e[j+l]+'"';if(g&&(e[j+l]==g||d[j]==g))a+=" selected"}else if(g&&d[j]==g)a+=" selected";if(h)a+=" "+h[j%h.length];a+=">"+d[j]+"</OPTION>";k[k.length]=a}a="</SELECT>";k[k.length]=a;return k.join("")}function CreaCombo(a,b,c,d,e,g){ErrorJS("[i_form] CreaCombo() deprecado. Usar DrawCombo()","",5);return DrawCombo(a,b,c,d,e,g)}
function PrintCombo(a,b,c,d,e,g){document.write(DrawCombo(a,b,c,d,e,g))}function GetCol(a,b,c){var d=[],e=0;c||(c=2);b=parseInt(b);c=parseInt(c);for(var g=0;g<a.length;g+=c)d[e++]=a[g+b];return d}function GetValueRange(a){var b="";if(a){b=GetObjAttribute(a,"minvalue");if(IsNull(b))b=GetObjAttribute(a,"maxvalue");if(isNaN(b)&&!EsFecha(b))b=a.form[b].value}return b}
function IsNumberRange(a,b){var c=1;if(a&&a.value!=""){c=a.form;var d=a.value.f_toNumber(),e=GetObjAttribute(a,"minvalue"),g=GetObjAttribute(a,"maxvalue");if(e&&isNaN(e))e=c[e].value;if(g&&isNaN(g))g=c[g].value;c=d.f_range(e,g);if(!c&&b)g_sErrorText=oIGZ.f_langText("NumeroLimite",[e,g])}return c}
function IsDateRange(a,b){var c,d;c=0;var e=a.form;if(a&&a.value!=""){var g=GetObjAttribute(a,"minvalue"),h=GetObjAttribute(a,"maxvalue"),j=GetInputDate(a);if(j){if(g&&!IsNull(e[g])&&e[g].name==g){c=GetInputDate(e[g]);g=e[g].value}else c=g;if(h&&!IsNull(e[h])&&e[h].name==h){d=GetInputDate(e[h]);h=e[h].value}else d=h;c=j.f_range(c,d)}if(!c&&b)g_sErrorText=oIGZ.f_langText("FechaLimite",[g,h])}return c}
function GetInputDate(a){var b=null,c=a.value;if(c){var d;if(d=GetObjAttribute(a,"tipo")!=null?GetPrefixFromType(a):CheckTipoForm(a.name,1))switch(d.toUpperCase()){case "D":b=IInput.f_getDateFormatShow(a);break;case "F":b=IInput.f_getDateFormatShow(a);break;case "G":b=IInput.f_getDateFormatShow(a)}c=c.f_toDate(b,1)}return c}
function SetVisibAllSelect(a,b,c){for(var d,e,g,h=a?"visible":"hidden",j=0;j<document.forms.length;j++){d=document.forms[j];for(var k=0;k<d.length;k++){e=d[k];if(e.type=="select-one"||e.type=="select-multiple"){g=1;if(b)if(c==1)IsVisible(e)!=a&&e.setAttribute(b,1);else e.getAttribute(b)||(g=0);if(g)e.style.visibility=h}}}}function SetShowAllSelect(a){SetVisibAllSelect(1,a)}function SetHideAllSelect(a,b){SetVisibAllSelect(0,a,b)}function InitFixAtSubmit(){g_a_vFixAtSubmit=[]}
function AddFixAtSubmit(a,b){var c=g_a_vFixAtSubmit.length;g_a_vFixAtSubmit[c++]=a;g_a_vFixAtSubmit[c++]=b;g_a_vFixAtSubmit[c]=""}function FixAtSubmit(a){var b;ValidarCheckmarks(a);for(var c=0;c<g_a_vFixAtSubmit.length;c+=3){b=a[g_a_vFixAtSubmit[c]];if(CheckInput(b,0,1,1))if(g_a_vFixAtSubmit[c+1]=="Tipo_Y")SelectOptions(null,b,1);else{g_a_vFixAtSubmit[c+2]=GetInputValue(b);SetInputValue(b,g_a_vFixAtSubmit[c+1])}}}
IForm.f_resetFixAtSubmit=function(a){IForm.f_resetAutoCheckmark(a);for(var b=0;b<g_a_vFixAtSubmit.length;b+=3)SetInputValue(a[g_a_vFixAtSubmit[b]],g_a_vFixAtSubmit[b+2])};function FormCambios(a){var b,c,d;if(a)a=document.forms[0];var e=0;if(IForm.m_maValues[1].length==0)return 0;for(b=0;b<a.length;b++){d=a[b];if(ValidarInput(d,0)){c=BuscaArray(IForm.m_maValues[0],d.name,1);c!=-1&&d.type!="file"&&d.type!="hidden"&&d.value!=IForm.m_maValues[1][c]&&e++}}return e}
function InfoDevPage(){return"["+location.href+"]\n"}function InfoDevForm(a){return"name='"+a.name+"' action='"+a.action+"' method='"+a.method+"' enctype='"+a.encoding+"'\n"}function InfoDevInput(a){return"INPUT: "+DebugInput(a,1)+"\n"}
function AbrirCalendario(a,b,c,d){b||(b="calendario.html");c||(c=50);d||(d=50);if(IFormShield.m_bIE){c=IFormShield.m_nMousePosX+top.window.screenLeft+20;d=IFormShield.m_nMousePosY+top.window.screenTop-50}window.open(b+"?input="+a+"&modo=0","wCalendario","left="+c+",top="+d+",width=250,height=160")}var protected_oCalendarInput;
function DrawCalendar(a){var b=0,c="";a||(b=1);if(!b&&document.getElementsByName(a).length==0)alert("No hay ningún elemento con la propiedad name="+a);else if(!b&&document.getElementsByName(a).length>1)alert("Existe más de un elemento con la propiedad name="+a);else{b="";if(a){a=document.getElementsByName(a)(0);b=a.form.name+"."+a.name}GetType("g_sFullPathIcons",1)||(g_sFullPathIcons="../../pix/ico/calendar/");c+="<A tipo='editar' href='javascript://' onclick='OpenCalendar(\""+b+"\", this)'><IMG src='"+
g_sFullPathIcons+"calendario.gif' width=26 height=23 border=0 /></A>"}return c}function PrintCalendar(a){document.write(DrawCalendar(a))}function OpenCalendar(a,b){a||(protected_oCalendarInput=GetInputElement(b));NewWin("wCalendario",oIGZ.m_sRootPath+"libs/js/calendario.html?input="+a+"&modo=1",250,160)}function IFormMouseMove(){if(!IsNull(event)){IFormShield.m_nMousePosX=event.clientX;IFormShield.m_nMousePosY=event.clientY}}
IFormShield=new function(){var a=navigator.userAgent.toLowerCase();this.m_bNS4=(this.m_bNS=this.m_bGecko=a.indexOf("gecko")!=-1)?a.indexOf("netscape")!=-1:a.indexOf("mozilla")!=-1&&a.indexOf("spoofer")==-1&&a.indexOf("compatible")==-1&&a.indexOf("opera")==-1&&a.indexOf("webtv")==-1&&a.indexOf("hotjava")==-1;this.m_bIE4=(this.m_bIE=a.indexOf("msie")!=-1&&a.indexOf("opera")==-1&&a.indexOf("webtv")==-1)&&!document.getElementById?1:0;if(this.m_bIE)document.onmousemove=IFormMouseMove;this.m_sBase="IFormShield";
this.m_sObj="o"+this.m_sBase;this.m_sId="L"+this.m_sBase;this.m_sElement="document.getElementById('"+this.m_sId+"')";if(this.m_bIE4)this.m_sElement="document.all['"+this.m_sId+"']";this.m_sLay=this.m_sElement+".style";this.f_setShow=function(){if(GetType("i_gfx_nVersion",1)&&i_gfx_nVersion>1.83)oShield.f_on();else{var b=document.getElementById(this.m_sId);if(IsNull(b))this.f_setEnabled(1);else{var c=document.getElementById(this.m_sId+"Txt");b.style.visibility="visible";c.style.visibility="visible"}SetHideAllSelect(this.m_sBase,
1)}};this.f_setHide=function(){if(GetType("i_gfx_nVersion",1)&&i_gfx_nVersion>1.83)oShield.f_off();else{var b=document.getElementById(this.m_sId);IsNull(b)&&ErroresForm("IFormShield.f_setHide : necesita hacer un f_setShow() antes");var c=document.getElementById(this.m_sId+"Txt");b.style.visibility="hidden";c.style.visibility="hidden";SetShowAllSelect(this.m_sBase)}};this.f_innerHTML=function(b){this.m_sInnerHTML=b;eval(this.m_sElement+".innerHTML=this.m_sInnerHTML")};this.f_setEnabled=function(b){var c=
document.getElementById(this.m_sId),d=document.getElementById(this.m_sId+"Txt");c&&c.parentNode.removeChild(c);d&&d.parentNode.removeChild(d);if(this.m_bNS4)return 0;d=document.body.scrollWidth;var e=document.body.scrollHeight,g=Math.min(document.body.clientWidth,d)/2+document.body.scrollLeft-50,h=Math.min(document.body.clientHeight,e)/2+document.body.scrollTop;c="";c+="<SPAN id='"+IFormShield.m_sId+"' style='position: absolute; top: 0; left: 0; z-index: 50; width: "+d+"; height: "+e+"'>";c+="<TABLE cellpadding='5' cellspacing='0' border='0' width='"+
d+"' height='"+e+"'>";c+="<TR>";c+="<TD bgcolor='"+g_sShieldBGColor+"' height='50' valign='top'>&#160;</TD>";c+="</TR>";c+="</TABLE>";c+="</SPAN>";c+="<SPAN id='"+IFormShield.m_sId+"Txt' style='position: absolute; top: "+h+"; left: "+g+"; z-index: 51;'>";c+=g_sShieldInner;c+="</SPAN>";d=document.createElement("SPAN");d.innerHTML=c;document.body.appendChild(d);this.m_bIE?eval(this.m_sLay+".filter='alpha(opacity="+g_nShieldAlpha+")'"):eval(this.m_sLay+".opacity="+g_nShieldAlpha/100);b||this.f_setShow()}};
function TextInput2Input(a){if(a.getAttribute("noShow"))a.style.display="inline";else{switch(a.type){case "textarea":a.value=a.value.f_replace("<BR>","\n",0,false,0,true);case "text":case "password":case "select-multiple":case "select-one":case "file":var b=document.getElementById("ig_"+a.name);b&&b.parentNode.removeChild(b);a.style.display="inline";break;case "submit":case "image":a.style.display="inline";break;case "hidden":break;default:a.disabled=false}(a=oIForm.f_removeDTO(a.name))&&oIGZ.f_checkLib("i_gfx",
0.2)&&oGFX.f_changeStyle("#"+a+".form2Text","display: inline;")}}
function Input2TextInput(a,b){var c,d,e=GetForm();IsArray(a)||(a=[a]);var g;for(c=0;c<a.length;c++){d=a[c];if(typeof d!="object")d=e[d];if(d.getAttribute("noShow"))d.style.display="none";else{g=d.type;if(IsUndefined(g))g=d.tagName;if(IsUndefined(g))g="";g=g.toLowerCase();switch(g){case "text":Input2Text(d,d.value,b);break;case "textarea":Input2Text(d,d.value.f_replace("\n","<BR>",0,false,0,true),b);break;case "select-multiple":case "select-one":case "select":g="";for(var h=0;h<d.options.length;h++)if(d.options[h].selected&&
d.options[h].value!="")g+=d.options[h].text+"<BR/>";if(g)g=g.substring(0,g.length-5);Input2Text(d,g,b);break;case "password":case "submit":case "image":case "file":d.style.display="none";break;case "button":case "hidden":case "fieldset":break;default:d.disabled=true}(d=oIForm.f_removeDTO(d.name))&&oIGZ.f_checkLib("i_gfx",0.2)&&oGFX.f_changeStyle("#"+d+".form2Text","display: none;")}}}
function Input2Text(a,b,c){a.style.display="none";var d=document.createElement("SPAN");if(c)d.style.cssText=c;d.innerHTML=b;d.id="ig_"+a.name;a.parentNode.insertBefore(d,a)}
function SwapHideActionElements(a){if(oIGZ.f_checkLib("i_gfx",0.187))a?oGFX.f_changeStyle(".form2Text","display: inline;"):oGFX.f_changeStyle(".form2Text","display: none;");if(bIE){var b=document.all.item("noShow");if(b!=null){ErrorJS("[i_form.SwapHideActionElements] id='noShow' deprecado. Usar class='form2Text'","",5);if(b.length!=null)for(i=0;i<b.length;i++)b[i].style.display=a?"none":"none";else b.style.display=a?"":"none"}}}
function Form2TextForm(a,b){a=GetForm(a);for(var c=a.elements,d=0;d<c.length;d++){var e=c[d];if(e.className.indexOf("noForm2Text")==-1){Input2TextInput(e,b);e.setAttribute("_display","none")}}SwapHideActionElements(false)}function TextForm2Form(a){a=GetForm(a);a=a.elements;for(var b=0;b<a.length;b++){var c=a[b];if(c.className.indexOf("noForm2Text")==-1){TextInput2Input(c);c.setAttribute("_display","inline")}}SwapHideActionElements(true)}
function AllForms2TextForms(a){for(var b=0;b<document.forms.length;b++)Form2TextForm(document.forms[b],a)}function AllTextForms2Forms(){for(var a=0;a<document.forms.length;a++)TextForm2Form(document.forms[a])}function ComprobarForm(){ErroresForm("Falta la funcion ComprobarForm()")}oFormFile=function(){this.f_draw=function(a,b){return"<SPAN onclick='' >"+b+"</SPAN>"};this.f_print=function(a,b,c,d){document.write(this.f_draw(a,b,c,d))}};oIForm=IForm;oIFormShield=IFormShield;