function addcart(fam_cod, item_cod, nrcores){

	if (parseInt(nrcores) <= 1){
		location = 'carrinhos.asp?fam_cod='+fam_cod+'&item_cod='+item_cod+'&tipo=1';
	}
	else {
		window.open('produtos_cor.asp?fam_cod='+fam_cod+'&item_cod='+item_cod+'&tipo=1','Carrinho','width=600,height=450,resizable=0,scrollbars=yes,menubar=yes,status=no,left=119,top=0');		
	}
}

// abre janela do sistema de acordo com o tamanho da tela e sistema operacional
function abreGBS(tp, url, subpasta){

	if (url.length == 0){
		var url = '';
	}
	else {
		var url = Replace(url, '?', '%3F');
		var url = Replace(url, '=', '%3D');
		var url = Replace(url, '&', '%26');
	}

	if (subpasta == 'yes'){
		var subpasta = '../'
	}
	else {
		var subpasta = ''
	}

	if (screen.width > 800){
		if (tp == '1'){
			window.open(subpasta+'frames.asp?nr='+Math.random()+'&url='+url,'_blank');
		}
		else {
			location = subpasta+'frames.asp?nr='+Math.random()+'&url='+url;
		}
		return;
	}

	else{
		if (navigator.appVersion.split("Windows")[1].substring(1,6) == 'NT 5.1'){
			window.open(subpasta+'frames.asp?nr='+Math.random()+'&url='+url,'','fullscreen, scrollbars');
		}
		else {
			window.open(subpasta+'frames.asp?nr='+Math.random()+'&url='+url,'','width=800,height=600,resizable=0,scrollbars=no,toolbar=no;menubar=no,status=no,left=0,top=0');		
		}
	}
}

// popup de qualquer imagem
function popup_img(url, subpasta){
	if (subpasta == 'yes'){
		window.open('../imagem.asp?imagem=' + url,'imagem','width=1,height=1,resizable=0,scrollbars=no,menubar=no,status=no,left=0,top=0');	
	}
	else {
		window.open('imagem.asp?imagem=' + url,'imagem','width=1,height=1,resizable=0,scrollbars=no,menubar=no,status=no,left=0,top=0');
	}
}

// popup de itens
function popup_item(url, fam_tpmaterial, subpasta){

	// determina variáveis para o popup	
	var title 	= 'Itens - Ficha Técnica';
	var width	= '620';
	var height	= '400';
	var scroll	= 'yes';
	var url		= 'popup/it_itens.asp?fam_tpmaterial=' + fam_tpmaterial + '&' + url;
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}

// popup de clientes / fornecedores / representantes
function popup_cli(url, cli_tipo, subpasta){

	// determina variáveis para o popup	
	var title 	= '';
	var width	= '620';
	var height	= '400';
	var scroll	= 'yes';
	var url		= 'popup/pv_clientes.asp?cli_tipo='+cli_tipo+'&' + url;
	
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}

// popup de referências
function popup_ref(url, subpasta){

	// determina variáveis para o popup	
	var title 	= 'Referências';
	var width	= '620';
	var height	= '400';
	var scroll	= 'yes';
	var url		= 'popup/it_referencias.asp?' + url;
	
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}

// popup com todos os dados da referência
function popup_refdados(ref_cod, nivel, subpasta){

	// só abre quando for token ou pronta entrega
	if (nivel == 'A' || nivel == 'P'){	
		// determina variáveis para o popup	
		var title 	= 'Dados da Referência ' + ref_cod;
		var width	= '620';
		var height	= '350';
		var scroll	= 'yes';
		var url		= 'popup/it_referenciasdados.asp?nr='+Math.random()+'&ref_cod=' + ref_cod;
		
		// chama janela showmodal
		showmodal(url, title, width, height, scroll, subpasta);
	}	
}

// busca as cidades de acordo com o estado 
function iframe_cidades(obj, campo, uf_cod, tipo, valor){

	parent.iframe.location = 'iframes/if_gr_022a.asp?obj='+obj+'&campo='+campo+'&uf_cod='+uf_cod+'&tipo='+tipo+'&valor='+valor
}

// busca dados do cep
function iframe_cep(obj, cep, endereco, bairro, cidade, estado){
	parent.iframe.location.href = 'iframes/if_gr_cep.asp?obj='+obj+'&cep='+cep+'&endereco='+endereco+'&bairro='+bairro+'&cidade='+cidade+'&estado='+estado;
}

// busca as famílias de acordo com o material
function iframe_famcod(obj, mat_cod, fam_cod, gru_cod, valor, subpasta){

	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_it_004A.asp?obj='+obj+'&mat_cod='+mat_cod+'&fam_cod='+fam_cod+'&gru_cod='+gru_cod+'&valor='+valor+'&subpasta=yes';			
	}
	else{
		parent.iframe.location = 'iframes/if_it_004A.asp?obj='+obj+'&mat_cod='+mat_cod+'&fam_cod='+fam_cod+'&gru_cod='+gru_cod+'&valor='+valor;		
	}
}

// busca os itens de acordo com a família
function iframe_itemcod(obj, fam_cod, item_cod, valor, subpasta, tipo){
	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_it_009a.asp?obj='+obj+'&fam_cod='+fam_cod+'&item_cod='+item_cod+'&valor='+valor+'&subpasta=yes'+'&tipo='+tipo;			
	}
	else{
		parent.iframe.location = 'iframes/if_it_009a.asp?obj='+obj+'&fam_cod='+fam_cod+'&item_cod='+item_cod+'&valor='+valor+'&tipo='+tipo;	
	}
}

// busca os itens de acordo com a família
function iframe_corcod(obj, cor_cod, item_cod, subpasta, tipo){
	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_it_009b.asp?obj='+obj+'&cor_cod='+cor_cod+'&item_cod='+item_cod+'&subpasta='+subpasta+'&tipo='+tipo;
	}
	else{
		parent.iframe.location = 'iframes/if_it_009b.asp?obj='+obj+'&cor_cod='+cor_cod+'&item_cod='+item_cod+'&subpasta='+subpasta+'&tipo='+tipo;
	}
}

// busca as grupos de acordo com o família
function iframe_grucod(obj, fam_cod, gru_cod, valor, subpasta){
	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_it_008A.asp?obj='+obj+'&fam_cod='+fam_cod+'&gru_cod='+gru_cod+'&valor='+valor+'&subpasta=yes';		
	}
	else{
		parent.iframe.location = 'iframes/if_it_008A.asp?obj='+obj+'&fam_cod='+fam_cod+'&gru_cod='+gru_cod+'&valor='+valor;		
	}	
}

// busca as referências de acordo com a família
function iframe_refcod(obj, fam_cod, ref_cod, valor, subpasta){
	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_it_010C.asp?obj='+obj+'&fam_cod='+fam_cod+'&ref_cod='+ref_cod+'&valor='+valor+'&subpasta=yes';		
	}
	else{
		parent.iframe.location = 'iframes/if_it_010C.asp?obj='+obj+'&fam_cod='+fam_cod+'&ref_cod='+ref_cod+'&valor='+valor;		
	}
}

// busca os veículos de acordo com a produtora
function iframe_veiculos(cli_cod, subpasta){
	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		parent.iframe.location = 'iframes/if_es_017.asp?cli_cod='+cli_cod;
	}
	else{
		parent.iframe.location = 'iframes/if_es_017.asp?cli_cod='+cli_cod;
	}
}

// busca descrição da referência de acordo com o código
function iframe_refdescricao(obj, ref_cod, ref_descricao, subpasta){

	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_it_010B.asp?obj='+obj+'&ref_cod='+ref_cod+'&ref_descricao='+ref_descricao+'&subpasta=yes';		
	}
	else{
		parent.iframe.location = 'iframes/if_it_010B.asp?obj='+obj+'&ref_cod='+ref_cod+'&ref_descricao='+ref_descricao;		
	}
}


// busca os vendedores de acordo com a loja
function iframe_vendcod(obj, vend_cod, emp_cod, vend_status, valor, subpasta){
	// quando for uma iframe ou popup
	
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_pv_008B.asp?obj='+obj+'&vend_cod='+vend_cod+'&emp_cod='+emp_cod+'&vend_status='+vend_status+'&valor='+valor+'&subpasta=yes';		
	}
	else{
		parent.iframe.location = 'iframes/if_pv_008B.asp?obj='+obj+'&vend_cod='+vend_cod+'&emp_cod='+emp_cod+'&vend_status='+vend_status+'&valor='+valor;		
	}	
}

// busca dados do cliente
function iframe_clicod(obj, cli_cod, cli_nome, subpasta){

	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_pv_021C.asp?obj='+obj+'&cli_cod='+cli_cod+'&cli_nome='+cli_nome+'&subpasta=yes';		
	}
	else{
		parent.iframe.location = 'iframes/if_pv_021C.asp?obj='+obj+'&cli_cod='+cli_cod+'&cli_nome='+cli_nome;		
	}	
}

// carrega combo de clientes
function iframe_clibusca(obj, campo, tpcli, busca, valor, subpasta, tipo){

	// só atualiza quando o valor é válido
	if (busca.length != 0){
		// quando for uma iframe ou popup
		if (subpasta == 'yes'){
			iframe.location = '../iframes/if_pv_021A.asp?obj='+obj+'&campo='+campo+'&tpcli='+tpcli+'&busca='+busca+'&valor='+valor+'&subpasta=yes&tipo='+tipo;		
		}
		else{
			parent.iframe.location = 'iframes/if_pv_021A.asp?obj='+obj+'&campo='+campo+'&tpcli='+tpcli+'&busca='+busca+'&valor='+valor+'&tipo='+tipo;		
		}	
	}	
}

// carrega dados do cliente
function iframe_clidados(obj, campo, tipo, cli_cod, subpasta){

	// só atualiza quando o valor é válido
	if (cli_cod.length != 0){
		// quando for uma iframe ou popup
		if (subpasta == 'yes'){
			iframe.location = '../iframes/if_pv_021B.asp?obj='+obj+'&campo='+campo+'&tipo='+tipo+'&cli_cod='+cli_cod+'&subpasta=yes';	
		}
		else{
			parent.iframe.location = 'iframes/if_pv_021B.asp?obj='+obj+'&campo='+campo+'&tipo='+tipo+'&cli_cod='+cli_cod;
		}
	}	
}

// busca custo da referencia
function iframe_refcusto(obj, campo, descricao, ref_cod, cus_tipo, cus_data, subpasta){
	
	if (ref_cod.length == 0){
		return
	}
	
	// quando for uma iframe ou popup
	if (subpasta == 'yes'){
		iframe.location = '../iframes/if_pv_062A.asp?obj='+obj+'&campo='+campo+'&ref_cod='+ref_cod+'&descricao='+descricao+'&cus_tipo='+cus_tipo+'&cus_data='+cus_data+'&subpasta=yes';		
	}
	else{
		parent.iframe.location = 'iframes/if_pv_062A.asp?obj='+obj+'&campo='+campo+'&ref_cod='+ref_cod+'&descricao='+descricao+'&cus_tipo='+cus_tipo+'&cus_data='+cus_data;
	}	
}



function relatorios(url){
	window.open(url,'rel','width=765,height=487,resizable=0,scrollbars=yes,menubar=yes,status=no,left=12,top=12','_blank');
}


function totalreg(t){
	document.all.totalreg.style.color = "#ABACAB";
	document.all.totalreg.style.fontSize = "11px";
	document.all.totalreg.innerText = 'Registros Encontrados:    '+t;
}

// abre janela em modo modal de acordo com os parâmetros
function showmodal(url, title, width, height, scroll, subpasta){

	// determina variáveis input para o showmodal
	var input 		= {};
		input.title	= title;
		input.url	= url;		
		
	// se não for passado a variável scroll deixa padrão como no
	if (scroll == null){
		scroll = 'no';
	}

	// se não for passado a variável iframe deixa padrão como no
	if (subpasta == null){
		subpasta = 'no';
	}
	
	// se a função for chamada dentro de uma subpasta, volta um diretório para chamar a função modal
	if 	(subpasta == 'yes'){
		url = '../showmodal.asp';
	}
	else {
		url = 'showmodal.asp';
	}
	
	// chama janela showmodal
	output = showModalDialog(url,input,'dialogWidth:'+width+'px; dialogHeight:'+height+'px; help:no; status:no; scroll:'+scroll+'; resizable:yes; center:yes;');

	// executa script de output quando houver
	window.execScript(output);		
}

// popup de romaneios
function showmodal_rom(rom_num, subpasta){

	// determina variáveis para o popup	
	var title 	= 'Dados do Romaneio';
	var width	= '750';
	var height	= '500';
	var scroll	= 'yes';
	var url		= 'popup/pv_romaneios.asp?rom_num=' + rom_num;
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}

// popup de vendedores 
function showmodal_vndr(url, subpasta){

	// determina variáveis para o popup	
	var title 	= 'Vendedores';
	var width	= '500';
	var height	= '375';
	var scroll	= 'yes';
	var url		= 'popup/pv_vendedores.asp?' + url;
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}

// popup de clientes 
function showmodal_cli(url, subpasta){

	// determina variáveis para o popup	
	var title 	= 'Clientes';
	var width	= '500';
	var height	= '375';
	var scroll	= 'yes';
	var url		= 'popup/pv_clientes.asp?' + url;
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}

//popup do saldo do estoque
function showmodal_estoque(emp_cod, url, subpasta){

	// determina variáveis para o popup	
	var title 	= 'Estoque';
	var width	= '650';
	var height	= '400';
	var scroll	= 'yes';
	var url		= 'popup/es_estoque.asp?emp_cod='+emp_cod+'&'+ url;
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}

//popup de consulta de cep
function showmodal_cep(url, subpasta){

	// determina variáveis para o popup	
	var title 	= 'Cep';
	var width	= '620';
	var height	= '400';
	var scroll	= 'yes';
	var url		= 'popup/gr_cep.asp?'+ url;
	
	// chama janela showmodal
	showmodal(url, title, width, height, scroll, subpasta);
}









function Replace(vlr, s1, s2){	
	tmp = '';
	vlr = vlr.toString();
	
	for (var i = 0; i < vlr.length; i++){
		dig = vlr.charAt(i);
      	
		if (dig == s1){
			dig = s2
		}
		
		tmp = tmp + dig;		
    }
	
	return tmp;
}
	
function PressHora(str){
	var hora = ''
	if (str.length == 2){
		hora	  = str + ':';	
	} else {
		hora	  = str;
    }
	return hora;
}
	
function FormatNumberDown(s){
	
	if (event.keyCode == 110 || event.keyCode == 188){
		event.returnValue = false;
	}

	if (event.keyCode == 194 || event.keyCode == 190){
		for (var i = 0; i < s.length; i++){
			dig = s.charAt(i);
			if (dig == '.'){
				event.returnValue = false;
			}
    	}
	}	
	
	if (event.keyCode == 189 || event.keyCode == 109){
		for (var i = 0; i < s.length; i++){
			dig = s.charAt(i);
			if (dig == '-'){
				event.returnValue = false;
			}
    	}
	}	
}

function valorjs(valor){
	
	return parseFloat(Replace(valor, ',', ''));
	
}

function formatnumber(valor, dec){

	valor= valor.toString();

	if (valor.substring(0,1) == '-'){
		var negativo = 'yes';
	}
	else {
		var negativo = 'no';
	}

	if (valor.length == 1){
		if (valor.substring(0,1) == '.'){
			return '0.00';
		}			
		
		if (valor.substring(0,1) == '0'){
			return '0.00';
		}			
	}
	
	if (valor.length == 0){
		return '';
	}
	
	if (valor.substring(0,1) == '0'){
		valor = valor.substring(1,valor.length);
	}			

	var car  = '0123456789.';
	var tmp  = '';
	var dig  = '';
	var tot	 = 0;		
	
	 for (var i = 0; i < valor.length; i++){
		dig = valor.charAt(i);
      	if (car.indexOf(dig) >= 0){
			tmp = tmp + dig;	
		}
    }
	
	var valor = tmp;
	var tmp   = '';
	
	var str  = '' + Math.round(eval(valor) * Math.pow(10, dec));
	
	while (str.length <= dec){
		str = '0' + str;
	}


	
	var decp = str.length - dec;
	//var valor = str.substring(0, decp) + '.' + str.substring(decp, str.length);
	var valor  = str.substring(0, decp);
	var decimal= str.substring(decp, str.length);

	
	for (var i = 0; i < valor.length; i++){
		dig = valor.charAt(i);
      	tmp = dig + tmp;			
    }


	var valor = '';
	
	for (var i = 0; i < tmp.length; i++){
		dig = tmp.charAt(i);
		tot = parseInt(tot) + 1;
		
		
		if (tot == 3){
			tot = 0;
			dig = ',' + dig;
		}
	
		valor = dig + valor;	
    }
	
	var valor = valor + '.' +decimal;
	
	if (valor.substring(0,1) == ','){
		valor = valor.substring(1,valor.length);
	}
	
	if (negativo == 'yes'){
		valor = '-' + valor;
	}
	
	return valor;
}



function formatnumberreais(valor, dec){

	
	valor= valor.toString();

	if (valor.substring(0,1) == '-'){
		var negativo = 'yes';
	}
	else {
		var negativo = 'no';
	}

	if (valor.length == 1){
		if (valor.substring(0,1) == '.'){
			return '0.00';
		}			
		
		if (valor.substring(0,1) == '0'){
			return '0.00';
		}			
	}
	
	if (valor.length == 0){
		return '';
	}
	
	if (valor.substring(0,1) == '0'){
		valor = valor.substring(1,valor.length);
	}			

	
	valor = Replace(valor, ',', '#')
	valor = Replace(valor, '.', ',')
	valor = Replace(valor, '#', '.')
	
	var car  = '0123456789.';
	var tmp  = '';
	var dig  = '';
	var tot	 = 0;		
	
	 for (var i = 0; i < valor.length; i++){
		dig = valor.charAt(i);
      	if (car.indexOf(dig) >= 0){
			tmp = tmp + dig;	
		}
    }
	
	var valor = tmp;
	var tmp   = '';
	
	var str  = '' + Math.round(eval(valor) * Math.pow(10, dec));
	
	while (str.length <= dec){
		str = '0' + str;
	}


	
	var decp = str.length - dec;
	//var valor = str.substring(0, decp) + '.' + str.substring(decp, str.length);
	var valor  = str.substring(0, decp);
	var decimal= str.substring(decp, str.length);

	
	for (var i = 0; i < valor.length; i++){
		dig = valor.charAt(i);
      	tmp = dig + tmp;			
    }


	var valor = '';
	
	for (var i = 0; i < tmp.length; i++){
		dig = tmp.charAt(i);
		tot = parseInt(tot) + 1;
		
		
		if (tot == 3){
			tot = 0;
			dig = ',' + dig;
		}
	
		valor = dig + valor;	
    }
	
	var valor = valor + '.' +decimal;
	
	if (valor.substring(0,1) == ','){
		valor = valor.substring(1,valor.length);
	}
	
	if (negativo == 'yes'){
		valor = '-' + valor;
	}
	
	valor = Replace(valor, '.', '#')
	valor = Replace(valor, ',', '.')
	valor = Replace(valor, '#', ',')
	
	return valor;
}




function RetornaIdade(s,h){
var temp = 0;
	
	AnoNas 		= s.substring(6,10);
	MesNas 		= s.substring(3,5);
	DiaNas 		= s.substring(0,2);
	
	AnoAtual 	= h.substring(6,10);
	MesAtual 	= h.substring(3,5);
	DiaAtual 	= h.substring(0,2);

	temp = parseInt(AnoAtual) - parseInt(AnoNas);

	if (parseInt(MesAtual) == parseInt(MesNas)){
		if (parseFloat(DiaAtual) < parseFloat(DiaNas)){
			temp = parseInt(temp) - 1;
		}	
	}
	else{
		if (parseFloat(MesAtual) < parseFloat(MesNas)){ 
			temp = parseInt(temp) - 1;
		}	
	}
	return temp
}


function ChecaData(tipo,de,ate){
	de_ano 	= de.substring(6,10);
	de_mes 	= de.substring(3,5);
	de_dia 	= de.substring(0,2);
	de_data	= de_ano + de_mes + de_dia;
		
	ate_ano = ate.substring(6,10);
	ate_mes = ate.substring(3,5);
	ate_dia = ate.substring(0,2);
	ate_data= ate_ano + ate_mes + ate_dia;
		
	/* data de maior ou igual a data ate*/
	if (tipo == '1'){
		if (de_data >= ate_data) {return true;}
		else {return false;}
	}
		
	/* data de menor ou igual a data ate*/
	else if (tipo == '2'){
		if (de_data <= ate_data) {return true;}
		else {return false;}
	}
		
	/* data de igual a data ate*/
	else if (tipo == '3'){
		if (de_data = ate_data) {return true;}
		else {return false;}
	}
	
	return true;
}

function RetornaIdade(s,h){
var temp = 0;
	
	AnoNas 		= s.substring(6,10);
	MesNas 		= s.substring(3,5);
	DiaNas 		= s.substring(0,2);
	
	AnoAtual 	= h.substring(6,10);
	MesAtual 	= h.substring(3,5);
	DiaAtual 	= h.substring(0,2);

	temp = parseInt(AnoAtual) - parseInt(AnoNas);

	if (parseInt(MesAtual) < parseInt(MesNas)){ 
		temp = parseInt(temp) - 1;

	}	

	if (parseInt(MesAtual) == parseInt(MesNas)){
		if (parseInt(DiaAtual) < parseInt(DiaNas)){
			temp = parseInt(temp) - 1;
		}	
	}
	
	return temp
}

function PressUpper(s){
	temp = s.toUpperCase();
	return temp
}

function FocusCampo(num, de, para){
	x = parseInt(num);
	y = parseInt(de.length);
	if (x == y){
		para.focus();
	}
}

function ValidaMoeda(moe){
	
	var moe = moe.toUpperCase();
	var car = 'ABCDEFGHIJLMNOPQRSTUVXZYWK$';
	var tmp = '';
	var dig = '';
		
    for (var i = 0; i < moe.length; i++){
		dig = moe.charAt(i);
				
		if (car.indexOf(dig) < 0){
			return false	
		}		
    }

	return true
}

function PressData(s){
	
	if (event.keyCode == 8){
		return s
	}	
	
	if (s.length == 10){
		event.returnValue = false;
	}
	
	tamanho 	= s.length
	digito1		= s.substring(tamanho - 1,tamanho);
	digito2		= s.substring(tamanho - 2,tamanho - 1);
	
	if (digito1 == '/' && digito2 == '/'){s = s.substring(0,tamanho - 1); }
	
	if (s.length == 2){
		digito	= s.substring(1,2); 
		if (digito == '/'){
			temp 	= '0' + s;
			temp 	= temp.substring(0,3);
		}
		else{
			temp 	= s + '/';
			temp 	= temp.substring(0,3);
		}		
	} 	
	else if (s.length == 5){
		digito	= s.substring(4,5); 
		if (digito == '/'){
			digito	= s.substring(3,4); 
			temp 	= s.substring(0,3) + '0' + digito + '/';
			temp 	= temp.substring(0,6);
		}
		else{
			temp = s + '/';
			temp = temp.substring(0,6);
		}		
	} 	
	else if (s.length == 8){
		digito	= s.substring(6,8); 
		if (digito == '19' || digito == '20'){
			temp 	= s;
		}
		else{
			if (parseInt(digito) > 50){
				digito	= s.substring(6,8); 
				temp 	= s.substring(0,6) + '19' + digito;
			}
			else{
				digito	= s.substring(6,8); 
				temp 	= s.substring(0,6) + '20' + digito;
			}			
		}		
	} 
	else {temp = s}
	
	return temp
}

function ChecaData(tipo,de,ate){
	de_ano 	= de.substring(6,10);
	de_mes 	= de.substring(3,5);
	de_dia 	= de.substring(0,2);
	de_data	= de_ano + de_mes + de_dia;
		
	ate_ano = ate.substring(6,10);
	ate_mes = ate.substring(3,5);
	ate_dia = ate.substring(0,2);
	ate_data= ate_ano + ate_mes + ate_dia;
		
	/* data de maior ou igual a data ate*/
	if (tipo == '1'){
		if (de_data >= ate_data) {return true;}
		else {return false;}
	}
		
	/* data de menor ou igual a data ate*/
	else if (tipo == '2'){
		if (de_data <= ate_data) {return true;}
		else {return false;}
	}
		
	/* data de igual a data ate*/
	else if (tipo == '3'){
		if (de_data = ate_data) {return true;}
		else {return false;}
	}
	
	return true;
}
/*
	de 			= new Date("september 6, 2002 00:00:00");
	ano_hoje 	= hoje.getYear()
	mes_hoje 	= hoje.getMonth() + 1
	dia_hoje 	= hoje.getDay() 
	
	len_ano 	= new String(ano_hoje)
	len_mes 	= new String(mes_hoje)
	len_dia 	= new String(dia_hoje)
	
	if (len_mes.length == 1){mes_hoje = '0' + mes_hoje}
	if (len_dia.length == 1){dia_hoje = '0' + mes_hoje}




	s = acha_mes(2);
	document.write(s + "<br>")
	
	coco = s.substring(0,4)
	caca = coco.toUpperCase()

	document.write(caca)
	*/
	function acha_mes(s){
		var temp = '';
		
		if 		(s == 1) {temp = 'january'}
		else if (s == 2) {temp = 'february'}
		else if (s == 3) {temp = 'march'}
		else if (s == 4) {temp = 'april'}
		else if (s == 5) {temp = 'may'}
		else if (s == 6) {temp = 'june'}
		else if (s == 7) {temp = 'july'}
		else if (s == 8) {temp = 'august'}
		else if (s == 9) {temp = 'september'}	
		else if (s == 10){temp = 'october'}
		else if (s == 11){temp = 'november'}
		else if (s == 12){temp = 'december'}
		
		return temp
	}


/* Função para abrir janela */
function popup(u,n,w,h,l,t,s) {
	
	//var Treco={}; //wrapper para new Object();
	//var Result=null;

	//Treco.CodigoFonte=document.body.innerHTML;
	//Treco.FolhasDeEstilo=document.styleSheets;

	//Result=showModalDialog("popup.asp?url="+u,"","dialogWidth:800px;dialogHeight:600px;help:no;status:no;scroll:no;resizable:yes;");
	
	//window.execScript(Result);	

	
	window.open(u,n,'width='+w+',height='+h+',resizable=0,scrollbars='+s+',menubar=no,status=no,left='+l+',top='+t);
}

// Deixa so' os digitos no numero
function limpa_string(S){
var Digitos = "0123456789";
var temp = "";
var digito = "";
    for (var i=0; i<S.length; i++){
      digito = S.charAt(i);
      if (Digitos.indexOf(digito)>=0){temp=temp+digito}
    }
    return temp
}
	
/* Verifica se é um dígito válido */
function isdigit(c){if ((c >= '0') && (c <= '9')) return true; else return false;}

/* Verifica se é um númerico aceitável */
function ispunct(c)
{
 if ((c == '.') || (c == ',') || (c == '') || (c == '+') ||
     (c == '@') || (c == '_') || (c == '"') || (c == '-') ||
	 (c == '$') || (c == '#') || (c == '!') ||
	 (c == '%') || (c == '&') || (c == '*') || (c == '(') ||
	 (c == ')') || (c == '=') || (c == '{') || (c == '}') ||
	 (c == '[') || (c == ']') || (c == '/') || (c == '\\') ||
	 (c == ':') || (c == ';') || (c == '>') || (c == '<') ||
	 (escape(c) == '%20') )
 	 return true;
 else
    return false;
}

/* Verifica se é um texto válido */
function isalpha(c){
if (((c >= 'a') && (c <= 'z')) ||
     ((c >= 'A') && (c <= 'Z')))
 	 return true;
else
 	 return false;
}

/* Válida apenas os numeros de acordo como o isdigit e ispunct*/
function SoNumero(s){
 for (var i=0;i<s.length;i++) { 
 	  c = s.substring(i,i+1); 
	  if (!isdigit(c) && !ispunct(c))
	  	  return false;	  
 }
 return true;
 
}

/* Válida apenas numeros inteiros*/
function isInt(s){
 for (var i=0;i<s.length;i++) { 
 	  c = s.substring(i,i+1); 
	  if (!isdigit(c)){
	  	if(c!='-'){	return false;}
	  }	  
 }
 return true;
}


/* Função que válida apenas os e-mails */
function ValidaEmail(email) {
	var achou_ponto=false;
	var achou_arroba=false;
	var achou_caracter=false;
	for(var i=0; i<email.length; i++) {
		if (email.charAt(i)=="@") achou_arroba=true;
        else if (email.charAt(i)==".") achou_ponto=true;
        else if (email.charAt(i)!=" ") achou_caracter=true;
        }
        return (achou_ponto & achou_arroba & achou_caracter);
}

/* Função que valida as datas */
function ValidaData(s){
	var i, c, barras, data;
	var d = new Date();  
	n_barras = 0;					  
	if (s.length != 10) return false; 
	for(i=0; i<s.length; i++) {
	  c = s.substring(i,i+1);
	  if (c == "/") n_barras++;
	  if (n_barras > 2) return false;
	  if (!isdigit(c) && (c != "/")) return false;
	}
	if (n_barras != 2) return false;
	if ( (s.indexOf("/") != 2) || (s.lastIndexOf("/") != 5) )return false;
	d = s.substring(0, 2)// dia
	m = s.substring(3, 5)// mes
	a = s.substring(6, 11)// ano
	if (m<1 || m>12) return false;
	if (d<1 || d>31) return false;
	if (a<1900 || a>3000) return false;
	if (m==4 || m==6 || m==9 || m==11) { if (d==31) return false; }
	if (m==2 && d>28) {if (!(((a-2)%4 == 0) && d == 29)) return false;}
			 
	return true;
}

/* Função que valida o Cep*/
function ValidaCEP(s)
{
 var i;
 var c;
 var achou;

 if (s.length != 9) 
 	 return false;
 achou = false;
 for (i=0; i<s.length; i++) {
 	 c = s.substring(i,i+1); 
     if ( !isdigit(c) && (c != '-') ) 					
	  	  return false;
     if (c == '-') {
	   if (!achou) achou = true;
	   else 
			  return false;
	 }  	 	
 }
 if (s.indexOf("-")!=5) 
 	 return false;
 return true;
}

/* Função que válida CPF e CGC */
function ValidaCPFCGC(s){
	s = limpa_string(s);
	
	if (s.length == 11){
		if (!ValidaCPF(s)){
			return false;
		}
	}
	
	else if (s.length == 14){
		if (!ValidaCGC(s)){
			return false;
		}
	}
	
	else{
			return false;
	}
	
	return true;
}


	
/* Função que válida CPF */
function ValidaCPF(s)
{
	var i;
	s = limpa_string(s);
	var c = s.substr(0,9);
	var dv = s.substr(9,2);
	var d1 = 0;
	for (i = 0; i < 9; i++)
	{
		d1 += c.charAt(i)*(10-i);
	}
        if (d1 == 0) return false;
	d1 = 11 - (d1 % 11);
	if (d1 > 9) d1 = 0;
	if (dv.charAt(0) != d1)
	{
		return false;
	}

	d1 *= 2;
	for (i = 0; i < 9; i++)
	{
		d1 += c.charAt(i)*(11-i);
	}
	d1 = 11 - (d1 % 11);
	if (d1 > 9) d1 = 0;
	if (dv.charAt(1) != d1)
	{
		return false;
	}
        return true;
}

/* Função que válida CGC */
function ValidaCGC(s)
{
	var i;
	s = limpa_string(s);
	var c = s.substr(0,12);
	var dv = s.substr(12,2);
	var d1 = 0;
	for (i = 0; i < 12; i++)
	{
		d1 += c.charAt(11-i)*(2+(i % 8));
	}
        if (d1 == 0) return false;
        d1 = 11 - (d1 % 11);
	if (d1 > 9) d1 = 0;
	if (dv.charAt(0) != d1)
	{
		return false;
	}

	d1 *= 2;
	for (i = 0; i < 12; i++)
	{
		d1 += c.charAt(11-i)*(2+((i+1) % 8));
	}
	d1 = 11 - (d1 % 11);
	if (d1 > 9) d1 = 0;
	if (dv.charAt(1) != d1)
	{
		return false;
	}
        return true;
}

/* Função para validar Valores */
function SoValor(campo) {
	if (!SoNumero(campo)) {
		return false;
	}

	var count   = 0;
	var digitos = "0123456789.";
	var temp 	= "";

    for (var i=0; i< campo.length; i++){
     	if (digitos.indexOf(campo.charAt(i)) >= 0){
	  		temp = temp + campo.charAt(i)
		}
    }
	
	campo = temp;
	
	if (parseFloat(campo) > 999999999.99){
		return false;
	}
	
	return true;
}

/* menu */
function ME_Cbrowser() {
	var b=navigator.appName
	if (b=="Netscape") this.b="ns"
	else if (b=="Microsoft Internet Explorer") this.b="ie"
	else this.b=b
	this.version=navigator.appVersion
	this.v=parseInt(this.version)
	this.ns=(this.b=="ns" && this.v>=4)
	this.ns4=(this.b=="ns" && this.v==4)
	this.ns5=(this.b=="ns" && this.v==5)
	this.ie=(this.b=="ie" && this.v>=4)
	this.ie4=(this.version.indexOf('MSIE 4')>0)
	this.ie5=(this.version.indexOf('MSIE 5')>0)
	this.ie55=(this.version.indexOf('MSIE 5.5')>0)
	this.dom=((document.createRange&&(document.createRange().createContextualFragment))?true:false)
}

me=new ME_Cbrowser()

function abrediv(div) {
	if(me.ns5){obj=document.getElementById(div).style}
	else if(me.ie){obj=document.all[div].style}
	else if(me.ns4){obj=document.layers[div]}
	obj.visibility='visible'
}

function fechadiv(div) {
	if(me.ns5){obj=document.getElementById(div).style}
	else if(me.ie){obj=document.all[div].style}
	else if(me.ns4) {obj=document.layers[div]}
	obj.visibility='hidden'
}

function mO(src,clrOver) {
 if (!src.contains(event.fromElement)) {
  src.style.cursor = 'hand';
  src.bgColor = clrOver;
 }
}

function mU(src,clrIn) {
 if (!src.contains(event.toElement)) {
  src.style.cursor = 'default';
  src.bgColor = clrIn;
 }
}

function preenchezeros(campo, tamanho){
	//captura do texto
	var strText = campo;

	/*verifica se o campo está vazio e pede
	a confirmação do valor*/

	//há alguma string no campo
	//tamanho da string
	var intTamStr = strText.length;
	/*verifica se o tamanho da string eh 
	menor ou igual ao tamanho que eh pedido
	na funcão*/
	if (intTamStr <= tamanho){//executa a adaptação do texto
	//quantos zeros serão incluídos no texto
		var intTam = parseInt(tamanho) - intTamStr;
		//preenchimento do campo
		for (i=0; i<intTam; i++){
			strText = "0" + strText;
		}
		//retorna o resultado com os devidos zeros a esquerda
		return strText

	}else{ 
		// o texto eh maior do que eh pedido na função
		alert("Um dos campos de medida está maior do que o permitido");
	}
}

VerifiqueTAB=true;


//Verifica se o campo atingiu o tamanho maximo se verdadeiro pula para o proximo campo
function Mostra(quem, tammax) {
	if ( (quem.value.length == tammax) && (VerifiqueTAB) ) {
		var i=0,j=0, indice=-1;
		for (i=0; i<document.forms.length; i++) {
			for (j=0; j<document.forms[i].elements.length; j++) {
				if (document.forms[i].elements[j].name == quem.name) {
					indice=i;
					break;
				}
			}
			if (indice != -1)
		         break;
		}
		for (i=0; i<=document.forms[indice].elements.length; i++) {
			if (document.forms[indice].elements[i].name == quem.name) {
				while ( (document.forms[indice].elements[(i+1)].type == "hidden") &&
						(i < document.forms[indice].elements.length) ) {
							i++;
				}
				document.forms[indice].elements[(i+1)].focus();
				VerifiqueTAB=false;
				break;
			}
		}
	}
}


//PARA NO CAMPO COM O VALOR SELECIONADO
function PararTAB(quem) 
{ 
   VerifiqueTAB=false; 
} 
function ChecarTAB() 
{ 
   VerifiqueTAB=true; 
} 

function CalculaVolume(valor1,valor2,valor3){
	valor1 = parseFloat(valor1)
	valor2 = parseFloat(valor2)
	valor3 = parseFloat(valor3)
	
	resultado = valor1 * valor2 * valor3;
	return resultado;
}

/* troca-fundo */
function mOvr(src,clrOver) {
	 if (!src.contains(event.fromElement)) {
		 src.style.cursor = 'hand';
		 src.bgColor = clrOver;
	}
}

function mOut(src,clrIn) {
	if (!src.contains(event.toElement)) {
		src.style.cursor = 'default';
		src.bgColor = clrIn;
	}
}



/* ativa funções no formulário */
function pressform(obj){
var form = obj;
var x    = 0;

	/* loop em todos os campos do formulário */
	while ((x < form.elements.length)){
		
		/* campos números */
		if (form.elements[x].param == 'numero'){
			//form.elements[x].onkeyup = new Function('this.value=limpa_string(this.value);');	
		}
		
		/* campos datas */
		if (form.elements[x].param == 'data'){
			form.elements[x].onkeyup = new Function('if(this.value.length!=10){this.value=PressData(this.value);}');	
		}
		
		/* campos valor */
		if (form.elements[x].param == 'valor'){
			form.elements[x].style.textAlign = 'right';
			//form.elements[x].onblur = new Function("this.value=formatnumber(this.value,2);");				
		}
		
		x ++;			
	}
}


/* altera form */
function alteraform(obj){
var form = obj;

	form.tipo.value = '2';
}

/* cancelar form */
function cancelaform(obj){
var form = obj;
var z 	 = 0;
	

	var x = confirm('Tem certeza que deseja excluir ?'); 
	if (x != true){
		return;
	}
		
	/* ativa todos os campos do formulário */
	while ((z < form.elements.length)){

		/* habilita campos */
		if (form.elements[z].disabled == true){
			form.elements[z].disabled = false;	
		}
						
		z ++;		
	}
	
	form.tipo.value = '3';
	form.submit();	
}

/* validador de qualquer formulário */
function validaform(obj){
var form = obj;
var x    = 0;
var y	 = 0;
var z	 = 0;
var campo= '';

	/* loop em todos os campos do formulário */
	while ((x < form.elements.length)){
		
		/* se o campo estiver desabilitado ou apenas leitura não verifica */	
		if (form.elements[x].disabled == false || form.elements[x].readonly == false){
			
			/* valida text, password ou select */
			if (form.elements[x].type == 'text' || form.elements[x].type == 'textarea' ||  form.elements[x].type == 'password' || form.elements[x].type == 'select-one' || form.elements[x].type == 'file'){
			
				/* se for obrigatório e aida não estiver preeenchido */
				if (form.elements[x].required == 'yes' && form.elements[x].value.length == 0){
					alert(form.elements[x].validationmsg);
					form.elements[x].focus();
					return false;
				}		
				
				/* se for um campo númerico */	
				if (form.elements[x].value.length != 0 && form.elements[x].param == 'numero'){
					if (!SoNumero(form.elements[x].value)){
						alert(form.elements[x].validationmsg + '\n(número inválido, digite apenas números)');
						form.elements[x].focus();
						return false;
					}	
				}		
				
				/* se for um campo de valor */	
				if (form.elements[x].value.length != 0 && form.elements[x].param == 'valor'){
					if (!SoValor(form.elements[x].value)){
						alert(form.elements[x].validationmsg + '\n(valor inválido)');
						form.elements[x].focus();
						return false;
					}	
				}		
				
				/* se for um campo de data */	
				if (form.elements[x].value.length != 0 && form.elements[x].param == 'data'){
					if (!ValidaData(form.elements[x].value)){
						alert(form.elements[x].validationmsg + '\n(data inválida)');
						form.elements[x].focus();
						return false;
					}	
				}		
				
				/* se for um campo de cpf ou cgc */	
				if (form.elements[x].value.length != 0 && form.elements[x].param == 'cpfcgc'){
					
					form.elements[x].value = limpa_string(form.elements[x].value);
					
					if (!ValidaCPFCGC(form.elements[x].value)){
						alert(form.elements[x].validationmsg + '\n(cpf/cnpj inválido)');
						form.elements[x].focus();
						return false;
					}	
				}	
				
				
				/* checa um período quando os campos forem datade e dataate */
				if (form.elements[x].value.length != 0 && form.elements[x].param == 'data' && form.elements[x].name == 'dataate' && campo == 'datade'){
					if (!ChecaData('2', form.elements[campo].value, form.elements[x].value)){
						alert('A data inicial não pode ser menor que a final.');
						form.elements[x].value = '';
						form.elements[x].focus();
						return false;
					}				
				}		
			}		
			
			/* valida checkbox e rádio */
			if (form.elements[x].type == 'checkbox' || form.elements[x].type == 'radio'){
		
				/* limpa string */		
				var verificar   = 'no';	
				var selecionado = 'no';
				var	y			= 0;
				
				/* se for obrigatório e aida não estiver preeenchido */	
				if (form.elements[x].required == 'yes' && form.elements[x].type == 'radio' || form.elements[x].required == 'yes' && form.elements[x].type == 'checkbox' && form.elements[x].name != campo){
					/* se existir apenas um */
					if (form.elements[x].checked == true){
						selecionado = 'yes';
					}	
							
					/* quando existir vários */
					while ((y < form.elements[form.elements[x].name].length)){
						
						if (form.elements[form.elements[x].name][y].checked == true){
							selecionado = 'yes';
						}					
						
						y ++;
					}		
						
					
					/* se ainda não selecionou nada */
					if (selecionado != 'yes'){
						alert(form.elements[x].validationmsg);
						return false;
					}	
				}		
			}		
		}
		
		/* armaze o último campo validado */
		var campo = form.elements[x].name;
		
		x ++;		
	}
	
	/* ativa todos os campos do formulário */
	while ((z < form.elements.length)){

		/* habilita campos */
		if (form.elements[z].disabled == true){
			form.elements[z].disabled = false;	
		}
						
		z ++;		
	}
	

	return true;
}

function left(str, n){
	if (n <= 0)
	    return "";
	else if (n > String(str).length)
	    return str;
	else
	    return String(str).substring(0,n);
}

function right(str, n){
    if (n <= 0)
       return "";
    else if (n > String(str).length)
       return str;
    else {
       var iLen = String(str).length;
       return String(str).substring(iLen, iLen - n);
    }
}

/* CÓDIGO TESTE DO SILMAR, QUALQUER COISA PODE APAGAR */

function reais(obj,event){
var whichCode = (window.Event) ? event.which : event.keyCode;

/* Executa a formatação após o backspace nos navegadores !document.all */
if (whichCode == 8 && !documentall) {	
/* Previne a ação padrão nos navegadores */
	/* standart browsers */
	if (event.preventDefault){ 
			event.preventDefault();
	}
	else{ 
		
		/* internet explorer */
		event.returnValue = false;
	}
	
	var sischequevalor 	= obj.value;
	var x 		= sischequevalor.substring(0,sischequevalor.length-1);
	obj.value   = demaskvalue(x,true).formatCurrency();
	return false;
}

/* Executa o Formata Reais e faz o format currency novamente após o backspace */
FormataReais(obj,'.',',', event);
} 

function backspace(obj, event){
/*
Essa função basicamente altera o  backspace nos input com máscara reais para os navegadores IE e opera.
O IE não detecta o keycode 8 no evento keypress, por isso, tratamos no keydown.
Como o opera suporta o infame document.all, tratamos dele na mesma parte do código.
*/

var whichCode = (window.Event) ? event.which : event.keyCode;
	if (whichCode == 8 && documentall) {	
		var sischequevalor = obj.value;
		var x     = sischequevalor.substring(0,sischequevalor.length-1);
		var y 	  = demaskvalue(x,true).formatCurrency();
	
		obj.value = ""; //necessário para o opera
		obj.value += y;
		
		if (event.preventDefault){ //standart browsers
				event.preventDefault();
		}
		else{ 
			/* internet explorer */
			event.returnValue = false;
		}
		return false;
	
	}
}




function formatamoney(c) {

documentall = document.all;
/*
* função para formatação de valores monetários retirada de
* http://jonasgalvez.com/br/blog/2003-08/egocentrismo
*/
    var t = this; if(c == undefined) c = 2;		
    var p, d = (t=t.split("."))[1].substr(0, c);
    for(p = (t=t[0]).length; (p-=3) >= 1;) {
	        t = t.substr(0,p) + "." + t.substr(p);
    }
    return t+","+d+Array(c+1-d.length).join(0);
}

String.prototype.formatCurrency=formatamoney

function demaskvalue(valor, currency){
/*
* Se currency é false, retorna o valor sem apenas com os números. Se é true, os dois últimos caracteres são considerados as 
* casas decimais
*/
var val2 = '';
var strCheck = '0123456789';
var len = valor.length;
	if (len== 0){
		return 0.00;
	}

	if (currency ==true){	
		/* Elimina os zeros à esquerda 
		* a variável  <i> passa a ser a localização do primeiro caractere após os zeros e 
		* val2 contém os caracteres (descontando os zeros à esquerda)
		*/
		
		for(var i = 0; i < len; i++)
			if ((valor.charAt(i) != '0') && (valor.charAt(i) != ',')) break;
		
		for(; i < len; i++){
			if (strCheck.indexOf(valor.charAt(i))!=-1) val2+= valor.charAt(i);
		}

		if(val2.length==0) return "0.00";
		if (val2.length==1)return "0.0" + val2;
		if (val2.length==2)return "0." + val2;
		
		var parte1 = val2.substring(0,val2.length-2);
		var parte2 = val2.substring(val2.length-2);
		var returnvalue = parte1 + "." + parte2;
		return returnvalue;
		
	}
	else{
			/* currency é false: retornamos os valores COM os zeros à esquerda, 
			* sem considerar os últimos 2 algarismos como casas decimais 
			*/
			val3 ="";
			for(var k=0; k < len; k++){
				if (strCheck.indexOf(valor.charAt(k))!=-1) val3+= valor.charAt(k);
			}			
	return val3;
	}
}
function FormataReais(fld, milSep, decSep, e) {
var sep = 0;
var key = '';
var i = j = 0;
var len = len2 = 0;
var strCheck = '0123456789';
var aux = aux2 = '';
var whichCode = (window.Event) ? e.which : e.keyCode;

//if (whichCode == 8 ) return true; //backspace - estamos tratando disso em outra função no keydown
if (whichCode == 0 ) return true;
if (whichCode == 9 ) return true; //tecla tab
if (whichCode == 13) return true; //tecla enter
if (whichCode == 16) return true; //shift internet explorer
if (whichCode == 17) return true; //control no internet explorer
if (whichCode == 27 ) return true; //tecla esc
if (whichCode == 34 ) return true; //tecla end
if (whichCode == 35 ) return true;//tecla end
if (whichCode == 36 ) return true; //tecla home

/*
O trecho abaixo previne a ação padrão nos navegadores. Não estamos inserindo o caractere normalmente, mas via script
*/

if (e.preventDefault){ //standart browsers
		e.preventDefault()
	}else{ // internet explorer
		e.returnValue = false
}

var key = String.fromCharCode(whichCode);  // Valor para o código da Chave
if (strCheck.indexOf(key) == -1) return false;  // Chave inválida

/*
Concatenamos ao value o keycode de key, se esse for um número
*/
fld.value += key;

var len = fld.value.length;
var bodeaux = demaskvalue(fld.value,true).formatCurrency();
fld.value=bodeaux;

/*
Essa parte da função tão somente move o cursor para o final no opera. Atualmente não existe como movê-lo no konqueror.
*/
  if (fld.createTextRange) {
    var range = fld.createTextRange();
    range.collapse(false);
    range.select();
  }
  else if (fld.setSelectionRange) {
    fld.focus();
    var length = fld.value.length;
    fld.setSelectionRange(length, length);
  }
  return false;
}


//Função para inserir os valores selecionados nos checkboxes
function fn_ins_sol_material(f,n){
	var str = '';
	for(i=0; i<document[f]['componentes'+n].length; i++){
		if(document[f]['componentes'+n][i].checked){
			if(str.length>0){
				str = str + ','
			}
			str = str + document[f]['componentes'+n][i].value;
		}
	}
	
	document[f][n].value = str;
}