//Author: Morris Ng

function fmInitEmpty(){document.nmFrmCalc.nmTxDate1.value=""; document.nmFrmCalc.nmTxDate2.value=""; document.nmFrmCalc.nmTxDate3.value=""; document.nmFrmCalc.nmTxDate4.value=""; document.nmFrmCalc.nmTxDate5.value=""; document.nmFrmCalc.nmTxDate6.value="";}
function fmDoCalc(){vmYrBeg=document.nmFrmCalc.nmTxYrBeg.value; vmMnBeg=document.nmFrmCalc.nmTxMnBeg.value-1; vmDyBeg=document.nmFrmCalc.nmTxDyBeg.value; vmYrEnd=document.nmFrmCalc.nmTxYrEnd.value; vmMnEnd=document.nmFrmCalc.nmTxMnEnd.value-1; vmDyEnd=document.nmFrmCalc.nmTxDyEnd.value; 
vmValDiff=0; vmBalDays=0; vmBalDays2=0; vmBalDays3=0; vmBalWks=0; vmNmOfDays=0; vmNmOfWks=0; vmNmOfWks2=0; vmNmOfYrs=0; 
vmDtBeg=new Date(vmYrBeg,vmMnBeg,vmDyBeg); vmValBeg=vmDtBeg.getTime(); vmDtEnd=new Date(vmYrEnd,vmMnEnd,vmDyEnd); vmValEnd=vmDtEnd.getTime();
if (vmValBeg > vmValEnd){vmValDiff=vmValBeg-vmValEnd;} else {vmValDiff=vmValEnd-vmValBeg;}
vmNmOfDays=parseInt(vmValDiff/86400000); document.nmFrmCalc.nmTxDate1.value=vmNmOfDays;
if (vmNmOfDays >= 7){vmNmOfWks=parseInt(vmNmOfDays/7); vmBalDays=vmNmOfDays - vmNmOfWks*7; document.nmFrmCalc.nmTxDate2.value=vmNmOfWks; document.nmFrmCalc.nmTxDate3.value=vmBalDays;} if (vmNmOfDays < 7){document.nmFrmCalc.nmTxDate2.value=""; document.nmFrmCalc.nmTxDate3.value="";} 
if (vmNmOfDays >= 365){vmNmOfYrs=parseInt(vmNmOfDays/365); vmBalDays2=vmNmOfDays-vmNmOfYrs*365; if (vmBalDays2 >= 7){vmNmOfWks2=parseInt(vmBalDays2/7); vmBalDays3=vmBalDays2-vmNmOfWks2*7;} if (vmBalDays2 < 7) {vmBalDays3=vmBalDays2;} 
document.nmFrmCalc.nmTxDate4.value=vmNmOfYrs; document.nmFrmCalc.nmTxDate5.value=vmNmOfWks2; document.nmFrmCalc.nmTxDate6.value=vmBalDays3;} 
if (vmNmOfDays < 365){document.nmFrmCalc.nmTxDate4.value=""; document.nmFrmCalc.nmTxDate5.value=""; document.nmFrmCalc.nmTxDate6.value="";}}
function fmWriDtAge(){document.write("<tr bgColor=white><td id=Treb8 align=right><b>Date:</b> &nbsp;<font color=red><b>"+vmWriDt+"</b></font> &nbsp;(y-m-d) &nbsp;</td></tr>")}