PositionX = 100; PositionY = 100; defaultWidth = 500; defaultHeight = 500; var AutoClose = true; if (parseInt(navigator.appVersion.charAt(0))>=4){ var isNN=(navigator.appName=="Netscape")?1:0; var isIE=(navigator.appName.indexOf("Microsoft")!=-1)?1:0;} var optNN='scrollbars=no,width='+defaultWidth+',height='+defaultHeight+',left='+PositionX+',top='+PositionY; var optIE='scrollbars=no,width=150,height=100,left='+PositionX+',top='+PositionY; function popImage(imageURL,imageTitle,textoPie){ if (textoPie.length < 75){hPie=50;} else{hPie=100;} if (isNN){imgWin=window.open('about:blank','',optNN);} if (isIE){imgWin=window.open('about:blank','',optIE);} with (imgWin.document){ writeln('Loading...'); writeln(''); writeln(''); if (!AutoClose) writeln('') else writeln(''); writeln('
'); writeln('
'+textoPie+'
'); //writeln('
'+textoPie+'
'); close(); }} /*PositionX = 100; PositionY = 100; defaultWidth = 500; defaultHeight = 500; var AutoClose = true; if (parseInt(navigator.appVersion.charAt(0))>=4){ var isNN=(navigator.appName=="Netscape")?1:0; var isIE=(navigator.appName.indexOf("Microsoft")!=-1)?1:0;} var optNN='scrollbars=no,width='+defaultWidth+',height='+defaultHeight+',left='+PositionX+',top='+PositionY; var optIE='scrollbars=no,width=150,height=100,left='+PositionX+',top='+PositionY; function popImage(imageURL,imageTitle){ if (isNN){imgWin=window.open('about:blank','',optNN);} if (isIE){imgWin=window.open('about:blank','',optIE);} with (imgWin.document){ writeln('Loading...'); writeln(''); writeln(''); if (!AutoClose) writeln('') else writeln(''); writeln('
'); writeln(''); close(); }} */ /*OK Cambia los espacios en blanco por la marca   cadena - cadena de caracteres Devuelve la cadena con las marca de espacio blanco. */ function cambia_blancos(cadena) { Count=0; stotal=""; for (Count=0; Count < cadena.length; Count++) { Char = cadena.substring(Count, Count+1); if (Char != " ") stotal+=Char; else stotal+="%20"; } return(stotal); } //---------------------------------------------------- //Comprueba que el datos sea numerico function EsNumero(Dato) { numeros = "0123456789"; var caracter; var contador = 0; for (var i=0; i < Dato.length; i++) { caracter = Dato.charAt(i); if (numeros.indexOf(caracter) >= 0) { contador++; } } if (contador == Dato.length) { return (true); } else return (false); } /* añade ceros por la izda hasta alcanzar la longitud. lon - longitud minima de la cadena cadena - cadena de caracteres Devuelve la cadena con ceros por la izq y con la longitud minima indicada */ function pon_ceros(cadena,lon) { Count=0; stotal=cadena; tam=cadena.length; if (tam < lon) for (Count=tam;Count < lon;Count++) stotal="0"+stotal return(stotal); } //---------------------------------------------------- //Abre una ventana nueva. function abreventana(detalle) { var ancho; var alto; ancho=583; alto=420; var propiedades="scrollbars=yes,toolbar=no,location=no,directories=no,status=no,menubar=no,resizable=no,width="+ancho+",height="+alto+",top=0,left=0"; window.open(detalle,"SanFacundo",propiedades); } //--------------------------------------------------- //Pone en negrita las primeras palabras que esten en mayusculas function pon_negrita(cadena) { i=0; fin=false; acentos="ÁÉÍÓÚÑ "; tam=cadena.length; str=""; while(i "Z" )&&(acentos.indexOf(ch,0)==-1)) { str=str+""+cadena.substring(i,tam); fin = true; } else { str=str+ch; } i=i+1; } return(str); }