window.defaultStatus="www.climent.eu"

function Borrar()
{
if (typeof(oResultado) == "object")
	{
	oResultado.close();
	}
if (typeof(oTResultado) == "object")
	{
	oTResultado.close();
	}
}


function NuevoCalculo()
{
Borrar();
location.reload(true);
}

function orden(f)
{
Borrar();
superficie=1;
construir=f.coste.value;
clase="";

calcula(f);
}

function simplificado(f)
 {
Borrar();
puntero=document.getElementById("ClaseConstruccion");
if (puntero.selectedIndex=="-1") {puntero.selectedIndex=0;}
construir=puntero.options[puntero.selectedIndex].value
clase="para uso "+puntero.options[puntero.selectedIndex].text
superficie=f.superficie.value


calcula(f);
}


function calcula(f)
{
var Curbanizar=0
var urbanizar=f.urbanizacion.value
var edificabilidad=f.edificabilidad.value
var precio=f.precio.value
var margen=f.margen.value/100
generales=0.14*construir
industrial=0.06*construir
proyecto=0.04*construir
direccion=0.02*construir
aparejador=0.02*construir
control=0.01*construir
seguridad=0.0025*construir
legales=0.08*construir
seguro=0.01*construir
promotor=0.10*construir
var cesiones=0.1

if (superficie != "1") {
edificabilidad/=superficie;
}
resultado=((1-cesiones)*f.edificabilidad.value*(precio-1.3825*construir)-urbanizar);

oResultado = window.open("about:blank", "Nueva_ventana","height=300,width=600,top=10,left=10,scrollable=yes,resizable=yes");
oResultado.document.open();
oResultado.document.write("<html><head><title>Valoración del terreno</title></head>");

oResultado.document.write("<table width='100%' border='0'>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='center'><strong>CÁLCULOS PARA LA OBTENCIÓN DEL VALOR RESIDUAL DEL SUELO</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'></div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr><tr></tr><tr></tr><tr></tr><tr></tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>Superficie bruta de terreno</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>"+superficie+"</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>x Coeficiente de edificabilidad</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>"+edificabilidad+"</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>Superficie construida sobre el terreno (máxima)</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>"+edificabilidad*superficie+"</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
   
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>- 10% de cesión a favor de ayuntamientos (competentes en urbanismo)</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>"+(edificabilidad*superficie*cesiones).toFixed(2)+"</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
 
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'><strong>Superficie construible</strong>, descontadas las cesiones</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'><strong>"+(edificabilidad*superficie*(1-cesiones))+"</strong></div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
  oResultado.document.write("<tr></tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>Ingresos obtenidos por metro construido</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>"+precio+"</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>x Superficie construible = Ingresos totales por VENTAS</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
	oResultado.document.write("<td width='18%'><div align='right'><strong>"+precio*superficie*edificabilidad*(1-cesiones)+"</strong></div></td>"); 
  oResultado.document.write("</tr>");
  oResultado.document.write("<tr></tr><tr></tr>");
  
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>- Beneficio del promotor</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
	oResultado.document.write("<td width='18%'><div align='right'><strong>(-) "+(precio*superficie*edificabilidad*(1-cesiones)*margen).toFixed(2)+"</strong></div></td>"); 
  oResultado.document.write("</tr>");
  oResultado.document.write("<tr></tr><tr></tr>");

  
  var Tingresos = precio*superficie*edificabilidad*(1-cesiones)*(1-margen)
  
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'><strong>Coste unitario de ejecución material</strong> de las obras "+(clase).toLowerCase()+"</div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'><strong>"+construir+"</strong></div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
   
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'><strong>Gastos adicionales por unidad</strong> de promoción y construcción a deducir por metro cuadrado de techo </div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'><strong>"+0.3825*construir+"</strong></div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
 
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
   
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'><strong>Gastos totales por metro construido</strong> de promoción y construcción a deducir por metro cuadrado de techo </div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'><strong>"+(1.3825*construir).toFixed(2)+"</strong></div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
 
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>x Superficie construible en el terreno (deducidas cesiones)</div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'><strong>"+edificabilidad*superficie*(1-cesiones)+"</strong></div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
  
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
  
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>Importe total de costes de contrucción y promoción (incluido beneficio industrial)</div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'><strong>"+(edificabilidad*superficie*construir*1.3825*(1-cesiones)).toFixed(2)+"</strong></div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'><strong>(-) "+(edificabilidad*superficie*construir*1.3825*(1-cesiones)).toFixed(2)+"</strong></div></td>");
  oResultado.document.write("</tr>");
  oResultado.document.write("<tr></tr>");
  
 var Cconstruir=edificabilidad*superficie*construir*1.3825*(1-cesiones)
  
 if (urbanizar!=0){
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'><strong>Gastos</strong> de urbanización a deducir por metro cuadrado de superficie bruta </div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'><strong>"+urbanizar+"</strong></div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
  
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'>x Superficie del terreno </div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'><strong>"+superficie+"</strong></div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");
   
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oResultado.document.write("</tr>");

  oResultado.document.write("<tr>");
    oResultado.document.write("<td width='64%'><div align='left'>Importe total de costes de urbanización</div></td>"); 
  	oResultado.document.write("<td width='18%'><div align='right'><strong>"+urbanizar*superficie+"</strong></div></td>"); 
    oResultado.document.write("<td width='18%'><div align='right'><strong>(-) "+urbanizar*superficie+"</strong></div></td>");
  oResultado.document.write("</tr>");
  oResultado.document.write("<tr></tr><tr></tr>");
 var Curbanizar=urbanizar*superficie
}
 
  oResultado.document.write("<tr>");
  oResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   oResultado.document.write("<td width='18%'><div align='right'></div></td>"); 
   oResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>");
  oResultado.document.write("</tr>");
  
  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'><strong>Valor residual</strong> de los terrenos = Ingresos posibles - costes (incluido beneficios) =</div></td>"); 
  	oResultado.document.write("<td width='18%'><div align='right'></div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'><strong>"+(Tingresos-Curbanizar-Cconstruir).toFixed(2)+"</strong></div></td>");
  oResultado.document.write("</tr>");

  oResultado.document.write("<tr>");
	oResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oResultado.document.write("<td width='18%'><div align='right'> </div></td>"); 
	oResultado.document.write("<td width='18%'><div align='right'><strong>EUROS</strong></div></td>");
  oResultado.document.write("</tr><tr></tr><tr></tr>");

oResultado.document.write("</table>");

oResultado.document.write("<div align='left'>Información adicional en <a href='http://www.climent.eu'>http://www.climent.eu</a></div>"); 


oResultado.document.write("</body></html>");
oResultado.document.close();


// SEGUNDA TABLA ***************************************

oTResultado = window.open("about:blank","Otra_ventana","height=300,width=600,top=100,left=100,scrollable=yes,resizable=yes");

oTResultado.document.open();
oTResultado.document.write("<html><head><title>Detalle de Costes de construcción y promoción</title></head>");

oTResultado.document.write("<table width='100%' border='0'>");

  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='center'><strong>DETALLE DE LOS COSTES DE CONSTRUCCIÓN Y PROMOCIÓN "+(clase).toUpperCase()+"</div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'></div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr><tr></tr><tr></tr><tr></tr><tr></tr>");

  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Coste de <strong>ejecución material por metro cuadrado construido</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+(construir*1.00).toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>costes por metro cuadrado construido por <strong>proyecto</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+proyecto.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>dirección técnica</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+direccion.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");

  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>trabajos arquitecto técnico</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+aparejador.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>control de calidad</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+control.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>gastos seguridad</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+seguridad.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>escrituras y otros gastos legales</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+legales.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>pólizas y primas de seguros</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+seguro.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>gastos generales</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+generales.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
    
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Idem por <strong>beneficio industrial de constructor y contratistas</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+industrial.toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");

  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Coste unitario total de construcción y promoción</strong></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>"+(construir*1.3825).toFixed(2)+"</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
 
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>x Superficie construible en el terreno (deducidas cesiones)</div></td>"); 
    oTResultado.document.write("<td width='18%'><div align='right'><strong>"+edificabilidad*superficie*(1-cesiones)+"</strong></div></td>"); 
    oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'>__________________</div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
  
  oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'>Importe total de costes de contrucción y promoción</div></td>"); 
  	oTResultado.document.write("<td width='18%'><div align='right'><strong>"+(edificabilidad*superficie*construir*(1-cesiones)*1.3825).toFixed(2)+"</strong></div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr>");
 oTResultado.document.write("<tr></tr>");
 
 oTResultado.document.write("<tr>");
	oTResultado.document.write("<td width='64%'><div align='left'></div></td>"); 
   	oTResultado.document.write("<td width='18%'><div align='right'><strong>EUROS</strong></div></td>"); 
	oTResultado.document.write("<td width='18%'><div align='right'></div></td>");
  oTResultado.document.write("</tr><tr></tr><tr></tr><tr></tr>");
  
 
oTResultado.document.write("</table>");

oTResultado.document.write("<div align='left'>Información adicional en <a href='http://www.climent.eu'>http://www.climent.eu</a></div>"); 


oTResultado.document.write("</body></html>");
oTResultado.document.close();







 }

