// declaracion de ajax
/*
Script Hecho por : Walter Willis Naveda
efectiva S.A. tiene los derechos reservados de este script
*/
var FechaInicioxyz = '';
/* Funcion de impresion */
function imprSelec(nombre){
var ficha = document.getElementById(nombre);
var ventimp = window.open(' ', 'popimpr');
ventimp.document.writeln("");
ventimp.document.writeln(":: Formulario Efectiva ::");
//ventimp.document.writeln("");
ventimp.document.writeln("");
ventimp.document.writeln("");
ventimp.document.writeln("");
ventimp.document.writeln(" ");
ventimp.document.write( ficha.innerHTML );
ventimp.document.writeln("");
ventimp.document.close();
ventimp.print( );
ventimp.close();
}
function creaAjax(){
var objetoAjax=false;
try {
/*Para navegadores distintos a internet explorer*/
objetoAjax = new ActiveXObject("Msxml2.XMLHTTP");
} catch (e) {
try {
/*Para explorer*/
objetoAjax = new ActiveXObject("Microsoft.XMLHTTP");
}
catch (E) {
objetoAjax = false;
}
}
if (!objetoAjax && typeof XMLHttpRequest!='undefined') {
objetoAjax = new XMLHttpRequest();
}
return objetoAjax;
}
//var ajax=creaAjax();
// funcion para que en le casillero solo acepte numeros
var nav4 = window.Event ? true : false;
function SoloNum(evt){
// NOTE: Backspace = 8, Enter = 13, '0' = 48, '9' = 57
var key = nav4 ? evt.which : evt.keyCode;
return (key <= 13 || (key >= 48 && key <= 57));
}
function AddZeroCad(Num){
var Cad = ' ';
if ( Num < 10 ){
if (Num.length == 2){ // for firefox
return Num;
} else if (Num.length == 1){ // for IE
Cad = '0' + Num;
return String(Cad);
}
} else {
return Num;
}
}
function IsNumeric(sText){
var ValidChars = "0123456789.";
var IsNumber=true;
var Char;
for (i = 0; i < sText.length && IsNumber == true; i++)
{
Char = sText.charAt(i);
if (ValidChars.indexOf(Char) == -1)
{
IsNumber = false;
}
}
// verificar si es los datos ingresados son nulos
if(sText.length == 0)
IsNumber = false;
return IsNumber;
}
// recoleccion del mes
function getMonthNum(abbMonth)
{
var arrMon = new Array("Jan","Feb","Mar","Apr","May","Jun",
"Jul","Aug","Sep","Oct","Nov","Dec");
for(y=0; y0;m--)
temp.options[m]=null
for (i=0;i" + IdDiario + " ");
return IdDiario;
}
// funcion diaria
function TasaDiaria(PorcentTEA, TimeMes, DayAnno){
//debug(1, 'PorcentTEA: '+ PorcentTEA + ' TimeMes: '+ TimeMes + ' DayAnno: '+ DayAnno);
var PorcentajeDiario = new Number();
var parte0 = new Number();
var parte1 = new Number();
var parte2 = new Number();
var parte3 = new Number();
var parte4 = new Number();
var parte5 = new Number();
parte0 = PorcentTEA / 100;
parte0 = parte0.toFixed(8)
//debug(1, 'parte0: ' + parte0)
//alert ('porcentaje: ' + parte0);
parte1 = 1 + (parte0/TimeMes); //
parte1 = parte1.toFixed(19)
//debug(1, 'parte1: ' + parte1)
//alert ('parte1: ' + parte1);
parte2 = Math.pow(parte1, parseFloat(TimeMes))
parte2 = parte2.toFixed(19)
//alert ('parte2: ' + parte2);
parte3 = 1/DayAnno;
parte3 = parte3.toFixed(19);
//alert ('parte3: ' + parte3);
parte4 = Math.pow(parte2,parte3);
parte4 = parte4.toFixed(19);
//alert ('parte4: ' + parte4);
PorcentajeDiario = parte4 - 1;
PorcentajeDiario = PorcentajeDiario.toFixed(17);
//alert ('porcentaje diario: ' + PorcentajeDiario);
// =((1+(porcentaje/12))^12)^(1/360)-1
// parte completa para fines mas practicos
parte1 = Math.pow(1+((PorcentTEA/100)/TimeMes),TimeMes);
parte2 = Math.pow(parte1, (1/DayAnno)) - 1;
//alert('resultado: '+ parte2.toFixed(7) )
//debug(1, 'PorcentajeDiario: ' + PorcentajeDiario)
return PorcentajeDiario;
}
// cabeceras
function addHeader1(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +cont1 ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido1');
td1.className = 'bordercontenido1';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido1');
td2.className = 'bordercontenido1';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido1');
td3.className = 'bordercontenido1';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido1');
td4.className = 'bordercontenido1';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido1');
td5.className = 'bordercontenido1';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido1');
td6.className = 'bordercontenido1';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido1');
td7.className = 'bordercontenido1';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido1');
td8.className = 'bordercontenido2';
row.appendChild(td1);
row.appendChild(td2);
row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
tbody.appendChild(row);
}
function addHeader2(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8, cont9 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +cont1 ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido1');
td1.className = 'bordercontenido1';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido1');
td2.className = 'bordercontenido1';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido1');
td3.className = 'bordercontenido1';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido1');
td4.className = 'bordercontenido1';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido1');
td5.className = 'bordercontenido1';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido1');
td6.className = 'bordercontenido1';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido1');
td7.className = 'bordercontenido1';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido1');
td8.className = 'bordercontenido1';
var td9 = document.createElement("TD");
td9.appendChild (document.createTextNode(cont9));
td9.setAttribute('class', 'bordercontenido2');
td9.className = 'bordercontenido2';
row.appendChild(td1);
row.appendChild(td2);
row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
row.appendChild(td9);
tbody.appendChild(row);
}
function addHeader3(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8, cont9, cont10 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +cont1 ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido1');
td1.className = 'bordercontenido1';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido1');
td2.className = 'bordercontenido1';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido1');
td3.className = 'bordercontenido1';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido1');
td4.className = 'bordercontenido1';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido1');
td5.className = 'bordercontenido1';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido1');
td6.className = 'bordercontenido1';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido1');
td7.className = 'bordercontenido1';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido1');
td8.className = 'bordercontenido1';
var td9 = document.createElement("TD");
td9.appendChild (document.createTextNode(cont9));
td9.setAttribute('class', 'bordercontenido1');
td9.className = 'bordercontenido1';
var td10 = document.createElement("TD");
td10.appendChild (document.createTextNode(cont10));
td10.setAttribute('class', 'bordercontenido2');
td10.className = 'bordercontenido2';
row.appendChild(td1);
row.appendChild(td2);
row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
row.appendChild(td9);
row.appendChild(td10);
tbody.appendChild(row);
}
// funcion que crea rows en la tabla
function addRow(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +cont1 ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido1');
td1.className = 'bordercontenido1';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido1');
td2.className = 'bordercontenido1';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido1');
td3.className = 'bordercontenido1';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido1');
td4.className = 'bordercontenido1';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido1');
td5.className = 'bordercontenido1';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido1');
td6.className = 'bordercontenido1';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido1');
td7.className = 'bordercontenido1';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido2');
td8.className = 'bordercontenido2';
row.appendChild(td1);
row.appendChild(td2);
row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
tbody.appendChild(row);
}
function addRow2(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8, cont9 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +cont1 ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido1');
td1.className = 'bordercontenido1';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido1');
td2.className = 'bordercontenido1';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido1');
td3.className = 'bordercontenido1';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido1');
td4.className = 'bordercontenido1';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido1');
td5.className = 'bordercontenido1';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido1');
td6.className = 'bordercontenido1';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido1');
td7.className = 'bordercontenido1';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido1');
td8.className = 'bordercontenido1';
var td9 = document.createElement("TD");
td9.appendChild (document.createTextNode(cont9));
td9.setAttribute('class', 'bordercontenido2');
td9.className = 'bordercontenido2';
row.appendChild(td1);
row.appendChild(td2);
row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
row.appendChild(td9);
tbody.appendChild(row);
}
function addRow3(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8, cont9, cont10 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +cont1 ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido1');
td1.className = 'bordercontenido1';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido1');
td2.className = 'bordercontenido1';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido1');
td3.className = 'bordercontenido1';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido1');
td4.className = 'bordercontenido1';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido1');
td5.className = 'bordercontenido1';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido1');
td6.className = 'bordercontenido1';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido1');
td7.className = 'bordercontenido1';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido1');
td8.className = 'bordercontenido1';
var td9 = document.createElement("TD");
td9.appendChild (document.createTextNode(cont9));
td9.setAttribute('class', 'bordercontenido1');
td9.className = 'bordercontenido1';
var td10 = document.createElement("TD");
td10.appendChild (document.createTextNode(cont10));
td10.setAttribute('class', 'bordercontenido2');
td10.className = 'bordercontenido2';
row.appendChild(td1);
row.appendChild(td2);
row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
row.appendChild(td9);
row.appendChild(td10);
tbody.appendChild(row);
}
function addRowTotales(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +"suntotales" ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
//td1.setAttribute('colspan', '3');
td1.colSpan=3;
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido3');
td1.className = 'bordercontenido3';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido3');
td2.className = 'bordercontenido3';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido3');
td3.className = 'bordercontenido3';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido3');
td4.className = 'bordercontenido3';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido3');
td5.className = 'bordercontenido3';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido3');
td6.className = 'bordercontenido3';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido3');
td7.className = 'bordercontenido3';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
row.appendChild(td1);
//row.appendChild(td2);
//row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
tbody.appendChild(row);
}
function addRowTotales3x6(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8 , cont9){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +"suntotales" ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
//td1.setAttribute('colspan', '3');
td1.colSpan=3;
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido3');
td1.className = 'bordercontenido3';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido3');
td2.className = 'bordercontenido3';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido3');
td3.className = 'bordercontenido3';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido3');
td4.className = 'bordercontenido3';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido3');
td5.className = 'bordercontenido3';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido3');
td6.className = 'bordercontenido3';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido3');
td7.className = 'bordercontenido3';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido3');
td8.className = 'bordercontenido3';
var td9 = document.createElement("TD");
td9.appendChild (document.createTextNode(cont9));
row.appendChild(td1);
//row.appendChild(td2);
//row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
row.appendChild(td9);
tbody.appendChild(row);
}
function addRowTotales2(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8, cont9 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +"suntotales" ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
//td1.setAttribute('colspan', '3');
td1.colSpan=4;
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido3');
td1.className = 'bordercontenido3';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido3');
td2.className = 'bordercontenido3';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido3');
td3.className = 'bordercontenido3';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido3');
td4.className = 'bordercontenido3';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido3');
td5.className = 'bordercontenido3';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido3');
td6.className = 'bordercontenido3';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido3');
td7.className = 'bordercontenido3';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
//td8.setAttribute('class', 'bordercontenido2');
//td8.className = 'bordercontenido3';
var td9 = document.createElement("TD");
td9.appendChild (document.createTextNode(cont9));
row.appendChild(td1);
//row.appendChild(td2);
//row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
//row.appendChild(td9);
tbody.appendChild(row);
}
// total para especiales
function addRowTotales3(id, cont1, cont2,cont3,cont4, cont5, cont6, cont7, cont8, cont9 ){
var tbody = document.getElementById(id).getElementsByTagName("TBODY")[0];
var row = document.createElement("TR");
row.id = 'rowline' +"suntotales" ;
var td1 = document.createElement("TD");
td1.id = 'coutaid';
//td1.setAttribute('colspan', '3');
td1.colSpan=4;
td1.appendChild(document.createTextNode(cont1));
td1.setAttribute('class', 'bordercontenido3');
td1.className = 'bordercontenido3';
var td2 = document.createElement("TD");
td2.appendChild (document.createTextNode(cont2));
td2.setAttribute('class', 'bordercontenido3');
td2.className = 'bordercontenido3';
var td3 = document.createElement("TD");
td3.appendChild (document.createTextNode(cont3));
td3.setAttribute('class', 'bordercontenido3');
td3.className = 'bordercontenido3';
var td4 = document.createElement("TD");
td4.appendChild (document.createTextNode(cont4));
td4.setAttribute('class', 'bordercontenido3');
td4.className = 'bordercontenido3';
var td5 = document.createElement("TD");
td5.appendChild (document.createTextNode(cont5));
td5.setAttribute('class', 'bordercontenido3');
td5.className = 'bordercontenido3';
var td6 = document.createElement("TD");
td6.appendChild (document.createTextNode(cont6));
td6.setAttribute('class', 'bordercontenido3');
td6.className = 'bordercontenido3';
var td7 = document.createElement("TD");
td7.appendChild (document.createTextNode(cont7));
td7.setAttribute('class', 'bordercontenido3');
td7.className = 'bordercontenido3';
var td8 = document.createElement("TD");
td8.appendChild (document.createTextNode(cont8));
td8.setAttribute('class', 'bordercontenido3');
td8.className = 'bordercontenido3';
var td9 = document.createElement("TD");
td9.appendChild (document.createTextNode(cont9));
row.appendChild(td1);
//row.appendChild(td2);
//row.appendChild(td3);
row.appendChild(td4);
row.appendChild(td5);
row.appendChild(td6);
row.appendChild(td7);
row.appendChild(td8);
row.appendChild(td9);
tbody.appendChild(row);
}
// funcion de verificacion de existencia de un tag "tr, td, table, p, div" por id
function vertr(iddetr){
tagdetr = document.getElementById('rowline' + iddetr );
if (tagdetr){
//alert('Existe el tr');
return true;
} else {
//alert('No Existe el tr');
return false;
}
}
var xyz;
function constructorObjeto(idObj) {
//Defino metodos y variables privadas que no pueden ser accesibles desde fuera del objeto
var texto = "Texto privado";
var metodoPrivado = function () {
//alert(texto + "----Esto es un metodo privado que utiliza una variable privada y que se accede a el solo desde dentro del objeto")
xyz = 'respuesta';
return xyz;
}
return texto;
//metodoPrivado();
//alert(metodoPrivado());
}
function LlamarAlObjeto(paramValue) {
// Definimos un nuevo objeto por medio de nuestro constructor, asi en la siguiente linea podemos acceder a todos sus metodos y variables
var miObjeto = new constructorObjeto(paramValue); // declaro el constructor
alert(eval(miObjeto.xyz) + ' ' + paramValue);
document.getElementById('segunda').innerHTML = 'segunda '+ miObjeto.metodoPrivado;
}
// funcion para limpiar la tabla cuando se haga otro calculo
function LimpiarTabla2(){
//tagdetr = document.getElementById('rowline1')
//if (tagdetr){
var counter;
counter = 1;
while(vertr(counter)){
alert('id = ' + counter);
document.getElementById('loading').innerHTML = 'borrada tr rowline' + counter ;
// corro los
var y = document.getElementById('prueba'); //se obtiene la tabla
var Count=document.getElementById('Count'); // se obtiene el id
counter = counter + 1;
}
}
// funcion final para el limpiado de la tabla
function LimpiarTabla() {
var counter;
counter = 0;
var TABLE = document.getElementById("myTable");
var tablita = TABLE.rows.length ;
//alert('cantidad de rows: ' + tablita);
while(counter < tablita){
//alert('Contadors: ' + counter);
TABLE.deleteRow(TABLE.rows.length-1);
//TABLE.deleteRow(TABLE.rows.length-1);
counter = counter + 1;
}
}
// cargar el porcentaje del combo
function LoadTipoCredito(PorcentTea){
//cargo el tipo de credito + el porcentaje
alert("algo");
}
function AsigFecha(a){
FechaInicioxyz = a ;
}
function FormulaPri(){
//rpta=exp()
alert(rpta);
}
// funcion de redondeo
function Redond(NumFloat, precision){
//NumFloat = document.getElementById('numeroflotante').value;
//NumFloat = .07;
//precision = 5;
//NumFloat = parseFloat(NumFloat);
//document.getElementById('diez').innerHTML = '1.- ingreso de numero, primera linea: ' + NumFloat;
NumFloat = NumFloat + ''; //convert value to string
//alert('tipo de numfloat: ' + typeof(NumFloat));
precision = parseInt(precision);
var NumFloat2 = typeof(NumFloat);
var Punto;
var ContadorPunto;
var TTotal;
var DcExpo = 10;
var DcExpoRpta = '';
var sw = true;
var RestDc = 0;
var NumPointsFl;
var ApPoint = 0;
Punto = NumFloat.indexOf('.');
if (Punto < 0){
//document.getElementById('cuarta').innerHTML = 'no tiene punto o decimales son ceros: ' + Punto;
//DcExpoRpta = Math.pow(DcExpo, precision);
for(var i = 1; i <= precision; i++){
DcExpoRpta = DcExpoRpta + '0';
}
NumFloat = NumFloat + '.' + DcExpoRpta;
// devolvemos el tamaño de la cadena, en este caso no tiene
// no es un decimal, por lo tanto la devolvemos tal y como esta
TTotal = NumFloat.length + 1;
} else {
//document.getElementById('cuarta').innerHTML = 'Tiene punto: ' + Punto;
ContadorPunto = 0;
for (var Cont=0; Cont < NumFloat.length; Cont++) {
//document.write("Donde esta el punto : bucle ");
//document.write("Donde esta el punto : " + NumFloat.substr(Cont, 1) + " ");
if (NumFloat.substr(Cont, 1) == "."){
ContadorPunto = ContadorPunto + 1;
//document.write("Donde esta el punto : " + NumFloat.substr(Cont, 1) + " ");
}
if (ContadorPunto == 1 && sw == true){ // y que no se repita
// grabo el numero de la aparicion de la variable
ApPoint = Cont + 1;
//alert(ApPoint);
sw = false;
}
}
//document.write("Donde esta el punto Final : " + ContadorPunto + " ");
// desde aqui tengo que trabajar, ya que desde este punto ya tengo una ubicacion de donde esta el punto decimal
//document.getElementById('quinta').innerHTML = 'Contador punto: ' + ContadorPunto;
// verificamos si tiene varios puntos, si tiene mas de un punto saldra un errror
if ( ContadorPunto > 1){
alert('el numero tiene ' + ContadorPunto + ' puntos.');
return 0;
}
//ContadorPunto = ContadorPunto + 1;
//ApPoint = ApPoint + 1;
// saber cuantos decimales tiene el float
RestDc = NumFloat.length - ApPoint;
//document.getElementById('sexta').innerHTML = 'Presicion: : ' + precision;
// por aqui se tiene que correguir haber si no tiene punto se le pondria el punto al final
//document.getElementById('octava').innerHTML = 'Aparición de punto: ' + ApPoint;
// algoritmo para la presencia de un cero en la respuesta,
// en caso de que los decimales no cubran la cantidad de decimales a mostrar
if(RestDc < precision){
// resto para saber cuantos ceros faltan
NumPointsFl = precision - RestDc;
// creo los ceros que falta
for(var i = 1; i <= NumPointsFl; i++){
DcExpoRpta = DcExpoRpta + '0';
}
NumFloat = NumFloat + DcExpoRpta;
//document.getElementById('novena').innerHTML = 'numero de decimales menor que presicion: ' + NumPointsFl;
}
// funcion de redondeo
// devolvemos una cadena con formato de numero que nos piden
//TTotal = ContadorPunto + ApPoint;
TTotal = precision + ApPoint;
} // fin del else revision si tiene punto o no sentencia IF ()
// retornamos el numero
TTotal = NumFloat.substr(0, TTotal);
return TTotal;
//document.getElementById('segunda').innerHTML = 'Respuesta de la funcion: ' + TTotal;
} // eof Redond()
function nombretag(){
document.getElementById('loading').innerHTML = "Loading...";
}
// funciones para sacar la tir
function CalcTIR(TempNumTIR, TempNumCouta, TempMontCuota ){
var TempSuma = 0;
for (y=1; y <= TempNumCouta; y++){
TempCalc = Math.pow((1 + TempNumTIR),y);
TempCalc2 = TempMontCuota / TempCalc;
TempSuma = TempSuma + TempCalc2;
}
return TempSuma;
}
// funcion de la TIR
function GetTIR(Cuota, NumCuota, MonTotal){
// se tiene que usar un metodo de iteraciones
var NumCalTIR = new Number();
var TempCalTIR = new Number();
//var NumDecimCalc = new Number();
var RptaTIR = new Number();
var DecimalCalc = new Number();
var ContDecimLoop;
var TempCalc;
var TempCalc2;
var TempSuma;
var sw;
var ww;
NumCalTIR = 0.01;
TempSuma = 0;
sw = true;
TempCalc = 0; // numero de la suma en el acto
TempCalc2 = 0; // almacena el numero de la suma anterior
ContDecimLoop = 1;
DecimalCalc = 0.1;
// hago un loop para sacar un porcentaje mas preciso
NumCalTIR = 0;
while(ContDecimLoop <= 6){
// rutina para el calculo
TempCalc = 0; // numero de la suma en el acto
TempCalc2 = 0; // almacena el numero de la suma anterior
ww = 0;
sw = true;
//// calculo de los decimales, division itinerante para poder sacar el resultadobv
DecimalCalc = DecimalCalc /10;
DecimalCalc = DecimalCalc.toFixed(ContDecimLoop+1);
//NumDecimCalc = DecimalCalc;
NumCalTIR = TempCalTIR;
while(sw){ // tiene que ser verdadero
//while(ww < 11){ // tiene que ser verdadero
// hago el calculo
if(DecimalCalc >= 0.1){
//ww = 12;
sw = false;
}
TempSuma = CalcTIR(NumCalTIR, NumCuota, Cuota);
if (TempCalc > MonTotal && MonTotal > TempCalc2){
sw = false;
}
if(sw){
if (TempCalc2 != 0){
TempCalc = TempCalc2;
}
TempCalc2 = TempSuma;
TempCalTIR = NumCalTIR - parseFloat(DecimalCalc);
NumCalTIR = parseFloat(NumCalTIR) + parseFloat(DecimalCalc);
}
// si el la suma TempCalc2 mayor que suma y TempCalc2 es menor que suma
//ww++;
} // end While
ContDecimLoop++;
} // end while(ContDecimLoop <= 6){
RptaTIR = parseFloat(TempCalTIR.toFixed(6));
return RptaTIR;
//return RptaTIR.toFixed(2);
}
function RptaTirNode(BrTIR){
var CalTime = new Number();
var RptaTIR = new Number();
FactTiempoTEA = document.getElementById('tipocredit').name;
if (document.getElementById('tipocredit').value == 7){
CalTime = 52;
} else if (document.getElementById('tipocredit').value == 30){
CalTime = 12;
} else {
alert("La función no contempla otros valores !!!");
return 0;
}
//alert(BrTIR)
RptaTIR = Math.pow(1 + parseFloat(BrTIR.toFixed(6)), CalTime) - 1;
// dando formato
RptaTIR = RptaTIR *100;
//document.write("La TIR anual es : " + RptaTIR.toFixed(2) + "% ");
return RptaTIR.toFixed(2);
}
// debug script
function debug(_idTag, _valorDebug){
var caddelimiterDebug = document.getElementById('debug').innerHTML;
//document.getElementById('capital_prst').value
//document.getElementById('debug').innerHTML = caddelimiterDebug +' '+ _valorDebug ;
}
// funcion de la formula de la TEA
function CalcFormulaTEA(MontoPrestado, NumCuotas, IntersPorcnt){
// 3 valores necesita la formula, capital nuemro de cuotas, interes expresado en decimales
var CalculoIS = new Number();
var NumPotencia = new Number();
var PartSup = new Number();
var PartInf = new Number();
var CuotaRpta = new Number();
var PorcentajeITF = new Number();
CalculoIS = 1 + parseFloat(IntersPorcnt);
NumPotencia = Math.pow(CalculoIS.toFixed(6), NumCuotas);
// Parte superior de la formula.
PartSup = parseFloat(IntersPorcnt) * parseFloat(NumPotencia.toFixed(6));
// parte inferior de la formula.
PartInf = parseFloat(NumPotencia.toFixed(6)) - 1;
// calculo de la formula.
//CuotaRpta = parseFloat(MontoPrestado) * (parseFloat(PartSup) / parseFloat(PartInf));
return parseFloat(MontoPrestado) * (parseFloat(PartSup) / parseFloat(PartInf));
// Agregamos el porcentaje del ITF
//PorcentajeITF = parseFloat(CuotaRpta) * 0.0008 ;
//alert("porcentaje ITF: " + PorcentajeITF)
// MontoTotal = parseFloat(CuotaRpta) + parseFloat(PorcentajeITF);
//return parseFloat(CuotaRpta) + parseFloat(PorcentajeITF);
}
function FormatNumberDate(_numberdate){
var NumDateFormat = new String();
if (parseFloat(_numberdate) < 10 ){
NumDateFormat = '0' + parseFloat(_numberdate);
} else {
NumDateFormat = _numberdate
}
return NumDateFormat;
}
// funcion para saber que dia es el que va acobrar, ya que existen dias de pago
function DateProxPay(_fechaInicio){
//alert ('Fecha: '+ _fechaInicio)
var TempDayFech = new String();
var DiaReturn = new String();
var zTemp = new Number();
var FechaDePago = new String();
var FechasCobro = new Array();
FechasCobro[1] = 1;
FechasCobro[2] = 5;
FechasCobro[3] = 10;
FechasCobro[4] = 15;
FechasCobro[5] = 20;
FechasCobro[6] = 25;
// verifico la fecha de entrada y lo programo
//alert("fecha ingreso: "+ _fecha);
TempDayFech = _fechaInicio.split("/");
//alert("Dia fecha: "+TempDayFech[0]);
//document.write('dian ingreso: ' + TempDayFech[0]);
for(z=1; z <= FechasCobro.length; z++){
if (TempDayFech[0] <= FechasCobro[z] ){
//document.write(' dia Z: ' + TempDayFech[1]);
zTemp = z + 1;
DiaReturn = FechasCobro[z];
if (TempDayFech[1] < 12){
//document.write(' le sumo uno: ' + TempDayFech[1]);
TempDayFech[1] = parseFloat(TempDayFech[1]) + 1;
} else {
//document.write(' regreso a uno : ' + TempDayFech[1]);
TempDayFech[1] = 1;
TempDayFech[2] = parseFloat(TempDayFech[2]) + 1;
}
// retorno la fecha
FechaDePago = FormatNumberDate(FechasCobro[z]) + '/' + FormatNumberDate(TempDayFech[1]) + '/' + TempDayFech[2];
z=FechasCobro.length;
//alert ('fecha sss: ' + FechaDePago);
} else if (TempDayFech[0] > FechasCobro[6]){
//document.write(' por aqui : ' + TempDayFech[1]);
// tengo que verificar si me voy hasta el otro mes o año
DiaReturn = FechasCobro[1]; // seria el mes siguiente
if (TempDayFech[1] >= 1 && TempDayFech[1] <= 11){
TempDayFech[1] = parseFloat(TempDayFech[1]) + 1;
} else {
TempDayFech[1] = 01;
TempDayFech[2] = parseFloat(TempDayFech[2]) + 1;
}
FechaDePago = FormatNumberDate(FechasCobro[1]) + '/' + FormatNumberDate(TempDayFech[1]) + '/' + TempDayFech[2];
z=FechasCobro.length;
//alert ('fecha: ' + FechaDePago);
}
}
//ert ('Dia de referencia: ' + FechaDePago);
//document.write(' proximo dia de pago: ' + FechaDePago);
// si no le da valor quiere decir que es entre 26 y 30
//return DiaReturn;
//document.write(' ingreso de fecha ' + _fechaInicio + ' Proxima fecha : '+ FechaDePago)
return FechaDePago;
}
/*
function FechaToDate(FechaComun){
var SplitFecha = new Array();
SplitFecha = FechaComun.split('/');
FechaComun = SplitFecha + SplitFecha SplitFecha
document.write(SplitFecha + ' ');
}
*/
// tiempo entre fechas en dias.
function DiasEntreFechas(FechaIni, FechaFin){
var array1 = new Array();
var array2 = new Array();
array1 = FechaIni.split('/')
array2 = FechaFin.split('/')
var Tiempo2 = new String();
var FIni = new Date(array1[2],array1[1] -1, array1[0]);
var FFin = new Date(array2[2],array2[1] -1, array2[0]);
var tiempo = parseFloat(FFin.getTime()) - parseFloat(FIni.getTime());
diasDEF = Math.floor(tiempo / (1000 * 60 * 60 * 24));
//document.write('dias entre fecha y fecha: ' + diasDEF);
return diasDEF;
}
// DiasEntreFechas('25/04/2007', '25/10/2008');
// sacar el factor SFI
function FactorSFI(TsDiaria, DiasAcum){
var RtpaFactorSFI = new Number();
//TsDiaria = 0.002153599709683100000 ;
RtpaFactorSFI = (1 + parseFloat(TsDiaria));
//document.write(' Factor SFI(Suma): ' + parseFloat(RtpaFactorSFI));
RtpaFactorSFI = Math.pow(RtpaFactorSFI, DiasAcum);
RtpaFactorSFI = RtpaFactorSFI.toFixed(17)
//document.write(' Factor SFI(elevado): ' + RtpaFactorSFI);
RtpaFactorSFI = 1 / RtpaFactorSFI;
RtpaFactorSFI = RtpaFactorSFI.toFixed(17);
//document.write(' Factor SFI: ' + RtpaFactorSFI);
//debug('debug', ' Factor SFI: ' + RtpaFactorSFI + ' -- Tasa diaria: ' + TsDiaria + ' -- DiasAcum: ' + DiasAcum)
//alert('hola');
// formula
return RtpaFactorSFI;
}
//FactorSFI(0.0018654, 61);
function Factor2(F2TsDiaria, F2NumDias){
var F2Rpta = new Number();
F2Rpta = 1 + parseFloat(F2TsDiaria)
F2Rpta = Math.pow(F2Rpta,F2NumDias)
F2Rpta = F2Rpta - 1;
F2Rpta = F2Rpta.toFixed(7)
//document.write(' Factor(2): ' + F2Rpta);
return F2Rpta;
}
//Factor2(0.0018654, 30);
// funcion para sacar los factores para el cronograma
function CalculoFactores(_TasaDiaria, _FechaPedido, _MontoPrestado, _NumCuotas){
var CalcFact = new Array();
//var CalcFact = new Array(new Array (7), new Array (65));
var ArrDate = new Array();
var StrDate = new String();
var StrDateTmp = new String();
// temporal de fecha
var TempFechaCrono = new String();
var TempFechaCronoCount = new Number();
var TempFactorSFI = new String();
var TempFactorSFICount = new Number();
var TempFactor2 = new String();
var TempFactor2Count = new Number();
var TempFechaDate = new String();
var TsDiaria = new Number();
// recopilo el valor del porcentaje de la tea para sacar la tasa diaria
//alert(document.getElementById('tea').value)
//TsDiaria = document.getElementById('tea').value;
TsDiaria = TasaDiaria(_TasaDiaria, 12, 360);
//TsDiaria = 69.001056;
//TsDiaria = TasaDiaria(TsDiaria, 12, 360);
//document.write(' Tasa Diaria: ' + TsDiaria);
//alert('TsDiaria: '+ TsDiaria);
// se comienza a sacar los calculos del costo para poderlos usar en el formulario
// 1.- descompongo la fecha y veo que dia de pago mas cercano
//ArrDate = _FechaPedido.split();
// armo la fecha de el primer dia de registro, con esto comienzo a calcular
//StrDate = DateProxPay(_FechaPedido); // veo que dia es el mas cercano para el pago, retorna el dia.
//document.write(' Fecha de inicio de pago: ' + StrDate );
// hago un for por la cantidad de cuotas que se requieran
for(Ncount = 1 ; Ncount <= _NumCuotas; Ncount++){
var CalcFactAux = new Array(7);
// lo primero saco la cuenta entre los dias trascurridos, para poder sacar cuentas
if (Ncount == 1 ){ // si es primera cuota
//document.write(' es el primero');
StrDate = DateProxPay(_FechaPedido);
//document.write(' Fecha de ingreso: '+ _FechaPedido + ' - fecha proxima: ' + StrDate);
TempFechaCrono = DiasEntreFechas(_FechaPedido, StrDate);
TempFechaCronoCount = parseFloat(TempFechaCrono);
//document.write(' es el primero: '+ TempFechaCrono);
// factor SFI
TempFactorSFI = FactorSFI(TsDiaria, TempFechaCronoCount);
TempFactorSFICount = parseFloat(TempFactorSFI);
// Factor 2
TempFactor2 = Factor2(TsDiaria, TempFechaCrono);
} else { // si es diferente de primera cuota
//document.write(' diferente del primero::: ' + TempFechaCrono);
TempFechaDate = StrDate;
StrDate = DateProxPay(StrDate);
//document.write(' diferente Fecha de ingreso: '+ TempFechaDate + ' - fecha proxima: ' + StrDate);
TempFechaCrono = DiasEntreFechas(TempFechaDate, StrDate);
TempFechaCronoCount = parseFloat(TempFechaCronoCount) + parseFloat(TempFechaCrono);
//document.write(' diferente del primero '+ TempFechaCrono);
// factor SFI
TempFactorSFI = FactorSFI(TsDiaria, TempFechaCronoCount);
TempFactorSFICount = parseFloat(TempFactorSFICount) + parseFloat(TempFactorSFI);
// Factor 2
TempFactor2 = Factor2(TsDiaria, TempFechaCrono);
}
//DiasEntreFechas(FechaIni, FechaFin)
//document.write(' ' + Ncount +' .- datos: ' + TempFactorSFI + ' -- ' + TempFactorSFICount.toFixed(7) + ' -- ' + TempFactor2 +' -- '+ StrDate +' -- ' +TempFechaCrono + ' -- ' + TempFechaCronoCount);
// destinamos a un array para que de la respuesta
CalcFactAux[0] = Ncount;
CalcFactAux[1] = TempFactorSFI;
CalcFactAux[2] = TempFactorSFICount.toFixed(17);
CalcFactAux[3] = TempFactor2;
CalcFactAux[4] = StrDate;
CalcFactAux[5] = TempFechaCrono;
CalcFactAux[6] = TempFechaCronoCount;
// lo destino al array principal
CalcFact[Ncount] = CalcFactAux;
}
//document.write(' dato total : ' + TempFechaCronoCount);
//dias_Fechas();
//document.write(' '+CalcFact);
// CalcFact[Fila][Columna]
//document.write(' campo : ' + CalcFact[18][4]);
// al final tiene que devolver un array para poder sacar cuentas y devolver el array para que sea revisado por otra funcion
// y poder sacar el factor global
return CalcFact;
}
//CalculoFactores(69.001056, '25/04/2007', 4380.51, 18)
function Tableheader(){
var tb,th;
tb=document.createElement("table");
tb.setAttribute("border","1");
tb.id = 'tablaform';
//tb.onclick=function() {B(this);}
th=document.createElement("thead");
tb.appendChild(th);
//document.body.appendChild(tb);
document.getElementById('TableView').appendChild(tb );
//B(tb);
}
////////////////////////////////////////////////////////////////////////////////////
// funcion para sacar calculos y TEA
function CalculoCompleto(){
var Capital = new Number(); // monto a prestar ingresado formulario
var TmpCapital = new Number();
var Is = new Number(); // interes semanal BaseTEA(PorcAnualTEA, TiempoDias)
var IsCronograma = new Number();
var NCuotas; // numero de cuotas ingresada por formulario
var TEA; // TEA anual ingresada por formulario
var CampEsp = new Number();
var PorctCred = new Number();
var FactTiempoTEA // ingresado formulario;
var CuotaPrestamo; // respuesta
var IntPotc;
var IntPotc1;
var sw = true;
var cont1;
var saldo;
var subsaldo2;
var subsaldo3;
var FechaInicio;
var MontoITF = new Number();
var MontoITFtmp = new Number();
var MontoTotal = new Number();
var MontoTotalTmp = new Number();
var Part1;
var part2;
var IntGastos;
var IntGsPart;
var NumTIR = new Number();
var Cprestamo = new Number();
var CprestamoTmp = new Number();
var PorcetITF = new Number();
// valor del ITF
PorcetITF = 0.0006;
var ValCampEsp = new Number();
// valor de campaña especial
ValCampEsp = 7.00;
var CapitalTmp = new Number();
// ajax
// asignando valores
Capital = document.getElementById('capital_prst').value // Capital
CapitalTmp = Capital;
NCuotas = document.getElementById('ncuotas').value // Número de cuotas
TEA = document.getElementById('tea').value // Tasa Efectiva Anual(TEA)
CampEsp = document.getElementById('campesp').value
//alert(CampEsp)
//alert(document.forms['formulario'].campesp.checked)
//return 0;
// Valido los casilleros de ingreso de datos
if(!IsNumeric(Capital)){
alert('Ingrese un capital valido.');
document.formulario.capital.focus();
return 0;
}
if(!IsNumeric(NCuotas)){
alert('Ingrese un número de cuotas valido.');
document.formulario.ncoutas.focus();
return 0;
}
if(!IsNumeric(TEA)){
alert('Ingrese una TEA (Tasa Efectiva Anual) valida.');
document.formulario.tea.focus();
return 0;
}
// valido que el numero ingresado este entre y entre las teas
if ((TEA > ReturValorTEA('Max')) || (TEA < ReturValorTEA('Min'))){
alert('Usted debe ingresar un número entre:' + ReturValorTEA('Min') + ' y ' + ReturValorTEA('Max'));
document.formulario.tea.focus();
return 0;
}
TmpCapital = Capital;
//alert("seleccionado : " + document.forms['formulario'].FrmTipoCredito.options.selectedIndex);
// calculo del 2% de todo el monto, siempre y cuando sea Micro Empresa
if (document.forms['formulario'].FrmTipoCredito.options.selectedIndex == 1){
// cambio para poder ingresar el porcentaje y haga el calculo porcentcred
PorctCred = document.getElementById('porcentcred').value
if (PorctCred < 0 || PorctCred == ''){
alert('El porcentaje ingresado no es correcto.');
return 0;
} else {
IntGastos = (Capital * PorctCred) / 100;
//alert("se ejecuta el porcentaje.");
}
} else {
IntGastos = 0;
}
//alert ("Comision del 2 %: " + IntGastos);
// divido el monto en te el tiempo par apoder sumarselo
Capital = parseFloat(Capital) + IntGastos;
FactTiempoTEA = document.getElementById('tipocredit').value
//alert('Base tea: ' + BaseTEA(TEA, FactTiempoTEA))
///alert('Base tea: ' + TasaDiaria(TEA, 12, 360)); //////////////////////////////////////////
TasaDiaria(TEA, 12, 360)
Is = BaseTEA(TEA, FactTiempoTEA); /* formula de conversion de porcentaje */
IsCronograma = Is.toFixed(10);
Is = Is.toFixed(10);
//alert ("FactTiempoTEA: " + FactTiempoTEA);
// saco calculo de la TEA + ITF
//alert(CalcFormulaTEA(Capital, NCuotas, Is));
Cprestamo = CalcFormulaTEA(Capital, NCuotas, Is);
MontoITF = Cprestamo * PorcetITF ;
//Cprestamo = Cprestamo + MontoITF;
MontoTotal = Cprestamo + MontoITF;
// termino la parte que se muestra
// calculo de la cuota pero para sacar el calculo de la TIR.
Is = BaseTEA(TEA, 30); // formula de conversion de porcentaje
//IsCronograma = Is.toFixed(10);
Is = Is.toFixed(10);
//alert("Calculo 2: " + CalcFormulaTEA(Capital, 12, Is));
CprestamoTmp = CalcFormulaTEA(Capital, 12, Is);
MontoITFtmp = CprestamoTmp * PorcetITF ;
//Cprestamo = Cprestamo + MontoITF;
MontoTotalTmp = CprestamoTmp + MontoITFtmp;
//NumTIR = GetTIR(MontoTotalTmp.toFixed(2) , 12, TmpCapital);
//alert("monto total : " + MontoTotal.toFixed(2) )
NumTIR = GetTIR(MontoTotal.toFixed(2) , NCuotas, Capital);
NumTIR = RptaTirNode(NumTIR);
// fin calculo de la tea
// tabla cronograma
// saco los numeros correspondientes y procedo al acalculo
saldo = Capital.toFixed(2);
//alert("Saldo :" + saldo)
subsaldo2 = 0;
LimpiarTabla();
var ArrFactCalc = new Array();
// asignamos el varlor de la cuota al casillero
document.getElementById('cuota_prestamo2').value = MontoTotal.toFixed(2); // valor de la cuota
//alert ("subsaldo2: " + subsaldo2);
var SumInteres = new Number();
var SumCapital = new Number();
var SumCuota = new Number();
var SumCampEsp = new Number();
SumCampEsp = 0;
var SumCITF = new Number();
var SumTotal = new Number();
//***************************************************************************
// variables para los calculos
var IntersOriginal = new Number();
var IntersOriginalCount = new Number();
var IntersOriginalCount = new Number();
var SaldoCapital = new Number();
var SaldoCapitalCount = new Number();
var SaldoCapitalTmp = new Number();
var CoutaPst = new Number();
var CuotaCapital = new Number();
var CuotaCapitalCount = new Number();
var CuotaInteres = new Number();
var CuotaInteresCount = new Number();
_objetus = new creaAjax();
_URL_ = "fecha.php" //URL
_objetus.open("GET", _URL_, true); //abrir procesador
_objetus.onreadystatechange=function() { //funcion controlador
if (_objetus.readyState == 4) //control de estados del proceso
{
//si se da un status 200 (TERMINADO CON EXITO)
if(_objetus.status == 200)
{
//procesos que se realizaran con los datos obtenidos/////////////////////////////////////////////////////////
FechaInicioxyz = _objetus.responseText;
////////////////////////////return FechaInicioxyz;/////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////////////
//CalculoFactores(1, '10/04/2007', 4380.51, 18);
// si son cuotas mensuales
//alert('tipo credito: ' + FactTiempoTEA)
// headers
if (FactTiempoTEA == 30){
//alert ('calculo especial')
//ArrFactCalc = CalculoFactores(69.001056, '25/04/2007', 4380.51, 18);
ArrFactCalc = CalculoFactores(TEA, FechaInicioxyz, CapitalTmp, NCuotas);
//alert(ArrFactCalc)
//Tableheader()
// calcular el monto de la cuota, itf y demas cosas
//alert(ArrFactCalc[NCuotas][2] +' - ' + Capital)
CoutaPst = Capital / ArrFactCalc[NCuotas][2];
// sacamos el calculo de la cuota con el ITF
//SumCITF = CoutaPst * PorcetITF;
MontoITF = CoutaPst * PorcetITF;
MontoITF = MontoITF.toFixed(2);
MontoTotal = parseFloat(CoutaPst) + parseFloat(MontoITF);
MontoTotalTmp = MontoTotal;
//NumTIR = GetTIR(MontoTotal.toFixed(2) , NCuotas, CapitalTmp);
document.getElementById('cuota_prestamo2').value = MontoTotal.toFixed(2); // valor de la cuota
//alert(MontoTotal)
// cabecera de tabla
if(document.forms['formulario'].FrmTipoCredito.options.selectedIndex == 0){ // de consumo
if (FactTiempoTEA == 30){
if (document.forms['formulario'].campesp.checked == false){
addHeader1('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
} else { // campaña especial 'de consumo'
//alert('Campaña especial aaaa')
addHeader2('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'Varios (S/.)',
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
}
} else if (FactTiempoTEA == 7){ // prestamo semanal si desabilito linea 1727
//alert ('semanales ')
if (document.forms['formulario'].campesp.checked == false){
addHeader1('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
} else {
//alert('Campaña especial')
addHeader2('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'Varios (S/.)',
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
}
}
} else if(document.forms['formulario'].FrmTipoCredito.options.selectedIndex == 1){ // micro empresa
//alert('Micro empresa')
if (document.forms['formulario'].campesp.checked == false){
addHeader2('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Porcentaje', // porcentaje de costos varios
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
} else { // campaña especial 'de consumo'
addHeader3('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Porcentaje', // porcentaje de costos varios
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'Varios (S/.)',
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
}
}
} else { // creditos semanales
//alert ('semanales ')
if (document.forms['formulario'].campesp.checked == false){
addHeader1('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
} else {
//alert('Campaña especial')
addHeader2('myTable', ///'myTable',
'Cuota', // numero de cuota
'Fecha', // fecha
'Saldo', // saldo
'Interes', // interes
'Capital', // capital
'Cuota', // cuota
'Varios (S/.)',
'ITF', // ITF
'Total' // monto de la cuota sin interes
);
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////
///// el for para calculo de cada cuota
for(i=1; i <= NCuotas; i++){
// calculo de cuota mes
if (FactTiempoTEA == 30){ // si es consumo comun
if(i == 1){ // primera cuota
IntersOriginal = ArrFactCalc[i][3] * Capital;
//alert(ArrFactCalc[i][3] + ' - ' + Capital + ' - '+ IntersOriginal);
//alert(ArrFactCalc[i][3])
//SaldoCapital = Capital - IntersOriginal;
// calculamos el capital
//alert(IntersOriginal + ' = ' +CoutaPst)
CuotaCapital = CoutaPst - IntersOriginal;
// interes a mostrar
CuotaInteres = IntersOriginal + (CoutaPst - (IntersOriginal + CuotaCapital))
// capital prestado y lso descuentos
SaldoCapital = Capital;
SaldoCapitalTmp = Capital - CuotaCapital
SCapital = Capital;
} else if(i == NCuotas){ // si es ultima cuota
//alert(i + ' .-antes de todo interes original ' + SaldoCapital + ' - ' + SaldoCapitalTmp + ' - ' + CuotaCapital)
IntersOriginal = ArrFactCalc[i][3] * SaldoCapitalTmp;
//alert(i + ' .-interes original ' + IntersOriginal + ' - ' + ArrFactCalc[i][3] + ' - ' + SaldoCapital)
SaldoCapital = SaldoCapital - CuotaCapital;
CuotaCapital = CoutaPst - IntersOriginal;
// interes a mostrar
CuotaInteres = IntersOriginal + (CoutaPst - (IntersOriginal + CuotaCapital));
// capital prestado y lso descuentos
//alert(i + ' .-interes original ' + CuotaInteres + ' - ' + IntersOriginal + ' - ' + CuotaCapital)
//SCapital = SaldoCapital
} else { // si son las cuotas intermedias
//SCapital = SCapital - CuotaCapital;
IntersOriginal = ArrFactCalc[i][3] * SaldoCapitalTmp;
//alert(i + ' .-interes original ' + IntersOriginal + ' - ' + ArrFactCalc[i][3] + ' - ' + SaldoCapitalTmp)
CuotaCapital = CoutaPst - IntersOriginal;
// interes a mostrar
CuotaInteres = IntersOriginal + (CoutaPst - (IntersOriginal + CuotaCapital));
SaldoCapital = SaldoCapitalTmp;
// saldos para los calculos
SaldoCapitalTmp = SaldoCapitalTmp - CuotaCapital;
//SaldoCapital = SaldoCapitalTmp;
}
// si es campaña especial agrego otro campo mas para ser mostrado
if(document.forms['formulario'].FrmTipoCredito.options.selectedIndex == 0){
// calculo para de consumo
//alert('de consumo')
// si es con campaña especial o no
if (document.forms['formulario'].campesp.checked == false){ // no es campaña especial
addRow('myTable', ///'myTable',
i, // numero de cuota
ArrFactCalc[i][4], // fecha
SaldoCapital.toFixed(2), // saldo
CuotaInteres.toFixed(2), // interes
CuotaCapital.toFixed(2), // capital
CoutaPst.toFixed(2), // cuota
MontoITF, // ITF
MontoTotal.toFixed(2) // monto de la cuota sin interes
);
} else { // es especial
SumCampEsp = SumCampEsp + ValCampEsp;
MontoTotal = MontoTotalTmp;
MontoTotal = MontoTotalTmp + ValCampEsp;
addRow2('myTable', ///'myTable',
i, // numero de cuota
ArrFactCalc[i][4], // fecha
SaldoCapital.toFixed(2), // saldo
CuotaInteres.toFixed(2), // interes
CuotaCapital.toFixed(2), // capital
CoutaPst.toFixed(2), // cuota
ValCampEsp.toFixed(2), // monto de la campaña especial
MontoITF, // ITF
MontoTotal.toFixed(2) // monto de la cuota sin interes
);
}
} else if(document.forms['formulario'].FrmTipoCredito.options.selectedIndex == 1){
// calculo para microempresa
//alert('micro empresa')
if (document.forms['formulario'].campesp.checked == false){ // no es campaña especial
addRow2('myTable', ///'myTable',
i, // numero de cuota
ArrFactCalc[i][4], // fecha
2,
SaldoCapital.toFixed(2), // saldo
CuotaInteres.toFixed(2), // interes
CuotaCapital.toFixed(2), // capital
CoutaPst.toFixed(2), // cuota
MontoITF, // ITF
MontoTotal.toFixed(2) // monto de la cuota sin interes
);
} else { // es especial
SumCampEsp = SumCampEsp + ValCampEsp;
MontoTotal = MontoTotalTmp;
MontoTotal = MontoTotalTmp + ValCampEsp;
addRow3('myTable', ///'myTable',
i, // numero de cuota
ArrFactCalc[i][4], // fecha
2,
SaldoCapital.toFixed(2), // saldo
CuotaInteres.toFixed(2), // interes
CuotaCapital.toFixed(2), // capital
CoutaPst.toFixed(2), // cuota
ValCampEsp.toFixed(2), // monto de la campaña especial
MontoITF, // ITF
MontoTotal.toFixed(2) // monto de la cuota sin interes
);
}
}
// calculo para el capital original
//IntersOriginal = ArrFactCalc[i][3] * SaldoCapital;
// suma totales
SumInteres = parseFloat(SumInteres) + parseFloat(CuotaInteres);
SumCapital = parseFloat(SumCapital) + parseFloat(CuotaCapital);
SumCuota = parseFloat(SumCuota) + parseFloat(CoutaPst);
SumCITF = parseFloat(SumCITF) + parseFloat(MontoITF);
SumTotal = parseFloat(SumTotal) + parseFloat(MontoTotal);
}
/// si el prestamo es semanal
if (FactTiempoTEA == 7){ // si es semanal
if (document.forms['formulario'].campesp.checked == false){ // no es campaña especial
subsaldo2 = Redond(saldo * IsCronograma, 2);
subsaldo3 = Redond(Cprestamo - subsaldo2, 2); // amortizacion
addRow('myTable', i, String(FechaInicioxyz), saldo, subsaldo2, subsaldo3, Cprestamo.toFixed(2), MontoITF.toFixed(2), MontoTotal.toFixed(2));
// nueva fecha
saldo = Redond(saldo - subsaldo3, 2) ;
FechaInicioxyz = FechaPagoCuota( FechaInicioxyz );
// Calculos suma interes
SumInteres = parseFloat(SumInteres) + parseFloat(subsaldo2);
SumCapital = parseFloat(SumCapital) + parseFloat(subsaldo3);
SumCuota = parseFloat(SumCuota) + parseFloat(Cprestamo.toFixed(2));
SumCITF = parseFloat(SumCITF) + parseFloat(MontoITF.toFixed(2));
SumTotal = parseFloat(SumTotal) + parseFloat(MontoTotal.toFixed(2));
} else { // es campaña especial
//SumCampEsp = SumCampEsp + ValCampEsp;
SumCampEsp = SumCampEsp + ValCampEsp;
subsaldo2 = Redond(saldo * IsCronograma, 2);
subsaldo3 = Redond(Cprestamo - subsaldo2, 2); // amortizacion
addRow2('myTable', i, String(FechaInicioxyz), saldo, subsaldo2, subsaldo3, Cprestamo.toFixed(2), ValCampEsp.toFixed(2), MontoITF.toFixed(2), MontoTotal.toFixed(2));
// nueva fecha
saldo = Redond(saldo - subsaldo3, 2) ;
FechaInicioxyz = FechaPagoCuota( FechaInicioxyz );
// Calculos suma interes
SumInteres = parseFloat(SumInteres) + parseFloat(subsaldo2);
SumCapital = parseFloat(SumCapital) + parseFloat(subsaldo3);
SumCuota = parseFloat(SumCuota) + parseFloat(Cprestamo.toFixed(2));
SumCITF = parseFloat(SumCITF) + parseFloat(MontoITF.toFixed(2));
SumTotal = parseFloat(SumTotal) + parseFloat(MontoTotal.toFixed(2)) + ValCampEsp;
}
}
} // fin bucle for
// totales de los formularios
//i=i+1;
// verifico que tipo de slaida tiene
if(document.forms['formulario'].FrmTipoCredito.options.selectedIndex == 0){ // si es de consumo
if (FactTiempoTEA == 7){ //si es semanal
if (document.forms['formulario'].campesp.checked == false){ // no es campaña especial
addRowTotales('myTable', "Totales a Pagar", " ", " ", SumInteres.toFixed(2), SumCapital.toFixed(2), SumCuota.toFixed(2), SumCITF.toFixed(2), SumTotal.toFixed(2));
} else { // es campaña especial
addRowTotales3x6('myTable', "Totales a Pagar", " ", " ", SumInteres.toFixed(2), SumCapital.toFixed(2), SumCuota.toFixed(2), SumCampEsp.toFixed(2), SumCITF.toFixed(2), SumTotal.toFixed(2));
}
} else if (FactTiempoTEA == 30){ // si es mensual (de consumo)
if (document.forms['formulario'].campesp.checked == false){ // no es campaña especial
addRowTotales('myTable', "Totales a Pagar", " ", " ", SumInteres.toFixed(2), SumCapital.toFixed(2), SumCuota.toFixed(2), SumCITF.toFixed(2), SumTotal.toFixed(2));
} else { // es campaña especial
addRowTotales3x6('myTable', "Totales a Pagar", " ", " ", SumInteres.toFixed(2), SumCapital.toFixed(2), SumCuota.toFixed(2), SumCampEsp.toFixed(2), SumCITF.toFixed(2), SumTotal.toFixed(2));
}
}
} else if(document.forms['formulario'].FrmTipoCredito.options.selectedIndex == 1){ // si es de micro empresa
if (document.forms['formulario'].campesp.checked == false){ // no es campaña especial
addRowTotales2('myTable', "Totales a Pagar", " ", " ", SumInteres.toFixed(2), SumCapital.toFixed(2), SumCuota.toFixed(2), SumCITF.toFixed(2), SumTotal.toFixed(2));
} else { // es campaña especial
addRowTotales3('myTable', "Totales a Pagar", " ", " ", SumInteres.toFixed(2), SumCapital.toFixed(2), SumCuota.toFixed(2), SumCampEsp.toFixed(2), SumCITF.toFixed(2), SumTotal.toFixed(2));
}
}
// aqui para ponerle datos a lo de tir y tea
document.getElementById('InsertTEA').innerHTML = 'Tasa efectiva anual(TEA): ' + TEA + ' % ' ;
document.getElementById('InsertTIR').innerHTML = 'Tasa del costo efectivo anual: ' + NumTIR + ' % ' ;
} //eof _objetus.status
}
}
_objetus.send(null); //envío nulo de variables
}
function CalTEA_TIR(MontoCapital, Is, NunCuotas, ITF){
var NCuotas = new Number();
var IntPotc = new Number();
var IntPotc1 = new Number();
var capital
NCuotas = 12;
// calculo de la tea
// retorno la el valor de la funcion
//return Cprestamo;
// fin calculo de la tea
}