//fpv=4
function fp_url_path_file(file,path){
	var r;
	if(path){
		r=path;
		if(path[(path.length)]!="/"){
			r=r+"/";
		}
	}
	r=r+file;
	return r;
}
function fp_url_addparam(url,param,val){
	partes=url.split ("?");
	base=partes[0];
	var query=partes[1];
	if (query == undefined){
		var query="";
	}
	var querynueva="";
	args=query.split ("&");
	var divisor="?";
	var reemplazo=0;
	for (i = 0; i < args.length; i++) { 
		Separ = args[i].split("=");
		paramesp=Separ[0];
		valesp=Separ[1];
		
		if (paramesp.length>0){
			if (paramesp == param){
				valesp=val;
				reemplazo=1;
			}
			if(valesp){
				querynueva= querynueva+ divisor + paramesp+'='+valesp;
				divisor="&";
			}
		}
	}
	if (reemplazo==0){
		if(val){
			querynueva= querynueva+ divisor + param+'='+val;
		}
	}
	urlnueva=base + querynueva;
	return urlnueva;
}