function WINClassVentana(){var clase=this;var prop='';var WMovX=-1;  var WMovY=-1;var IFRAME=null;  var INPUTCierre=null;  var Tipo='DIV';var Top=0,Left=0,Ancho=300,Alto=100;var CentrarYflag=false,CentrarXflag=false;var AjustarYflag=false,AjustarXflag=false;var ScrollX='auto',ScrollY='auto';var NoSelect=false,NoObject=false;var Barra=true;var Mover=true;var ClassCab='WINDIVCab',ClassWin='WINDIVCont',ClassCierre='WININPUTCierre',ClassTitulo='WINSPANTitulo';var pagina='',titulo='';var EvtCerrar=null;var EvtUnload=null;if(WINClassVentana.arguments.length>0)prop=WINClassVentana.arguments[0];var p,dat;if(prop.length>0){p=prop.split(',');for(var i=0;i<p.length;i++){dat=p[i].split(':');if(dat.length>1)dat[1]=trim(dat[1]);dat[0]=trim(dat[0].toLowerCase());switch(dat[0]){case 'tipo':switch(dat[1]){case 'DIV':case 'IFRAME':break;default:dat[1]='DIV';break;};Tipo=dat[1];break;case 'top':Top=Math.floor(dat[1]);break;case 'left':Left=Math.floor(dat[1]);break;case 'ancho':Ancho=Math.floor(dat[1]);break;case 'alto':Alto=Math.floor(dat[1]);break;case 'centrar':switch(dat[1].toLowerCase()){case 'x':CentrarXflag=true;break;case 'y':CentrarYflag=true;break;case 'all':CentrarYflag=true;CentrarXflag=true;break;};break;case 'ajustar':switch(dat[1].toLowerCase()){case 'x':AjustarXflag=true;break;case 'y':AjustarYflag=true;break;case 'all':AjustarXflag=true;AjustarYflag=true;break;};break;case 'scrollx':switch(dat[1].toLowerCase()){case 'true':ScrollX='scroll';break;case 'false':ScrollX='hidden';break;case 'auto':ScrollX='auto';break;};break;case 'scrolly':switch(dat[1].toLowerCase()){case 'true':ScrollY='scroll';break;case 'false':ScrollY='hidden';break;case 'auto':ScrollY='auto';break;};break;case 'noselect':NoSelect=(dat[1].toLowerCase()=='true')?true:false;break;case 'noobject':NoObject=(dat[1].toLowerCase()=='true')?true:false;break;case 'barra':Barra=(dat[1].toLowerCase()=='true')?true:false;break;case 'mover':Mover=(dat[1].toLowerCase()=='true')?true:false;break;case 'classcab':ClassCab=dat[1];break;case 'classwin':ClassWin=dat[1];break;case 'classcierre':ClassCierre=dat[1];break;case 'classtitulo':ClassTitulo=dat[1];break;case 'evtcerrar':EvtCerrar=dat[1];break;case 'evtunload':EvtUnload=dat[1];break;default:break;};};};if(!Barra&&Mover)Mover=false;if(AjustarXflag)ScrollX='hidden';if(AjustarYflag)ScrollY='hidden';this.OBJContendor=null;this.DIVCabecera=null;this.SPANTitulo=null;this.LoadFlag=false;this.top=Top;this.left=Left;this.ancho=Ancho;this.alto=Alto;this.evtCerrar=EvtCerrar;this.evtUnload=EvtUnload;this.Abre=mtWINAbre;this.Cierra=mtWINCierra;this.CargaPagina=mtWINCargaPagina;  this.PonTitulo=mtWINPonTitulo;this.Foco=mtWINFoco;this.CentrarX=mtWINCentrarX;this.CentrarY=mtWINCentrarY;this.AjustarX=mtWINAjustarX;this.AjustarY=mtWINAjustarY;this.EstaAbierta=mtEstaAbierta;this.Descarga=mtDescarga;function mtDescarga(){eval(clase.evtUnload);};function mtWINAbre(){var AltoBarra=0;var Frame;if(clase.OBJContendor!=null)return;if(mtWINAbre.arguments.length>0)pagina=mtWINAbre.arguments[0];if(mtWINAbre.arguments.length>1)titulo=mtWINAbre.arguments[1];if(Tipo=='DIV'){IFRAME=document.createElement('IFRAME');IFRAME.style.position='absolute';IFRAME.style.visibility='hidden';document.body.appendChild(IFRAME);};clase.OBJContendor=document.createElement(Tipo);clase.OBJContendor.className=ClassWin;clase.OBJContendor.style.visibility='hidden';clase.OBJContendor.style.position='absolute';clase.OBJContendor.style.overflowX=ScrollX;clase.OBJContendor.style.overflowY=ScrollY;clase.OBJContendor.style.zIndex=1;document.body.appendChild(clase.OBJContendor);if(Tipo=='DIV'){EVTAsignaEvento(clase.OBJContendor,'mousedown',clase.Foco);EVTAsignaEvento(IFRAME,'load',CargaDiv);}else{EVTAsignaEvento(clase.OBJContendor,'load',CargaDiv);};if(clase.evtUnload!=null&&Tipo=='IFRAME')EVTAsignaEvento(Frame.contentWindow,'unload',clase.Descarga);if(Barra){clase.DIVCabecera=document.createElement('DIV');clase.DIVCabecera.className=ClassCab;clase.DIVCabecera.style.visibility='hidden';clase.DIVCabecera.style.position='absolute';clase.DIVCabecera.style.overflow='hidden';clase.DIVCabecera.style.zIndex=1;document.body.appendChild(clase.DIVCabecera);clase.SPANTitulo=document.createElement('SPAN');clase.SPANTitulo.innerHTML=titulo;clase.SPANTitulo.className=ClassTitulo;if(OBJQueNavegador()=='IE')clase.SPANTitulo.style.styleFloat='left';else clase.SPANTitulo.style.cssFloat='left';INPUTCierre=document.createElement('INPUT');INPUTCierre.type='button';INPUTCierre.value='X';INPUTCierre.className=ClassCierre;INPUTCierre.style.cursor='pointer';if(OBJQueNavegador()=='IE')INPUTCierre.style.styleFloat='right';else INPUTCierre.style.cssFloat='right';if(Mover){clase.DIVCabecera.style.cursor='pointer';clase.SPANTitulo.style.cursor='pointer';EVTAsignaEvento(clase.DIVCabecera,'mousedown',evWINMovIni);};EVTAsignaEvento(INPUTCierre,'mousedown',evWINClickCierre);clase.DIVCabecera.appendChild(clase.SPANTitulo);clase.DIVCabecera.appendChild(INPUTCierre);INPUTCierre.style.height=clase.SPANTitulo.offsetHeight+'px';};if(Barra){clase.DIVCabecera.style.width=clase.ancho+'px';clase.DIVCabecera.style.left=clase.left+'px';clase.DIVCabecera.style.top=clase.top+'px';AltoBarra=Math.floor(clase.DIVCabecera.offsetHeight);};clase.OBJContendor.style.width=clase.ancho+'px';clase.OBJContendor.style.height=clase.alto+'px';clase.OBJContendor.style.left=clase.left+'px';clase.OBJContendor.style.top=(clase.top+AltoBarra)+'px';if(pagina!='')clase.CargaPagina(pagina);else AjusteYCentrado();};function mtWINCierra(){if(clase.OBJContendor==null)return;if(WMovX!=-1||WMovY!=-1){EVTEliminaEvento(document,'mousemove',evWINMovMueve);EVTEliminaEvento(document,'mouseup',evWINMovFin);if(Tipo=='IFRAME'){var obj=clase.OBJContendor.contentWindow.document;EVTEliminaEvento(obj,'mousemove',evWINMovMueve);EVTEliminaEvento(obj,'mouseup',evWINMovFin);};WMovX=-1;WMovY=-1;};document.body.removeChild(clase.OBJContendor);if(Barra)document.body.removeChild(clase.DIVCabecera);if(Tipo=='DIV')document.body.removeChild(IFRAME);delete clase.OBJContendor;if(Barra)delete clase.DIVCabecera;if(Tipo=='DIV')delete IFRAME;clase.OBJContendor=null;;clase.DIVCabecera=null;IFRAME=null;INPUTCierre=null;clase.SPANTitulo=null;if(OBJQueNavegador()=='IE'){if(NoSelect)OBJSELECTMuestra();if(NoObject)OBJSELECTMuestra();};};function mtWINCargaPagina(pagina){var Frame;if(clase.OBJContendor==null)return;if(pagina=='')return;clase.LoadFlag=true;if(Tipo=='DIV')Frame=IFRAME; else Frame=clase.OBJContendor;Frame.src=pagina;};function CargaDiv(){if(Tipo=='DIV')clase.OBJContendor.innerHTML=IFRAME.contentWindow.document.body.innerHTML;clase.LoadFlag=false;AjusteYCentrado();};function AjusteYCentrado(){var Al;clase.AjustarY();clase.AjustarX();clase.CentrarY();clase.CentrarX();if(clase.OBJContendor.style.visibility=='visible'){if(OBJQueNavegador()=='IE'&&!AjustarYflag&&!AjustarXflag){Al=clase.OBJContendor.style.height;clase.OBJContendor.style.height='0px';clase.OBJContendor.style.height=Al;};return;};if(OBJQueNavegador()=='IE'){if(NoSelect)OBJSELECTOculta(clase.OBJContendor,'SELECT');if(NoObject)OBJSELECTOculta(clase.OBJContendor,'OBJECT');};clase.OBJContendor.style.visibility='visible';if(Barra)clase.DIVCabecera.style.visibility='visible';};function mtWINPonTitulo(titulonew){titulo=titulonew;clase.SPANTitulo.innerHTML=titulonew;};function mtWINFoco(){var zm0=OBJzindexMax();var zm1=Math.floor(clase.OBJContendor.style.zIndex);if(zm1<=zm0){zm0++;clase.OBJContendor.style.zIndex=zm0;if(clase.DIVCabecera!=null)clase.DIVCabecera.style.zIndex=zm0;};};function mtWINCentrarY(){if(!CentrarYflag)return;var Top=0,AltoBarra=0;var AlWin=clase.OBJContendor.offsetHeight;var MAl;if(OBJQueNavegador()=='IE')MAl=document.body.scrollTop+Math.round(document.body.clientHeight/2);else MAl=document.body.scrollTop+Math.round(window.innerHeight/2);if(Barra)AlWin+=clase.DIVCabecera.offsetHeight;Top=MAl-Math.round(AlWin/2);if(Top<0)Top=0;if(Barra){clase.DIVCabecera.style.top=Top+'px';AltoBarra=Math.floor(clase.DIVCabecera.offsetHeight);};clase.OBJContendor.style.top=(Top+AltoBarra)+'px';clase.top=Top;};function mtWINCentrarX(){if(!CentrarXflag)return;var Left=0;var AnWin=clase.OBJContendor.offsetWidth;var MAn;if(OBJQueNavegador()=='IE')MAn=document.body.scrollLeft+Math.round(document.body.clientWidth/2);else MAn=document.body.scrollLeft+Math.round(window.innerWidth/2);Left=MAn-Math.round(AnWin/2);if(Left<0)Left=0;if(Barra)clase.DIVCabecera.style.left=Left+'px';clase.OBJContendor.style.left=Left+'px';clase.left=Left;};function mtWINAjustarY(){if(!AjustarYflag)return;var Alto;var Frame;if(Tipo=='DIV')Frame=IFRAME;else Frame=clase.OBJContendor;if(Frame.contentWindow.document.body){Alto=OBJalto(Frame.contentWindow.document.body);if(Alto!=-1){if(OBJQueNavegador()=='IE')Alto+=4+20;Alto+=4;clase.OBJContendor.style.height=Alto+'px';clase.alto=Alto;};};};function mtWINAjustarX(){if(!AjustarXflag)return;var Ancho;var Frame;if(Tipo=='DIV')Frame=IFRAME;else Frame=clase.OBJContendor;if(Frame.contentWindow.document.body){Ancho=OBJancho(Frame.contentWindow.document.body);if(Ancho!=-1){if(OBJQueNavegador()=='IE')Ancho+=20;Ancho+=4;clase.OBJContendor.style.width=Ancho+'px';if(Barra)clase.DIVCabecera.style.width=Ancho+'px';clase.ancho=Ancho;};};};function mtEstaAbierta(){if(clase.OBJContendor==null)return false;else return true;};function evWINClickCierre(e){var flag=true;EVTNoPropagarEvento(e);if(clase.evtCerrar!=null)flag=eval(clase.evtCerrar);if(flag)clase.Cierra();};function evWINMovIni(e){EVTNoPropagarEvento(e);clase.Foco();WMovX=e.screenX;WMovY=e.screenY;EVTAsignaEvento(document,'mousemove',evWINMovMueve);EVTAsignaEvento(document,'mouseup',evWINMovFin);if(Tipo=='IFRAME'){var obj=clase.OBJContendor.contentWindow.document;EVTAsignaEvento(obj,'mousemove',evWINMovMueve);EVTAsignaEvento(obj,'mouseup',evWINMovFin);};};function evWINMovMueve(e){var MY,MX;var CY,CX;var quien;e=EVTDimeEvento(e);CX=clase.OBJContendor.style.left;CX=doNumber(CX);MX=Math.floor(CX)-(WMovX-e.screenX);CY=clase.OBJContendor.style.top;CY=doNumber(CY);MY=Math.floor(CY)-(WMovY-e.screenY);clase.OBJContendor.style.left=MX+'px';clase.OBJContendor.style.top=MY+'px';clase.DIVCabecera.style.left=MX+'px';clase.DIVCabecera.style.top=(MY-Math.floor(clase.DIVCabecera.offsetHeight))+'px';WMovX=e.screenX;WMovY=e.screenY;EVTNoPropagarEvento(e);};function evWINMovFin(e){EVTEliminaEvento(document,'mousemove',evWINMovMueve);EVTEliminaEvento(document,'mouseup',evWINMovFin);if(Tipo=='IFRAME'){var obj=clase.OBJContendor.contentWindow.document;EVTEliminaEvento(obj,'mousemove',evWINMovMueve);EVTEliminaEvento(obj,'mouseup',evWINMovFin);};EVTNoPropagarEvento(e);WMovX=-1;WMovY=-1;};};