var SueldoMinimo = 433700;
var SubsidioTransporte = 50800;
var TasaMercado = 14.6;
var SancionMinimaBogota = 116000;
var SemaforizacionBogota = 29000;
var SancionMinimaOtros = 210000;
var InteresSancionBogota = 1.5;
var InteresSancionOtros = 5.0;
var OrdenanzaCundinamarca = 14000;
var SistematizacionAntioquia = 10750;
var InteresesMoraDiario = 0.07734;
var InteresesVigencia = 'Hasta Mar 31 2007';
var VigenciaSoat = 2006;
var CiudadesColombia = ['Bogotá','Cali','Medellín','Barranquilla','Bucaramanga','Cartagena','Cúcuta','Ibagué','Itagüí','Arauca (Arauca)','Armenia','Barrancabermeja','Bello','Buga','Calarcá','Cartago','Chiquinquirá (Boyacá)','Chía (Cundinamarca)','Cota (Cundinamarca)','Envigado (Antioquia)','Espinal (Tolima)','Facatativá','Florencia (Caquetá)','Floridablanca (Santander)','Fresno (Tolima)','Fusagasugá (Cundinamarca)','Girardot','Girón (Santander)','Guaduas (Cundinamarca)','Honda','La Vega (Cundinamarca)','Leticia','Líbano (Tolima)','Maicao (Guajira)','Manizales','Mariquita (Tolima)','Melgar','Montería','Mosquera (Cundinamarca)','Neiva','Palmira','Pasto','Pereira','Piedecuesta (Santander)','Pitalito (Huila)','Popayán','Providencia','Rioacha','San Andrés Islas','Santa Marta','Sincelejo','Tuluá (Valle)','Tunja','Valledupar','Villavicencio','Villeta (Cundinamarca)','Yopal','Zipaquirá'];
var CiudadesFoto = ['Bogotá'];
var UsadosTipos = ['Automóviles','Camperos y Camionetas','Clásicos','Competencia','De Carga','De Pasajeros','Motos','Taxis','Otros'];
var UsadosMarcas = ['Marca no Incluída','Alfa Romeo','Audi','BMW','Buick','Cadillac','Chevrolet','Chrysler','Citroën','Daewoo','Daihatsu','Datsun','Dina','Dodge','Ducati','Ferrari','Fiat','Ford','Freightliner','Harley Davidson','Hino','Honda','Hummer','Hyundai','International','Isuzu','Iveco','Jaguar','JBW','Jeep','Jincheng','KTM','Kawasaki','Kenworth','Kia','Lada','Lancia','Land Rover','Lexus','MGB','Mack','Mazda','Mercedes Benz','Mercury','Minicord','Mitsubishi','Nissan','Olcit','Oldsmobile','Opel','Peugeot','Piaggio','Plymouth','Pontiac','Porsche','Renault','Rolls Royce','Rover','Samsung','Scania','Seat','Skoda','Ssang Yong','Subaru','Suzuki','Tavria','Toyota','Triumph','Volga','Volkswagen','Volvo','Wrangler','Yamaha','Yugo'];
var PopStatus = '';
var PopBody = '';
var WinPopPage, PrintPopPage;

function click(e)
{
	var IE4 = (document.all && !document.getElementById)?true:false;
	var NS4 = (document.layers)?true:false;
	var IE5 = (document.all && document.getElementById)?true:false;
	var NS6 = (document.getElementById && !document.all)?true:false;
	var Msg = 'Cualquier comentario por favor dirijirlo al\nWebmaster del Portal';
	if(IE4)
	{
		if(event.button==2||event.button==3)
		{
			alert(Msg);
			return false;
		}
	}
	if(NS4)
	{
		if(e.which == 2 || e.which == 3)
		{
			alert(Msg);
			return false;
		}
	}
	if(IE5)
	{
		if(event.button==2||event.button==3)
		{
			alert(Msg);
			return false;
		}
	}
	if(NS6)
	{
		if(e.button==2||e.button==3)
		{
			alert(Msg);
			return false;
		}
	}
}

if(document.layers) document.captureEvents(Event.MOUSEDOWN);
document.onmousedown=click;

function findObj(objeto)
{
	if(document.getElementById)
	{
		var obj=document.getElementById(objeto);
	}
	else if(document.all)
	{
		var obj=eval('document.all.' + objeto);
	}
	else if(document.layers)
	{
		var obj=getLayer(objeto, document);
		obj.style=obj;
	}
	return eval(obj);
}

function getLayer(name,doc)
{
	var i, layer;
	if(!doc) doc = document;
	for(var i=0;i < doc.layers.length;i++)
	{
		layer = doc.layers[i];
		if(layer.name==name) return layer;
		if(layer.document.layers.length > 0)
		{
			layer=getLayer(name, layer.document);
			if(layer.name==name) return layer;
		}
	}
	return 0;
}

function qchars(campo){var dato = campo.replace(/^[ ]*/gi, '');dato = dato.replace(/[ ]*$/gi, '');dato = dato.replace(/[ ]+/gi, ' ');dato = dato.replace(/\</gi, '[');dato = dato.replace(/\>/gi, ']');dato = dato.replace(/\'/gi, '"');return dato;}
function qtel(campo){var dato = campo.replace(/[^0-9-.() \/xX]/gi, '');dato = dato.replace(/^[ ]*/gi, '');dato = dato.replace(/[ ]*$/gi, '');dato = dato.replace(/[ ]+/gi, ' ');return dato;}
function qyes(campo){var dato = campo.toUpperCase();if(dato.length != 1) dato = 'N';if(dato != 'S' && dato != 'N') dato = 'N';return dato;}
function qcaps(campo){var dato = qchars(campo.toLowerCase());var sale = '';var antes = '';if(dato.length != 0){sale = dato.charAt(0).toUpperCase();for(var i = 1; i < dato.length; i++){antes = dato.charAt(i-1);if(antes == ' ' || antes == '"' || antes == '(' || antes == '.')sale += dato.charAt(i).toUpperCase();else sale += dato.charAt(i);}}return sale;}
function qtext(campo){var dato = qchars(campo);dato = dato.replace(/[ ]*\r\n/g,'\r\n');dato = dato.replace(/\r\n[ ]*/g,'\r\n');dato = dato.replace(/(\r\n)*$/g,'');return dato;}
function qarea(campo){var dato = qchars(campo);dato = dato.replace(/\r\n/g,' ');dato = dato.replace(/^[ ]*/gi, '');dato = dato.replace(/[ ]*$/gi, '');dato = dato.replace(/[ ]+/gi, ' ');return dato;}
function qint(campo){var dato = parseInt(campo.toString().replace(/[^0-9-]/gi, ''),10);if(isNaN(dato)) dato=0;return dato;}
function qintpos(campo){var dato = parseInt(campo.toString().replace(/[^0-9]/gi, ''),10);if(isNaN(dato)) dato=0;return dato;}
function qnum(campo){var dato = campo.toString().replace(/[^0-9]/gi, '');if(dato.length == 0) dato=0;return dato;}
function qalfa_1(campo){var dato = campo.replace(/[^a-z0-9-_.]/gi, '');dato = dato.replace(/^[.]*/gi, '');dato = dato.replace(/[.]*$/gi, '');dato = dato.replace(/^[-]*/gi, '');dato = dato.replace(/[-]*$/gi, '');dato = dato.replace(/^[_]*/gi, '');dato = dato.replace(/[_]*$/gi, '');dato = dato.replace(/[-]+/gi, '-');dato = dato.replace(/[_]+/gi, '_');dato = dato.replace(/[.]+/gi, '.');return dato;}
function qalfa_2(campo){var dato = campo.replace(/[^a-z0-9-]/gi, '');dato = dato.replace(/^[-]*/gi, '');dato = dato.replace(/[-]*$/gi, '');dato = dato.replace(/[-]+/gi, '-');return dato;}
function qalfa_3(campo){var dato = campo.replace(/[^a-z0-9-._@]/gi, '');return dato;}
function qalfa_4(campo){var dato = campo.replace(/[^a-z0-9,]/gi, '');dato = dato.replace(/^[,]*/gi, '');dato = dato.replace(/[,]*$/gi, '');dato = dato.replace(/[,]+/gi, ',');return dato;}
function qalfa_5(campo){var dato = campo.toLowerCase();dato = dato.replace(/á/gi, 'a');dato = dato.replace(/é/gi, 'e');dato = dato.replace(/í/gi, 'i');dato = dato.replace(/ó/gi, 'o');dato = dato.replace(/ú/gi, 'u');dato = dato.replace(/ñ/gi, 'n');dato = dato.replace(/[^a-z0-9 ]/gi, '');dato = dato.replace(/^[ ]*/gi, '');dato = dato.replace(/[ ]*$/gi, '');dato = dato.replace(/[ ]+/gi, ' ');return dato;}
function qalfa_6(campo){var dato = campo.replace(/[^0-9_]/gi, '');return dato;}
function qalfa_7(campo){var dato = campo.replace(/[^a-z0-9,]/gi, '').toLowerCase();dato = dato.replace(/^[,]*/gi, '');dato = dato.replace(/[,]*$/gi, '');dato = dato.replace(/[,]+/gi, ',');dato = dato.replace(/[,]/gi, ', .');dato = '.' + dato;return dato;}
function qalfa_8(campo){var dato = campo.replace(/[^a-z0-9_]/gi, '');dato = dato.replace(/^[_]*/gi, '');dato = dato.replace(/[_]*$/gi, '');dato = dato.replace(/[_]+/gi, '_');return dato;}
function qalfa_9(campo){var dato = campo.replace(/[^0-9-.]/gi, '');dato = dato.replace(/^[-]*/gi, '');dato = dato.replace(/[-]*$/gi, '');dato = dato.replace(/^[.]*/gi, '');dato = dato.replace(/[.]*$/gi, '');dato = dato.replace(/[-]+/gi, '-');dato = dato.replace(/[\.]+/gi, '.');return dato;}
function qdec(campo){var dato1 = campo.toString();var minus = dato1.indexOf('-');dato1 = dato1.replace(/[^0-9.]/gi, '') + '.';dato1 = dato1.replace(/[.]/, 'k');dato1 = dato1.replace(/[.]/gi, '');var dato2 = dato1.replace(/(\d*)k(\d*)/g, '$2');dato1 = dato1.replace(/(\d*)k(\d*)/g, '$1');if(dato1.length == 0) dato1 = '0';if(dato2.length == 0) dato2 = '00';if(dato2.length == 1) dato2 += '0';if(dato2.length >= 1) dato2 = dato2.substr(0,2);return (minus < 0 ? '' : '-') + dato1 + '.' + dato2;}
function qdecpos(campo){var dato1 = campo.toString();dato1 = dato1.replace(/[^0-9.]/gi, '') + '.';dato1 = dato1.replace(/[.]/, 'k');dato1 = dato1.replace(/[.]/gi, '');var dato2 = dato1.replace(/(\d*)k(\d*)/g, '$2');dato1 = dato1.replace(/(\d*)k(\d*)/g, '$1');if(dato1.length == 0) dato1 = '0';if(dato2.length == 0) dato2 = '00';if(dato2.length == 1) dato2 += '0';if(dato2.length >= 1) dato2 = dato2.substr(0,2);return dato1 + '.' + dato2;}
function qfec(campo){var tots = 0;var ceros = 0;var dato = campo.replace(/[^0-9\/]/gi, '');dato = dato.replace(/[\/]/, 'k');dato = dato.replace(/[\/]/, 'k');dato = dato.replace(/[^0-9k]/gi, '');for(var i=0; i < dato.length; i++) if(dato.charAt(i) == 'k') tots++;if(tots == 1) {dato += 'k'; tots=2;}if(tots == 2){var ano = dato.replace(/(\d*)k(\d*)k(\d*)/gi, '$1');var mes = dato.replace(/(\d*)k(\d*)k(\d*)/gi, '$2');var dia = dato.replace(/(\d*)k(\d*)k(\d*)/gi, '$3');if(ano.length == 0) ano = '0000';if(ano.length == 1) ano = '000' + ano;if(ano.length == 2) ano = '00' + ano;if(ano.length == 3) ano = '0' + ano;if(ano.length > 3) ano = ano.substr(0,4);if(mes.length == 0) mes = '00';if(mes.length == 1) mes = '0' + mes;if(mes.length > 1) mes = mes.substr(0,2);if(dia.length == 0) dia = '00';if(dia.length == 1) dia = '0' + dia;if(dia.length > 1) dia = dia.substr(0,2);}else {dato = dato.substr(0,8);ceros = 8 - dato.length;for(var i=1; i <= ceros; i++) dato += '0';var ano = dato.replace(/(\d{4})(\d{2})(\d{2})/gi, '$1');var mes = dato.replace(/(\d{4})(\d{2})(\d{2})/gi, '$2');var dia = dato.replace(/(\d{4})(\d{2})(\d{2})/gi, '$3');}return ano + '/' + mes + '/' + dia;}
function qemail(campo){var dato = campo.replace(/[^a-z0-9-_.@]/gi, '').toLowerCase();dato = dato.replace(/[@]/, '#');dato = dato.replace(/[@]/gi, '');var cuenta = dato.replace(/^([^#]*)#([^#]*)$/gi, '$1');var dominio = dato.replace(/^([^#]*)#([^#]*)$/gi, '$2');return qalfa_1(cuenta) + '@' + qalfa_1(dominio);}
function vemail(email){var valido = /^([\w-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([\w-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)$/;return valido.test(email);}
function vfecs(campo){var dato = qfec(campo);var ano = parseInt(dato.replace(/(\d*)\/(\d*)\/(\d*)/gi,'$1'),10);var mes = parseInt(dato.replace(/(\d*)\/(\d*)\/(\d*)/gi,'$2'),10);var dia = parseInt(dato.replace(/(\d*)\/(\d*)\/(\d*)/gi,'$3'),10);var dias = [31,28,31,30,31,30,31,31,30,31,30,31];if(mes < 1 || mes > 12) return false;if(ano < 1900 || ano > 2100) return false;var bis = ano % 4;if(bis == 0) dias[1] = 29;if(dia < 1 || dia > dias[mes - 1]) return false;return true;}
function transicion_fotos(){if (document.all){document.images.fotos.style.filter="blendTrans(duration=3)";document.images.fotos.filters.blendTrans.Apply();}document.images.fotos.src = fotos_evento[foto_numero++].src;if (document.all)document.images.fotos.filters.blendTrans.Play();if(foto_numero >= total_fotos)foto_numero = 0;var temp = setTimeout('transicion_fotos()', 8000);return;}
function qerror(mensaje){if(mensaje == '')return true;else alert('Para continuar, por favor corrija los siguientes errores:\n\n'+mensaje);return false;}
function mil(Valor){var Entero = parseInt(Valor,10);var Tempo = Valor.toString();var Tempo1 = Tempo.indexOf('.');var Decimal = (Tempo1 == -1 ? '' : Tempo.substr(Tempo1));var Dato = Entero.toString();var Campo = '';var i = 0;var j = 0;for(i = Dato.length-1; i >= 0; i--){if(j++ == 3){Campo = ',' + Campo;j = 1;}Campo=Dato.charAt(i)+Campo;}return Campo.replace(/\-\,/g, '-')+Decimal;}
function money(valor){var dato = qdec(valor);var campo = dato.slice(dato.length - 3);var j = 0;for(var i = (dato.length - 4); i >= 0; i--){if(j++ == 3){campo = ',' + campo;j = 1;}campo = dato.charAt(i) + campo;}return campo.replace(/\-\,/g, '-');}
function mfecha(fecha){var mes = new Array('Enero','Febrero','Marzo','Abril','Mayo','Junio','Julio','Agosto','Septiembre','Octubre','Noviembre','Diciembre');var sale1 = qfec(fecha).replace(/[^0-9]/gi,'');sale1 = mes[parseInt(sale1.charAt(4)+sale1.charAt(5),10)-1]+' '+parseInt(sale1.charAt(6)+sale1.charAt(7),10)+' de '+sale1.charAt(0)+sale1.charAt(1)+sale1.charAt(2)+sale1.charAt(3);return sale1.replace(/( 0)/gi, ' ');}function mfill(Veces,Cadena){var Dato = Cadena;var long = Veces - Dato.length;var i = 0;for(i = 0; i < long; i++) Dato += ' ';return Dato;}
function monto(valor){var dato = valor.toString();var unds = ['','','',''];if(dato.length > 12) return 'ERROR';var j = 0;var k = 3;for(var i = dato.length - 1; i >= 0; i--){if(j++ == 3){k--;j=1;}unds[k]=dato.charAt(i)+unds[k];}for(var i = k; i >= 0; i--){if(unds[i].length==2) unds[i] = '0' + unds[i];if(unds[i].length==1) unds[i] = '00' + unds[i];if(unds[i].length==0) unds[i] = '000' + unds[i];}var campo = '';if(unds[0]!='000') campo = campo + monto1(unds[0])+' Mil ';if(unds[1]!='000') campo = campo + monto1(unds[1])+' Millones '; else if(unds[0]!='000')campo=campo+' Millones ';if(unds[2]!='000') campo = campo + monto1(unds[2])+' Mil ';if(unds[3]!='000') campo = campo + monto1(unds[3]);return campo;}
function monto1(parte){var p1 = parseInt(parte.charAt(0),10);var p2 = parseInt(parte.charAt(1),10);var p3 = parseInt(parte.charAt(2),10);var p4 = ['','Ciento ','Doscientos ','Trescientos ','Cuatrocientos ','Quinientos ','Seiscientos ','Setecientos ','Ochocientos ','Novecientos '];var p5 = ['','Diez ','Veinti ','Treinta ','Cuarenta ','Cincuenta ','Sesenta ','Setenta ','Ochenta ','Noventa '];var p6 = ['','Un ','Dos ','Tres ','Cuatro ','Cinco ','Seis ','Siete ','Ocho ','Nueve '];var p7 = ' y ';if(p1==1&&p2==0&p3==0) p4[1]='cien ';if(p2==1&&p3==1) {p5[1]='Once '; p6[1]='';p7='';}if(p2==1&&p3==2) {p5[1]='Doce '; p6[2]='';p7='';}if(p2==1&&p3==3) {p5[1]='Trece '; p6[3]='';p7='';}if(p2==1&&p3==4) {p5[1]='Catorce '; p6[4]='';p7='';}if(p2==1&&p3==5) {p5[1]='Quince '; p6[5]='';p7='';}if(p2==2) p7='';if(p2==2&&p3==0) p5[2]='Veinte ';var lets=p4[p1];lets+=p5[p2];if(p2!=0&&p3!=0)lets+=p7;lets+=p6[p3];return lets;}
function qwin(WinNew,XPop,WinTitle,Title,SubTitle,BodyText,Ancho,Alto,BodyBackGround){var BlockedStatus = false;var PopBar = new findObj('PopBlockBar');var Status = 'left=0,top=0,dependent=1,directories=0,height='+Alto+',hotkeys=0,width='+Ancho+',location=0,menubar=0,personalbar=0,resizable=1,scrollbars=1,status=0,titlebar=0,toolbar=0';var zwin = '';var PopMessage = '<table border=0 cellpadding=0 cellspacing=0 width=100%><tr><td class=PopHeader width=100% height=28 onClick="ShowPop()"><img src=' + Common + '/PopWarning.gif width=15 height=16 align=absmiddle> Usted tiene activado el bloqueador de Ventanas Emergentes. De click sobre esta barra, para visualizar la Ventana bloqueada.</td></tr></table>';var BackGround = BodyBackGround == '' ? '' : ' BACKGROUND="' + XImages + '/' + BodyBackGround + '"';var NewPop = XPop.replace(/@Title@/,Title).replace(/@SubTitle@/,SubTitle).replace(/@BodyText@/gi,BodyText);var BlockMsg = '(c) Popup Blocker\nSu navegador no permite visualizar Ventanas Emergentes\n\nDe click sobre la barra roja para visualizar la ventana que ha sido bloqueada.\nUsted puede desactivar el bloqueador para este WebSite específico.';var CBody = '<HTML>\r\n\t<HEAD>\r\n\t\t<title>'+WinTitle+'</title>\r\n\t\t<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />\r\n\t\t<meta http-equiv="content-language" content="es-co" />\r\n\t\t<link rel=StyleSheet href=' + StyleFile + '>\r\n\t</HEAD>\r\n\t<BODY'+BackGround+'>\r\n\r\n\t\t'+NewPop+'\r\n\r\n\t</BODY>\r\n</HTML>\r\n';if(WinNew == 0)zwin = window.open('',PopWindowName,Status);else zwin = this;if(zwin == null || typeof(zwin) == 'undefined' || typeof(zwin.location.hash) != 'string'){BlockedStatus = true;PopBar.innerHTML = PopMessage;PopStatus = Status;PopBody = CBody;alert(BlockMsg);}else {zwin.document.write(CBody);zwin.document.close();zwin.document.focus();}return BlockedStatus;}

function ShowPop(){var zwin = window.open('','PopWindow',PopStatus);zwin.document.write(PopBody);zwin.document.close();zwin.document.focus();return;}

function qcalc(ValorCapital,TasaNominalAnual,Meses)
{
	var TablaFin = new Array();
	var Tasa = TasaNominalAnual / 100 / 12;
	var CuotaMes = Math.round((ValorCapital/(((1-(Math.pow(1+Tasa,0-Meses))))/(Tasa))));
	var TasaMensual = TasaNominalAnual / 12;
	var Capital = ValorCapital;
	var Cuota = Math.round(ValorCapital / Meses);
	var Interes = 0;TablaFin[0] = CuotaMes;
	for(var Index = 1; Index <= Meses; Index++)
	{
		Interes = Math.round(Capital * TasaMensual / 100);Cuota = CuotaMes - Interes;
		if(Index == Meses) Cuota = Capital;
		TablaFin[Index] = [Capital,Cuota,Interes,Cuota+Interes];
		Capital = Capital - Cuota;
	}
	return TablaFin;
}

var TablaSoat = new Array();
TablaSoat[0] = new Array('Motos');
TablaSoat[0][1] = ['De 0 hasta 99 c.c.' ,11, 98192, 49096, 0, 0];
TablaSoat[0][2] = ['Entre 100 c.c. y 200 c.c.' ,12, 131784, 65892, 0, 0];
TablaSoat[0][3] = ['Más de 200 c.c.' ,13, 148784, 74392, 0, 0];
TablaSoat[1] = new Array('Camperos, Camionetas, Pickups');
TablaSoat[1][1] = ['De 0 hasta 1499 c.c.' ,21, 172176, 86088, 207128, 103564];
TablaSoat[1][2] = ['De 1500 c.c. a 2499 c.c.' ,22, 205632, 102816, 243712, 121856];
TablaSoat[1][3] = ['2500 c.c. o más' ,23, 241264, 120632, 277032, 138516];
TablaSoat[2] = new Array('Estacas, Furgón, Grúas, Planchón, Mixto');
TablaSoat[2][1] = ['De 0 hasta 4.9 Toneladas' ,31, 192984, 96492, 0, 0];
TablaSoat[2][2] = ['Entre 5 y 14.99 Toneladas' ,32, 278800, 139400, 0, 0];
TablaSoat[2][3] = ['15 o más Toneladas' ,33, 352648, 176324, 0, 0];
TablaSoat[3] = new Array('Oficiales, Especiales, Ambulancias, Bomberos, Diplomáticos');
TablaSoat[3][1] = ['De 0 hasta 1499 c.c.' ,41, 217192, 108596, 0, 0];
TablaSoat[3][2] = ['Entre 1500 c.c. y 2499 c.c.' ,42, 273904, 136952, 0, 0];
TablaSoat[3][3] = ['Desde 2500 c.c. o más' ,43, 328440, 164220, 0, 0];
TablaSoat[4] = new Array('Automóviles Familiares');
TablaSoat[4][1] = ['De 0 hasta 1499 c.c.' ,51, 96832, 48416, 128656, 64328];
TablaSoat[4][2] = ['Entre 1500 c.c. y 2499 c.c.' ,52, 118184, 59092, 147016, 73508];
TablaSoat[4][3] = ['2500 c.c. o más' ,53, 138040, 69020, 163880, 81940];
TablaSoat[5] = new Array('Vehículos para 6 o más Pasajeros');
TablaSoat[5][1] = ['De 0 hasta 2499 c.c.' ,61, 173128, 86564, 221272, 110636];
TablaSoat[5][2] = ['2500 c.c. o más' ,62, 232016, 116008, 278664, 139332];
TablaSoat[6] = new Array('Autos de Negocios, Taxis, Microbuses Urbanos');
TablaSoat[6][1] = ['De 0 hasta 1499 c.c.' ,71, 126208, 63104, 157760, 78880];
TablaSoat[6][2] = ['Entre 1500 c.c. y 2499 c.c.' ,72, 156944, 78472, 194072, 97036];
TablaSoat[6][3] = ['2500 c.c. o más' ,73, 202640, 101320, 237864, 118932];
TablaSoat[7] = new Array('Buses, Busetas');
TablaSoat[7][1] = ['Todos' ,81, 296616, 148308, 0, 0];
TablaSoat[8] = new Array('Vehículos de Servicio Público Intermunicipal');
TablaSoat[8][1] = ['De 0 hasta 9 pasajeros' ,91, 299336, 149668, 0, 0];
TablaSoat[8][2] = ['10 o más pasajeros' ,92, 434656, 217328, 0, 0];

function Soat(area1){var opctipos = '<option>Seleccione el Tipo de su Vehículo</option>';for(var i=0; i < TablaSoat.length; i++) opctipos += '<option>' + (i+1) + '. ' + TablaSoat[i][0] + '</option>';var Texto = '<form name=FormaSoat><table class=Soat_Fondo border=0 cellpadding=0 cellspacing=1 width=95%><tr><td class=Soat_Celda width=100%>* Tipo de Vehículo:<br><select class=Soat_Formas name=xtipo size=1 onChange="soatput(this)">' + opctipos + '</select></td></tr><tr><td class=Soat_Celda width=100%>* Característica del Vehículo:<br><select class=Soat_Formas name=xcarac size=1 disabled><option>No Aplica - Seleccione primero el Tipo</option></select></td></tr><tr><td class=Soat_Celda width=100%>* Modelo (Año):<br><select class=Soat_Formas name=xmodelo size=1 disabled><option>No Aplica - Seleccione primero el Tipo</option></select></td></tr></table><center><br><input class=Soat_Boton type="button" value="Liquidar Tarifa" onClick="soatcalc();"><br></center></form>';area1.innerHTML = Texto;return;}
function soatput(Tipos){var Totales = 0;var Longitud = 0;var Indice = Tipos.selectedIndex;Longitud = document.FormaSoat.xcarac.length;for(var i=0; i < Longitud; i++) document.FormaSoat.xcarac.options[0] = null;Longitud = document.FormaSoat.xmodelo.length;for(var i=0; i < Longitud; i++) document.FormaSoat.xmodelo.options[0] = null;if(Indice == 0){document.FormaSoat.xcarac.options[0] = new Option('No Aplica - Seleccione primero el Tipo');document.FormaSoat.xmodelo.options[0] = new Option('No Aplica - Seleccione primero el Tipo');document.FormaSoat.xcarac.disabled = true;document.FormaSoat.xmodelo.disabled = true;}else {for(var i=1; i < TablaSoat[Indice-1].length; i++){document.FormaSoat.xcarac.options[i-1] = new Option(TablaSoat[Indice-1][i][0]);Totales += TablaSoat[Indice-1][i][4] + TablaSoat[Indice-1][i][5];}document.FormaSoat.xcarac.disabled = false;if(Totales == 0){document.FormaSoat.xmodelo.disabled = true;document.FormaSoat.xmodelo.options[0] = new Option('No Aplica al Tipo escogido');}else {document.FormaSoat.xmodelo.disabled = false;document.FormaSoat.xmodelo.options[0] = new Option('Año ' + (VigenciaSoat - 9) + ' o posterior');document.FormaSoat.xmodelo.options[1] = new Option('Año ' + (VigenciaSoat - 10) + ' o anterior');}}return;}
function soatcalc(){var Title = 'Tarifas del Soat ' + VigenciaSoat;var Texto = '';var Idx1 = document.FormaSoat.xtipo.selectedIndex;var Idx2 = document.FormaSoat.xcarac.selectedIndex;var Idx3 = document.FormaSoat.xmodelo.selectedIndex;if(Idx1 == 0){alert('Debe escoger un Tipo de Vehículo');return;}var Prima = TablaSoat[Idx1-1][Idx2+1][2*(Idx3+1)];var Contribucion = TablaSoat[Idx1-1][Idx2+1][(2*(Idx3+1))+1];var Pagar = Prima + Contribucion;var Texto = FolletoLogo +'<table class=Soat_Fondo border=0 cellpadding=0 cellspacing=1 width=100%><tr><td class=Soat_LiqTit>Tarifa</td><td class=Soat_LiqTit>Valor Prima</td><td class=Soat_LiqTit>Contribuciones (*)</td><td class=Soat_LiqTit>Valor Total</td></tr><tr><td class=Soat_LiqCel>' + TablaSoat[Idx1-1][Idx2+1][1] + '</td><td class=Soat_LiqCel>' + mil(Prima) + '</td><td class=Soat_LiqCel>' + mil(Contribucion) + '</td><td class=Soat_LiqCel>' + mil(Pagar) + '</td></tr></table><br><font class=Soat_Texto>(*) Aportes a Fosyga y al Fondo de Prevención Vial. Ley 100/93.<br><br><b>Importante:</b> La tabla muestra los valores que deben aparecer en su SOAT. Adicionalmente verifique que sus datos y del vehículo estén correctos, así evita complicaciones o sanciones al momento de una reclamación.</font>';qwin(0,PrintPopPage,Title,'','',Texto,720,200,'');return;}
function Finan(area1){var Texto = '<form name=FormaFinan action="javascript: FinanCalc();" onSubmit="return Finan_V(this)"><table class=Finan_Fondo border=0 cellpadding=0 cellspacing=1 width=95%><tr><td class=Finan_Celda width=100%>* Valor total a Financiar:<br><input class=Finan_Formas type=text name=xvalor size=12 maxlength=10 onBlur="this.value=qintpos(this.value);"></td></tr><tr><td class=Finan_Celda width=100%>* Tasa de Interés Anual: <br><input class=Finan_Formas type=text name=xinteres size=12 maxlength=10 onBlur="this.value=qdecpos(this.value);" value="' + qdecpos(TasaPromedioAnual) + '"></td></tr><tr><td class=Finan_Celda width=100%>* Número de Meses: <br><input class=Finan_Formas type=text name=xmeses size=12 maxlength=10 onBlur="this.value=qintpos(this.value);"></td></tr></table><center><br><input class=Finan_Boton type=submit value="Calcular Tabla"><br></center></form>';area1.innerHTML = Texto;return;}
function Finan_V(c){var xvalor = qintpos(c.xvalor.value); c.xvalor.value = xvalor;var xinteres = qdecpos(c.xinteres.value); c.xinteres.value = xinteres;var xmeses = qintpos(c.xmeses.value); c.xmeses.value = xmeses;var msjerr = '';xinteres = parseFloat(xinteres);if(xvalor == 0) msjerr+='* Debe suministrar el valor total a financiarse\n';if(xinteres < 0.1 || xinteres > 90) msjerr+='* Suministre un interés entre 0.1% y 90%\n';if(xmeses < 1 || xmeses > 180) msjerr+='* El número de meses debe ser entre 1 y 180 meses\n';return qerror(msjerr);}
function FinanCalc(){var Title = 'Calculadora Financiera';var Valor = parseInt(document.FormaFinan.xvalor.value,10);var Interes = parseFloat(document.FormaFinan.xinteres.value);var Meses = parseInt(document.FormaFinan.xmeses.value,10);var Datos = new qcalc(Valor,Interes,Meses);var TotValor = 0;var TotInteres = 0;var TotCuotas = 0;var Texto = FolletoLogo +'<table class=Finan_Fondo border=0 cellpadding=0 cellspacing=1 width=100%><tr><td class=Finan_LiqTit>Cuota</td><td class=Finan_LiqTit>Saldo Capital</td><td class=Finan_LiqTit>Abono Capital</td><td class=Finan_LiqTit>Abono Intereses</td><td class=Finan_LiqTit>Cuota Mensual</td></tr>';for(var i=1; i <= Meses; i++){TotValor += Datos[i][1];TotInteres += Datos[i][2];TotCuotas += Datos[i][3];Texto += '<tr><td class=Finan_LiqCel1>' + i + '</td><td class=Finan_LiqCel2>' + mil(Datos[i][0]) + '</td><td class=Finan_LiqCel2>' + mil(Datos[i][1]) + '</td><td class=Finan_LiqCel2>' + mil(Datos[i][2]) + '</td><td class=Finan_LiqCel2>' + mil(Datos[i][3]) + '</td></tr>';}Texto += '<tr><td class=Finan_LiqCel3>&nbsp; </td><td class=Finan_LiqCel3>Totales </td><td class=Finan_LiqCel3>' + mil(TotValor) + '</td><td class=Finan_LiqCel3>' + mil(TotInteres) + '</td><td class=Finan_LiqCel3>' + mil(TotCuotas) + '</td></tr></table>';qwin(0,PrintPopPage,Title,'','',Texto,720,400,'');return;}



		var JShexcase = 0;   /* hex output format. 0 - lowercase; 1 - uppercase        */
		var JSb64pad  = "";  /* base-64 pad character. "=" for strict RFC compliance   */

		/*
		 * These are the functions you'll usually want to call
		 * They take string arguments and return either hex or base-64 encoded strings
		 */
		function JShex_md5(s)							{ return JSrstr2hex(JSrstr_md5(JSstr2rstr_utf8(s))); }
		function JSb64_md5(s)							{ return JSrstr2b64(JSrstr_md5(JSstr2rstr_utf8(s))); }
		function JSany_md5(s, e)					{ return JSrstr2any(JSrstr_md5(JSstr2rstr_utf8(s)), e); }
		function JShex_hmac_md5(k, d)			{ return JSrstr2hex(JSrstr_hmac_md5(JSstr2rstr_utf8(k), JSstr2rstr_utf8(d))); }
		function JSb64_hmac_md5(k, d)			{ return JSrstr2b64(JSrstr_hmac_md5(JSstr2rstr_utf8(k), JSstr2rstr_utf8(d))); }
		function JSany_hmac_md5(k, d, e)	{ return JSrstr2any(JSrstr_hmac_md5(JSstr2rstr_utf8(k), JSstr2rstr_utf8(d)), e); }

		/*
		 * Perform a simple self-test to see if the VM is working
		 */
		function JSmd5_vm_test()
		{return JShex_md5("abc").toLowerCase() == "900150983cd24fb0d6963f7d28e17f72";}

		/*
		 * Calculate the MD5 of a raw string
		 */
		function JSrstr_md5(s)
		{return JSbinl2rstr(JSbinl_md5(JSrstr2binl(s), s.length * 8));}

		/*
		 * Calculate the HMAC-MD5, of a key and some data (raw strings)
		 */
		function JSrstr_hmac_md5(key, data)
		{
			var bkey = JSrstr2binl(key);
			if(bkey.length > 16) bkey = JSbinl_md5(bkey, key.length * 8);

			var ipad = Array(16), opad = Array(16);
			for (var i = 0; i < 16; i++)
			{
				ipad[i] = bkey[i] ^ 0x36363636;
				opad[i] = bkey[i] ^ 0x5C5C5C5C;
			}

			var hash = JSbinl_md5(ipad.concat(JSrstr2binl(data)), 512 + data.length * 8);
			return JSbinl2rstr(JSbinl_md5(opad.concat(hash), 512 + 128));
		}

		/*
		 * Convert a raw string to a hex string
		 */
		function JSrstr2hex(input)
		{
			try { JShexcase } catch(e) { JShexcase=0; }
			var hex_tab = JShexcase ? "0123456789ABCDEF" : "0123456789abcdef";
			var output = "";
			var x;
			for (var i = 0; i < input.length; i++)
			{
				x = input.charCodeAt(i);
				output += hex_tab.charAt((x >>> 4) & 0x0F) +  hex_tab.charAt( x        & 0x0F);
			}
			return output;
		}

		/*
		 * Convert a raw string to a base-64 string
		 */
		function JSrstr2b64(input)
		{
			try { JSb64pad } catch(e) { JSb64pad=''; }
			var tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
			var output = "";
			var len = input.length;
			for (var i = 0; i < len; i += 3)
			{
				var triplet = (input.charCodeAt(i) << 16) | (i + 1 < len ? input.charCodeAt(i+1) << 8 : 0) | (i + 2 < len ? input.charCodeAt(i+2) : 0);
				for (var j = 0; j < 4; j++)
				{
					if(i * 8 + j * 6 > input.length * 8) output += JSb64pad;
					else output += tab.charAt((triplet >>> 6*(3-j)) & 0x3F);
				}
			}
			return output;
		}

		/*
		 * Convert a raw string to an arbitrary string encoding
		 */
		function JSrstr2any(input, encoding)
		{
			var divisor = encoding.length;
			var i, j, q, x, quotient;

			/* Convert to an array of 16-bit big-endian values, forming the dividend */
			var dividend = Array(Math.ceil(input.length / 2));
			for (i = 0; i < dividend.length; i++)
			{
				dividend[i] = (input.charCodeAt(i * 2) << 8) | input.charCodeAt(i * 2 + 1);
			}

			/*
			 * Repeatedly perform a long division. The binary array forms the dividend,
			 * the length of the encoding is the divisor. Once computed, the quotient
			 * forms the dividend for the next step. All remainders are stored for later
			 * use.
			 */
			var full_length = Math.ceil(input.length * 8 / (Math.log(encoding.length) / Math.log(2)));
			var remainders = Array(full_length);
			for (j = 0; j < full_length; j++)
			{
				quotient = Array();
				x = 0;
				for (i = 0; i < dividend.length; i++)
				{
					x = (x << 16) + dividend[i];
					q = Math.floor(x / divisor);
					x -= q * divisor;
					if(quotient.length > 0 || q > 0)
						quotient[quotient.length] = q;
				}
				remainders[j] = x;
				dividend = quotient;
			}

			/* Convert the remainders to the output string */
			var output = "";
			for (i = remainders.length - 1; i >= 0; i--)
				output += encoding.charAt(remainders[i]);

			return output;
		}

		/*
		 * Encode a string as utf-8.
		 * For efficiency, this assumes the input is valid utf-16.
		 */
		function JSstr2rstr_utf8(input)
		{
			var output = "";
			var i = -1;
			var x, y;

			while(++i < input.length)
			{
				/* Decode utf-16 surrogate pairs */
				x = input.charCodeAt(i);
				y = i + 1 < input.length ? input.charCodeAt(i + 1) : 0;
				if(0xD800 <= x && x <= 0xDBFF && 0xDC00 <= y && y <= 0xDFFF)
				{
					x = 0x10000 + ((x & 0x03FF) << 10) + (y & 0x03FF);
					i++;
				}

				/* Encode output as utf-8 */
				if(x <= 0x7F)
					output += String.fromCharCode(x);
				else if(x <= 0x7FF)
					output += String.fromCharCode(0xC0 | ((x >>> 6 ) & 0x1F),
																				0x80 | ( x         & 0x3F));
				else if(x <= 0xFFFF)
					output += String.fromCharCode(0xE0 | ((x >>> 12) & 0x0F),
																				0x80 | ((x >>> 6 ) & 0x3F),
																				0x80 | ( x         & 0x3F));
				else if(x <= 0x1FFFFF)
					output += String.fromCharCode(0xF0 | ((x >>> 18) & 0x07),
																				0x80 | ((x >>> 12) & 0x3F),
																				0x80 | ((x >>> 6 ) & 0x3F),
																				0x80 | ( x         & 0x3F));
			}
			return output;
		}

		/*
		 * Encode a string as utf-16
		 */
		function JSstr2rstr_utf16le(input)
		{
			var output = "";
			for(var i = 0; i < input.length; i++)
				output += String.fromCharCode( input.charCodeAt(i)        & 0xFF,
																			(input.charCodeAt(i) >>> 8) & 0xFF);
			return output;
		}

		function JSstr2rstr_utf16be(input)
		{
			var output = "";
			for(var i = 0; i < input.length; i++)
				output += String.fromCharCode((input.charCodeAt(i) >>> 8) & 0xFF,
																			 input.charCodeAt(i)        & 0xFF);
			return output;
		}

		/*
		 * Convert a raw string to an array of little-endian words
		 * Characters >255 have their high-byte silently ignored.
		 */
		function JSrstr2binl(input)
		{
			var output = Array(input.length >> 2);
			for(var i = 0; i < output.length; i++)
				output[i] = 0;
			for (var i = 0; i < input.length * 8; i += 8)
				output[i>>5] |= (input.charCodeAt(i / 8) & 0xFF) << (i%32);
			return output;
		}

		/*
		 * Convert an array of little-endian words to a string
		 */
		function JSbinl2rstr(input)
		{
			var output = "";
			for (var i = 0; i < input.length * 32; i += 8)
				output += String.fromCharCode((input[i>>5] >>> (i % 32)) & 0xFF);
			return output;
		}

		/*
		 * Calculate the MD5 of an array of little-endian words, and a bit length.
		 */
		function JSbinl_md5(x, len)
		{
			/* append padding */
			x[len >> 5] |= 0x80 << ((len) % 32);
			x[(((len + 64) >>> 9) << 4) + 14] = len;

			var a =  1732584193;
			var b = -271733879;
			var c = -1732584194;
			var d =  271733878;

			for (var i = 0; i < x.length; i += 16)
			{
				var olda = a;
				var oldb = b;
				var oldc = c;
				var oldd = d;

				a = JSmd5_ff(a, b, c, d, x[i+ 0], 7 , -680876936);
				d = JSmd5_ff(d, a, b, c, x[i+ 1], 12, -389564586);
				c = JSmd5_ff(c, d, a, b, x[i+ 2], 17,  606105819);
				b = JSmd5_ff(b, c, d, a, x[i+ 3], 22, -1044525330);

				a = JSmd5_ff(a, b, c, d, x[i+ 4], 7 , -176418897);
				d = JSmd5_ff(d, a, b, c, x[i+ 5], 12,  1200080426);
				c = JSmd5_ff(c, d, a, b, x[i+ 6], 17, -1473231341);
				b = JSmd5_ff(b, c, d, a, x[i+ 7], 22, -45705983);
				a = JSmd5_ff(a, b, c, d, x[i+ 8], 7 ,  1770035416);
				d = JSmd5_ff(d, a, b, c, x[i+ 9], 12, -1958414417);
				c = JSmd5_ff(c, d, a, b, x[i+10], 17, -42063);
				b = JSmd5_ff(b, c, d, a, x[i+11], 22, -1990404162);
				a = JSmd5_ff(a, b, c, d, x[i+12], 7 ,  1804603682);
				d = JSmd5_ff(d, a, b, c, x[i+13], 12, -40341101);
				c = JSmd5_ff(c, d, a, b, x[i+14], 17, -1502002290);
				b = JSmd5_ff(b, c, d, a, x[i+15], 22,  1236535329);

				a = JSmd5_gg(a, b, c, d, x[i+ 1], 5 , -165796510);
				d = JSmd5_gg(d, a, b, c, x[i+ 6], 9 , -1069501632);
				c = JSmd5_gg(c, d, a, b, x[i+11], 14,  643717713);
				b = JSmd5_gg(b, c, d, a, x[i+ 0], 20, -373897302);
				a = JSmd5_gg(a, b, c, d, x[i+ 5], 5 , -701558691);
				d = JSmd5_gg(d, a, b, c, x[i+10], 9 ,  38016083);
				c = JSmd5_gg(c, d, a, b, x[i+15], 14, -660478335);
				b = JSmd5_gg(b, c, d, a, x[i+ 4], 20, -405537848);
				a = JSmd5_gg(a, b, c, d, x[i+ 9], 5 ,  568446438);
				d = JSmd5_gg(d, a, b, c, x[i+14], 9 , -1019803690);
				c = JSmd5_gg(c, d, a, b, x[i+ 3], 14, -187363961);
				b = JSmd5_gg(b, c, d, a, x[i+ 8], 20,  1163531501);
				a = JSmd5_gg(a, b, c, d, x[i+13], 5 , -1444681467);
				d = JSmd5_gg(d, a, b, c, x[i+ 2], 9 , -51403784);
				c = JSmd5_gg(c, d, a, b, x[i+ 7], 14,  1735328473);
				b = JSmd5_gg(b, c, d, a, x[i+12], 20, -1926607734);

				a = JSmd5_hh(a, b, c, d, x[i+ 5], 4 , -378558);
				d = JSmd5_hh(d, a, b, c, x[i+ 8], 11, -2022574463);
				c = JSmd5_hh(c, d, a, b, x[i+11], 16,  1839030562);
				b = JSmd5_hh(b, c, d, a, x[i+14], 23, -35309556);
				a = JSmd5_hh(a, b, c, d, x[i+ 1], 4 , -1530992060);
				d = JSmd5_hh(d, a, b, c, x[i+ 4], 11,  1272893353);
				c = JSmd5_hh(c, d, a, b, x[i+ 7], 16, -155497632);
				b = JSmd5_hh(b, c, d, a, x[i+10], 23, -1094730640);
				a = JSmd5_hh(a, b, c, d, x[i+13], 4 ,  681279174);
				d = JSmd5_hh(d, a, b, c, x[i+ 0], 11, -358537222);
				c = JSmd5_hh(c, d, a, b, x[i+ 3], 16, -722521979);
				b = JSmd5_hh(b, c, d, a, x[i+ 6], 23,  76029189);
				a = JSmd5_hh(a, b, c, d, x[i+ 9], 4 , -640364487);
				d = JSmd5_hh(d, a, b, c, x[i+12], 11, -421815835);
				c = JSmd5_hh(c, d, a, b, x[i+15], 16,  530742520);
				b = JSmd5_hh(b, c, d, a, x[i+ 2], 23, -995338651);

				a = JSmd5_ii(a, b, c, d, x[i+ 0], 6 , -198630844);
				d = JSmd5_ii(d, a, b, c, x[i+ 7], 10,  1126891415);
				c = JSmd5_ii(c, d, a, b, x[i+14], 15, -1416354905);
				b = JSmd5_ii(b, c, d, a, x[i+ 5], 21, -57434055);
				a = JSmd5_ii(a, b, c, d, x[i+12], 6 ,  1700485571);
				d = JSmd5_ii(d, a, b, c, x[i+ 3], 10, -1894986606);
				c = JSmd5_ii(c, d, a, b, x[i+10], 15, -1051523);
				b = JSmd5_ii(b, c, d, a, x[i+ 1], 21, -2054922799);
				a = JSmd5_ii(a, b, c, d, x[i+ 8], 6 ,  1873313359);
				d = JSmd5_ii(d, a, b, c, x[i+15], 10, -30611744);
				c = JSmd5_ii(c, d, a, b, x[i+ 6], 15, -1560198380);
				b = JSmd5_ii(b, c, d, a, x[i+13], 21,  1309151649);
				a = JSmd5_ii(a, b, c, d, x[i+ 4], 6 , -145523070);
				d = JSmd5_ii(d, a, b, c, x[i+11], 10, -1120210379);
				c = JSmd5_ii(c, d, a, b, x[i+ 2], 15,  718787259);
				b = JSmd5_ii(b, c, d, a, x[i+ 9], 21, -343485551);

				a = JSsafe_add(a, olda);
				b = JSsafe_add(b, oldb);
				c = JSsafe_add(c, oldc);
				d = JSsafe_add(d, oldd);
		  }
		  return Array(a, b, c, d);
		}

		/*
		 * These functions implement the four basic operations the algorithm uses.
		 */
		function JSmd5_cmn(q, a, b, x, s, t)
		{return JSsafe_add(JSbit_rol(JSsafe_add(JSsafe_add(a, q), JSsafe_add(x, t)), s),b);}
		function JSmd5_ff(a, b, c, d, x, s, t)
		{return JSmd5_cmn((b & c) | ((~b) & d), a, b, x, s, t);}
		function JSmd5_gg(a, b, c, d, x, s, t)
		{return JSmd5_cmn((b & d) | (c & (~d)), a, b, x, s, t);}
		function JSmd5_hh(a, b, c, d, x, s, t)
		{return JSmd5_cmn(b ^ c ^ d, a, b, x, s, t);}

		function JSmd5_ii(a, b, c, d, x, s, t)
		{return JSmd5_cmn(c ^ (b | (~d)), a, b, x, s, t);}

		/*
		 * Add integers, wrapping at 2^32. This uses 16-bit operations internally
		 * to work around bugs in some JS interpreters.
		 */
		function JSsafe_add(x, y)
		{
			var lsw = (x & 0xFFFF) + (y & 0xFFFF);
			var msw = (x >> 16) + (y >> 16) + (lsw >> 16);
			return (msw << 16) | (lsw & 0xFFFF);
		}

		/*
		 * Bitwise rotate a 32-bit number to the left.
		 */
		function JSbit_rol(num, cnt)
		{return (num << cnt) | (num >>> (32 - cnt));}