function cdetail(document)
{
	fixform(document.form);
	var rate = tonum(document.form.interest.value)/1200;
	var balance = tonum(document.form.loanBalance.value);
	var payment = tonum(document.form.monthlyPayment.value);
	var payments = tonum(document.form.payments.value);
	
	var doc = parent.document;
	doc.open("text/html");
	doc.write("<HTML><HEAD>");
	doc.write("<TITLE>Detailed History</TITLE>");
	doc.write("</HEAD>");
	doc.write("<BODY>");
	
	doc.write("\<SCRIPT LANGUAGE=\"JavaScript\"\>");
	doc.write("function format(val, decimal){");
	doc.write("scale = 1;");
	doc.write("if(decimal == null) decimal = 2;");
	doc.write("for(i = 0;i \< decimal;i++) scale*=10;");
	doc.write("str = \"\" + Math.round(parseFloat(val) * scale);");
	doc.write("while(str.length \<= decimal) str = \"0\" + str;");
	doc.write("point = str.length - decimal;");
	doc.write("num = \"\";");
	doc.write("i = point-3;");
	doc.write("while(i \>= 0){");
	doc.write("num1 = str.substring(i,i+3);");
	doc.write("if(i != point-3) num1 += \",\" + num;");
	doc.write("num = num1;");
	doc.write("i-=3;");
	doc.write("}");
	doc.write("if(i != -3){");
	doc.write("num1 = str.substring(0,i+3);");
	doc.write("if(point > 3) num1 += \",\" + num;");
	doc.write("num = num1;");
	doc.write("}");
	doc.write("return \"$\" + num + \".\" + str.substring(point, str.length);");
	doc.write("}");
	doc.write("\</SCRIPT\>");

	doc.write("<TABLE BORDER=3 CELLPADDING=1><TR><TH>Payment #</TH><TH>Balance Owed <br>Before Payment</TH><TH>Interest Paid</TH> <TH>Principal Paid</TH><TH>Cumulative <br>Interest Paid</TH><TH>Payment</TH><TH>Cumulative<br>Payment</TH></TR>");
	
	var cumint = 0;
	var cumreal = 0;
	var cumpay = 0;
	var interest = 0;
	var realpay = 0;
	var defint = 0;
	
	var num = 1;
	while(balance > 0){
		interest = balance * rate;
		principal = payment - interest;
		if(principal < 0){alert("There are errors in this form.");return;}
		if(principal > balance-0.01) principal = balance;
		cumint = cumint + interest;
		cumreal = cumreal + interest;
		realpay = principal + interest;
		cumpay = cumpay + realpay;
		doc.write("<TR><TH>",num,"</TH><TH>", format(balance), "</TH><TH>", format(interest), "</TH><TH>", format(principal), "</TH><TH>", format(cumreal), "</TH><TH>", format(realpay), "</TH><TH>", format(cumpay), "</TH></TR>");
		num++;
		balance = balance - principal;
	}

	doc.write("<TR><TH>Payment #</TH><TH>Balance Owed <br>Before Payment</TH><TH>Interest Paid</TH> <TH>Principal Paid</TH><TH>Cumulative <br>Interest Paid</TH><TH>Payment</TH><TH>Cumulative<br>Payment</TH></TR>");
	doc.write("</TABLE>");
	doc.write("<HR></BODY></HTML>");
	doc.close();
	return;
}

