function cargacombo(combo, opciones, valor, disable){ 
  var a;
  var i;
  var n;
  var opt;
    

  borracombo(combo)
  
  a = opciones.split("#");
  n = a.length;
  
  for( i = 1 ; i < n ; i = i + 2){
     opt = document.createElement("OPTION");
     opt.text = a[i]
     opt.value = a[i-1];
     if (opt.value == valor) {
        opt.selected = true;
     }
     combo.options.add (opt);

  } 
  
  if (disable) combo.disabled=true; 
}

function borracombo(combo, blanco){
  var i;
  var n = combo.length;

  for(i = 0 ; i < n ; i++)
    combo.remove(0);
}

function Selecciona(combo,valor,texto){
  var i,n=combo.length;
  if(valor!=""){
    for(i=0;i<n;i++)
      if(combo.options(i).value==valor){
        combo.options(i).selected= true;
        break;
      }
  }else{
    for(i=0;i<n;i++)
      if(combo.options(i).text==texto){
        combo.options(i).selected= true;
        break;
      }
  }
}

function MoveOptions(src,dest,checks){
  var i,n,opt;
  var j,m,encontrado;
  
  n= src.length;
  for(i=0;i<n;i++){
    encontrado = false;
    if(src.options(i).selected){
      if (checks) {
        m= dest.length;
        for(j=0;j<m;j++)
		  if(dest.options(j).value==src.options(i).value) {
//		     alert('Ya esta seleccionado:\n'+src.options(i).text);
		     encontrado = true;
		     }
      }
      if (!encontrado){
		opt= new Option(src.options(i).text);
		opt.value = src.options(i).value;
		dest.add(opt);
		}
		src.remove(i--);
		n--;
		//}
    }
  }
}


function Comprueba(combo,variable){
	var i,n,cadena;
	cadena = '';
	n = combo.length;
	for (i=0;i<n;i++)
		cadena = cadena + '#' + combo.options(i).value;
	if (cadena.length>0)
		variable.value = cadena;
}

function ventana(url) {
	window.location = url;
}

var lastcmb
var dale = 0

function combo_click (combo,tam) {

	if ((dale==1)&&(combo!=lastcmb)) {
		lastcmb.style.height = '1px';
		lastcmb.filters.RevealTrans.transition=4; 
		lastcmb.filters.RevealTrans.Apply();
		lastcmb.style.visibility='hidden';
		lastcmb.filters.RevealTrans.play();
	}
	
	if (combo.style.visibility=='visible') {
		combo.style.height = '1px';
		combo.style.visibility='hidden';
	}else{
		combo.style.height = tam + 'px'
		combo.filters.RevealTrans.transition=5; 
		combo.filters.RevealTrans.Apply();
		combo.style.visibility='visible';
		combo.filters.RevealTrans.play();
	}
	
	lastcmb = combo
	dale = 1
}

function combo_out (item) {
	item.className='combo_texto'
}

function combo_over (item) {
	item.className='combo_texto_sel'
}

function combo_select (item, valor, item2, cvalor, combo, item3) {
	item.value = valor;
	item2.value = cvalor;
	combo_click(combo, item3); 
}

function mail(texto){ 

    var mailres = true;             
    var cadena = "abcdefghijklmnñopqrstuvwxyzABCDEFGHIJKLMNÑOPQRSTUVWXYZ1234567890@._-"; 
     
    var arroba = texto.indexOf("@",0); 
    if ((texto.lastIndexOf("@")) != arroba) arroba = -1; 
     
    var punto = texto.lastIndexOf("."); 
                 
     for (var contador = 0 ; contador < texto.length ; contador++){ 
        if (cadena.indexOf(texto.substr(contador, 1),0) == -1){ 
            mailres = false; 
            break; 
     } 
    } 

    if ((arroba > 1) && (arroba + 1 < punto) && (punto + 1 < (texto.length)) && (mailres == true) && (texto.indexOf("..",0) == -1)) 
     mailres = true; 
    else 
     mailres = false; 
                 
    return mailres; 
}


function getSO() {
	if (navigator.userAgent.indexOf('IRIX') != -1) {var SO = "Irix" } 
	else if ((navigator.userAgent.indexOf('Win') != -1) && (navigator.userAgent.indexOf('98') != -1)) {var SO= "Windows 98"} 
	else if ((navigator.userAgent.indexOf('Win') != -1) && (navigator.userAgent.indexOf('95') != -1)) {var SO= "Windows 95"} 
	else if (navigator.appVersion.indexOf("16") !=-1) {var SO= "Windows 3.1"} 
	else if (navigator.userAgent.indexOf("NT 5.1") !=-1) {var SO= "Windows XP"} 
	else if (navigator.userAgent.indexOf("NT 5.0") !=-1) {var SO= "Windows 2000"} 
	else if (navigator.appVersion.indexOf("NT") !=-1) {var SO= "Windows NT"} 
	else if (navigator.appVersion.indexOf("SunOS") !=-1) {var SO= "SunOS"} 
	else if (navigator.appVersion.indexOf("Linux") !=-1) {var SO= "Linux"} 
	else if (navigator.userAgent.indexOf('Mac') != -1) {var SO= "Macintosh"} 
	else if (navigator.appName=="WebTV Internet Terminal") {var SO="WebTV"} 
	else if (navigator.appVersion.indexOf("HP") !=-1) {var SO="HP-UX"} 
	else {var SO= "No identificado"} 
	return SO;
} 

function getNav() {
	var a = navigator.appVersion.split(';')
	var version = ''

	for (var i=0;i<a.length;i++) {	
		if (a[i].substr(1,4)=='MSIE') version = ' ' + a[i].substring(6)
}

return navigator.appName + version
}

	function getRes() {
		return screen.width + 'x' + screen.height
}

function formatCurrency(num)
{
  num = num.toString().replace(/\ |\,/g,'');
  if(isNaN(num)) 
    num = "0";
  cents = Math.floor((num*100+0.5)%100);
  num = Math.floor((num*100+0.5)/100).toString();
  if(cents < 10) 
    cents = "0" + cents;
  for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
    num = num.substring(0,num.length-(4*i+3))+','+num.substring(num.length-(4*i+3));
  
  return (' ' + num + '.' + cents);
}


function formatCurrency2(num)
{
  num = num.toString().replace(/\ |\./g,'');
  num = num.toString().replace(/\ |\,/g,'.');
  if(isNaN(num)) 
    num = "0";
  cents = Math.floor((num*100+0.5)%100);
  num = Math.floor((num*100+0.5)/100).toString();
  if(cents < 10) 
    cents = "0" + cents;
  for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
    num = num.substring(0,num.length-(4*i+3))+','+num.substring(num.length-(4*i+3));
  
  return (' ' + num + '.' + cents);
}
